From dbcc33868134b5ede5322c3dfdaca7de45d96811 Mon Sep 17 00:00:00 2001
From: Debolskiy Andrey <and.debol@gmail.com>
Date: Fri, 14 Jun 2024 13:48:57 +0300
Subject: [PATCH] test for lib

---
 CMakeLists.txt      | 20 +++++++++++---------
 src/test_netcdf.f90 | 17 +++++++++++++++++
 2 files changed, 28 insertions(+), 9 deletions(-)
 create mode 100644 src/test_netcdf.f90

diff --git a/CMakeLists.txt b/CMakeLists.txt
index db3c10a..b6fa9e8 100644
--- a/CMakeLists.txt
+++ b/CMakeLists.txt
@@ -3,26 +3,28 @@ project(scm_io)
 
 set(CMAKE_CXX_STANDARD 14)
 
-include_directories(src)
+
 
 enable_language(Fortran)
+find_package(netCDF-Fortran REQUIRED
+        HINTS /usr/local/lib/cmake/netCDF/)
+
 set(dialect " -free -fimplicit-none ")
 set(bounds "-free -fimplicit-none ")
 set(CMAKE_Fortran_FLAGS_DEBUG "${CMAKE_Fortran_FLAGS_DEBUG} ${bounds} -g -fbacktrace -O0 -fcheck=all")
 set(CMAKE_Fortran_FLAGS "${CMAKE_Fortran_FLAGS} ${dialect}")
 
 
-
+include_directories(src)
 set(plt_io
         src/scm_io_plt.f90
-        src/test_io_plt.f90)
-
-add_executable(test_plt ${plt_io})
+        #src/test_io_plt.f90
+        src/netcdf_io_module.f90
+        #src/test_netcdf.f90)
 
+add_library(test_io ${plt_io})
 
-find_package(netCDF-Fortran REQUIRED
-        HINTS /usr/local/Cellar/netcdf-fortran/4.6.1/lib/cmake/netCDF/)
-
+target_include_directories(test_plt PRIVATE ${netCDF_INCLUDE_DIR})
 
 
-target_link_libraries(test_plt PRIVATE netCDF-Fortran)
\ No newline at end of file
+target_link_libraries(test_plt PRIVATE netCDF::netcdff)
\ No newline at end of file
diff --git a/src/test_netcdf.f90 b/src/test_netcdf.f90
new file mode 100644
index 0000000..3dc3d13
--- /dev/null
+++ b/src/test_netcdf.f90
@@ -0,0 +1,17 @@
+! Created by Andrey Debolskiy on 14.06.2024.
+
+program test_netcdf
+    use netcdf_io_module
+    implicit none
+    integer, parameter:: nt = 10, nx = 100
+    real t, x
+    real, dimension(nt) :: series_t;
+    real, dimension(nx) :: profile;
+    real, dimension(nx,nt) :: time_scan;
+    type (io_struct) :: file_nc;
+    character(20) fname
+
+    fname =  'test_io.nc'
+    call open_netcdf(trim(fname), file_nc, nt, nx, 1, 1)
+
+end program test_netcdf
\ No newline at end of file
-- 
GitLab