Update m_model.fpp

aricer123 · web-flow · commit 2e6a1cedd684 · 2024-12-05T17:27:03.000-05:00
diff --git a/src/pre_process/m_model.fpp b/src/pre_process/m_model.fpp
@@ -1055,8 +1055,8 @@ contains
         t_vec3 :: dist_buffer !< Distance between the cell center and the vertices
         integer :: i, j, tri_idx !< Iterator
 
-        dist_min = 1e12
-        dist_min_normal = 1e12
+        dist_min = 1e12_wp
+        dist_min_normal = 1e12_wp
         distance = 0._wp
 
         tri_idx = 0
