Skip to content

Commit 7abaffc

Browse files
author
Daniel Vickers
committed
need to protect public statement on GNU
1 parent ae00ed6 commit 7abaffc

1 file changed

Lines changed: 5 additions & 1 deletion

File tree

src/common/m_model.fpp

Lines changed: 5 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -24,7 +24,11 @@ module m_model
2424

2525
! Subroutines for STL immersed boundaries
2626
public :: s_check_boundary, s_register_edge, f_model_is_inside_flat, &
27-
s_distance_normals_3D, s_distance_normals_2D, s_instantiate_STL_models, s_pack_model_for_gpu
27+
s_distance_normals_3D, s_distance_normals_2D, s_pack_model_for_gpu
28+
29+
#ifdef MFC_SIMULATION
30+
public :: s_instantiate_STL_models
31+
#endif
2832

2933
!! array of STL models that can be allocated and then used in IB marker and levelset compute
3034
type(t_model_array), allocatable, target :: models(:)

0 commit comments

Comments
 (0)