Modify a bug of boundary scheme

9e0b6851 · ccfd · acb9b19b · 9e0b6851 · 9e0b6851 · 9e0b6851
Commit 9e0b6851 authored Sep 07, 2022 by ccfd
17 changed files
--- a/obj/OCFD_mpi.o
+++ b/obj/OCFD_mpi.o
--- a/obj/OCFD_mpi_dev.o
+++ b/obj/OCFD_mpi_dev.o
--- a/obj/OCFD_split.o
+++ b/obj/OCFD_split.o
--- a/obj/OCFD_time.o
+++ b/obj/OCFD_time.o
--- a/obj/commen_kernel.o
+++ b/obj/commen_kernel.o
--- a/obj/cuda_commen.o
+++ b/obj/cuda_commen.o
--- a/obj/cuda_utility.o
+++ b/obj/cuda_utility.o
--- a/obj/libocfd.a
+++ b/obj/libocfd.a
--- a/obj/parameters.o
+++ b/obj/parameters.o
--- a/obj/parameters_d.o
+++ b/obj/parameters_d.o
--- a/obj/test.o
+++ b/obj/test.o
--- a/obj/utility.o
+++ b/obj/utility.o
--- a/opencfd-scu.out
+++ b/opencfd-scu.out
--- a/opencfd.o
+++ b/opencfd.o
--- a/src/OCFD_IO_mpi.c
+++ b/src/OCFD_IO_mpi.c
@@ -7,7 +7,7 @@
 #include "utility.h"
 #include "OCFD_mpi.h"
 #include "io_warp.h"
-
+__device__ __constant__ unsigned int ny_d,ny_2lap_d;
 //---------------------------------------------------
 #ifdef __cplusplus
 extern "C"{

--- a/src/OCFD_bound_Scheme.cu
+++ b/src/OCFD_bound_Scheme.cu
--- a/src/OCFD_init.cu
+++ b/src/OCFD_init.cu
@@ -315,8 +315,8 @@ void opencfd_mem_init_boundary(){
        pu_dist_upper = (REAL*)malloc_me(sizeof(REAL)*ny*nx);
        pfx = (REAL*)malloc_me(sizeof(REAL)*nx);
        pgz = (REAL*)malloc_me(sizeof(REAL)*ny);
-        TM = (REAL*)malloc_me(sizeof(REAL)*MTMAX);
-        fait = (REAL*)malloc_me(sizeof(REAL)*MTMAX);
+        TM = (REAL*)malloc_me(sizeof(REAL)*abs(MTMAX));
+        fait = (REAL*)malloc_me(sizeof(REAL)*abs(MTMAX));
        
        new_cudaField(&pu2d_inlet_d, ny, nz, 5);
        new_cudaField(&pu2d_upper_d, nx, ny, 5);
@@ -330,8 +330,8 @@ void opencfd_mem_init_boundary(){
        pfx = (REAL*)malloc_me(sizeof(REAL)*nx);
        pgz = (REAL*)malloc_me(sizeof(REAL)*nz);
    
-        TM = (REAL*)malloc_me(sizeof(REAL)*MTMAX);
-        fait = (REAL*)malloc_me(sizeof(REAL)*MTMAX);
+        TM = (REAL*)malloc_me(sizeof(REAL)*abs(MTMAX));
+        fait = (REAL*)malloc_me(sizeof(REAL)*abs(MTMAX));
        //ptmp = (REAL*)malloc_me_Host(sizeof(REAL)*10*nx*nz);
    
        new_cudaField(&pub1_d, ny, 4, 1);