fix a bug

NCAR · Aug 30, 2024 · 80c8b6c · 80c8b6c
1 parent 3950d6b
commit 80c8b6c
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/fortran/tuvx/tuvx.F90 b/fortran/tuvx/tuvx.F90
@@ -21,7 +21,7 @@ module musica_tuvx
   !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
   interface
-    function create_tuvx_c(config_path, grids, profiles, radiators, error) %
+    function create_tuvx_c(config_path, grids, profiles, radiators, error) &
         bind(C, name="CreateTuvx")
       use musica_util, only: error_t_c
       use iso_c_binding, only: c_ptr, c_int, c_char