diff --git a/src/templates_front/templator_front.org b/src/templates_front/templator_front.org index 684ddfc..b0618e4 100644 --- a/src/templates_front/templator_front.org +++ b/src/templates_front/templator_front.org @@ -5517,7 +5517,8 @@ end interface #+begin_src f90 :tangle prefix_fortran.f90 interface - integer(trexio_exit_code) function trexio_to_bitfield_list_c(list, occupied_num, det_list, N_int) bind(C, name="trexio_to_bitfield_list") + integer(trexio_exit_code) function trexio_to_bitfield_list_c(list, occupied_num, det_list, N_int) & + bind(C, name="trexio_to_bitfield_list") use, intrinsic :: iso_c_binding import integer(c_int32_t), intent(in) :: list(*) @@ -5530,7 +5531,8 @@ end interface #+begin_src f90 :tangle prefix_fortran.f90 interface - integer(trexio_exit_code) function trexio_to_orbital_list_c(N_int, d1, list, occupied_num) bind(C, name="trexio_to_orbital_list") + integer(trexio_exit_code) function trexio_to_orbital_list_c(N_int, d1, list, occupied_num) & + bind(C, name="trexio_to_orbital_list") use, intrinsic :: iso_c_binding import integer(c_int32_t), intent(in), value :: N_int