diff --git a/srcF/sfx_api_lake.f90 b/srcF/sfx_api_lake.f90
index efd3b36b7acdeb4604903e323dd3f474d4f04b6a..17ed09553292d1ef6e61fe6137a9393a4d0d91f8 100644
--- a/srcF/sfx_api_lake.f90
+++ b/srcF/sfx_api_lake.f90
@@ -53,7 +53,7 @@ contains
         !> @brief converts sfx cell output to legacy arg [AR2 INMCM format] array
         ! ----------------------------------------------------------------------------
         use, intrinsic :: iso_c_binding, only: real_d => c_double, &
-                                        real_d => c_float! 8-byte real
+                                        real_f => c_float! 8-byte real
 
         implicit none
         type(sfxDataType), intent(in) :: sfx