From 6ff0c9d7479972d07666117ff7fa59c9f1064863 Mon Sep 17 00:00:00 2001
From: Dylan Kierans <kierans@dkrz.de>
Date: Thu, 27 Mar 2025 07:36:12 +0100
Subject: [PATCH] wp_init_grid pointers
---
src/fortran_support.F90 | 4 ++++
1 file changed, 4 insertions(+)
diff --git a/src/fortran_support.F90 b/src/fortran_support.F90
index 04a570f..cfaf97c 100644
--- a/src/fortran_support.F90
+++ b/src/fortran_support.F90
@@ -50,6 +50,9 @@ MODULE fortran_support
& t_ptr_3d => t_ptr_3d_dp, &
& t_ptr_4d => t_ptr_4d_dp
#endif
+ USE mo_fortran_tools, ONLY: &
+ & t_ptr_2d_wp_init_grid => t_ptr_2d_dp, &
+ & t_ptr_3d_wp_init_grid => t_ptr_3d_dp
USE mo_hash_table, ONLY: t_HashTable, hashTable_make, t_HashIterator
USE mo_io_units, ONLY: filename_max, nerr, nlog, nnml, nstat, ngmt, nin, &
@@ -112,6 +115,7 @@ MODULE fortran_support
& t_ptr_2d, t_ptr_2d_wp, t_ptr_2d_dp, t_ptr_2d_sp, t_ptr_2d_int, &
& t_ptr_3d, t_ptr_3d_wp, t_ptr_3d_dp, t_ptr_3d_sp, t_ptr_3d_int, t_ptr_i2d3d, &
& t_ptr_4d, t_ptr_4d_wp, t_ptr_4d_dp, t_ptr_4d_sp, t_ptr_4d_int, &
+ & t_ptr_2d_wp_init_grid, t_ptr_3d_wp_init_grid, &
& t_ptr_2d3d, t_ptr_2d3d_vp, t_ptr_tracer, &
& copy, init, swap, negative2zero, var_scale, &
& var_add, init_zero_contiguous, init_contiguous, &
--
GitLab