Add create_uniface() function to Fortran wrapper

MxUI · Sep 13, 2022 · d312a1b · d312a1b
1 parent 03fe9af
commit d312a1b
Show file tree

Hide file tree

Showing 4 changed files with 7 additions and 4 deletions.
diff --git a/changelog b/changelog
@@ -2,7 +2,8 @@
 # Multiscale Universal Interface Changelog #
 ############################################
 
-[05 September 2022, 1.2.3]
+[13 September 2022, 1.2.3]
+  - Add multiple uniface helper function (create_uniface) to Fortran wrapper 
   - Add mod file generation to Fortran wrapper build systems (CMake and Makefile)
   - Add creation of static libraries for Fortran and C wrappers to CMake build system
 

diff --git a/spatial_samplers/sampler_rbf.h b/spatial_samplers/sampler_rbf.h
@@ -208,6 +208,8 @@ class sampler_rbf {
 				N_sp_ = data_points.size();
 		}
 
+		std::cout << N_sp_ << std::endl;
+
 		if ( smoothFunc_ ) {
 			if ( pts_.size() <= static_cast<size_t>(M_ap_) )
 				M_ap_ = (pts_.size() - 1);

diff --git a/wrappers/Fortran/Makefile b/wrappers/Fortran/Makefile
@@ -59,9 +59,9 @@ test:
 	 @echo "Compiling and linking MUI Fortran wrapper unit test code..."
 	 ${FC} ${FFLAGS} mui_f_wrapper_1d.f90 mui_f_wrapper_2d.f90 mui_f_wrapper_3d.f90 unit_test.f90 -o unit_test_fortran_wrapper -L. -lstdc++ -lmpi_cxx -lmui_f_wrapper
 	 ${FC} ${FFLAGS} mui_f_wrapper_1d.f90 mui_f_wrapper_2d.f90 mui_f_wrapper_3d.f90 unit_test_multi.f90 -o unit_test_multi_fortran_wrapper -L. -lstdc++ -lmpi_cxx -lmui_f_wrapper
-	 @echo "Launching unit test code..."
+	 @echo "Launching unit test code for direct interface creation..."
 	 ${MPI} -np 1 ./unit_test_fortran_wrapper domain1 interface : -np 1 ./unit_test_fortran_wrapper domain2 interface
-	 @echo "Launching unit test code..."
+	 @echo "Launching unit test code for interface creation using helper fucntion..."
 	 ${MPI} -np 1 ./unit_test_multi_fortran_wrapper domain1 interface 2 : -np 1 ./unit_test_multi_fortran_wrapper domain2 interface 2
 
 clean:

diff --git a/wrappers/Fortran/unit_test_multi.f90 b/wrappers/Fortran/unit_test_multi.f90
@@ -2,7 +2,7 @@
 !* Multiscale Universal Interface Code Coupling Library                       *
 !*                                                                            *
 !* Copyright (C) 2021 Y. H. Tang, S. Kudo, X. Bian, Z. Li, G. E. Karniadakis, *
-!*                    S. M. Longshaw                                          *
+!*                    W. Liu, S. M. Longshaw                                  *
 !*                                                                            *
 !* This software is jointly licensed under the Apache License, Version 2.0    *
 !* and the GNU General Public License version 3, you may use it according     *