Skip to content
Snippets Groups Projects
Commit 71f35992 authored by Dylan Kierans's avatar Dylan Kierans
Browse files

Remove TODO comments moved to #26

parent 34823383
No related branches found
No related tags found
1 merge request!98Support for single precision wp
Pipeline #95874 failed
......@@ -32,22 +32,20 @@ MODULE fortran_support
& t_ptr_1d_wp => t_ptr_1d_sp, &
& t_ptr_2d_wp => t_ptr_2d_sp, &
& t_ptr_3d_wp => t_ptr_3d_sp, &
& t_ptr_4d_wp => t_ptr_4d_sp
USE mo_fortran_tools, ONLY: & ! TODO: Replace t_ptr_Xd with suffix version in ICON, then remove
& t_ptr_1d => t_ptr_1d_sp, &
& t_ptr_2d => t_ptr_2d_sp, &
& t_ptr_3d => t_ptr_3d_sp, &
& t_ptr_4d => t_ptr_4d_sp
& t_ptr_4d_wp => t_ptr_4d_sp, &
& t_ptr_1d => t_ptr_1d_sp, &
& t_ptr_2d => t_ptr_2d_sp, &
& t_ptr_3d => t_ptr_3d_sp, &
& t_ptr_4d => t_ptr_4d_sp
#else
& t_ptr_1d_wp => t_ptr_1d_dp, &
& t_ptr_2d_wp => t_ptr_2d_dp, &
& t_ptr_3d_wp => t_ptr_3d_dp, &
& t_ptr_4d_wp => t_ptr_4d_dp
USE mo_fortran_tools, ONLY: & ! TODO: Replace t_ptr_Xd with suffix version in ICON, then remove
& t_ptr_1d => t_ptr_1d_dp, &
& t_ptr_2d => t_ptr_2d_dp, &
& t_ptr_3d => t_ptr_3d_dp, &
& t_ptr_4d => t_ptr_4d_dp
& t_ptr_4d_wp => t_ptr_4d_dp, &
& t_ptr_1d => t_ptr_1d_dp, &
& t_ptr_2d => t_ptr_2d_dp, &
& t_ptr_3d => t_ptr_3d_dp, &
& t_ptr_4d => t_ptr_4d_dp
#endif
USE mo_hash_table, ONLY: t_HashTable, hashTable_make, t_HashIterator
......@@ -118,7 +116,7 @@ MODULE fortran_support
& init_contiguous_l, minval_1d, minval_2d, resize_arr_c1d, DO_DEALLOCATE, &
& DO_PTR_DEALLOCATE, insert_dimension, assert_acc_host_only, &
& assert_acc_device_only, set_acc_host_or_device
PUBLIC :: t_ptr_1d, t_ptr_2d, t_ptr_3d, t_ptr_4d ! TODO: Remove
PUBLIC :: t_ptr_1d, t_ptr_2d, t_ptr_3d, t_ptr_4d
! From mo_hash_table
PUBLIC :: t_HashTable, hashTable_make, t_HashIterator
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment