1
0
mirror of https://github.com/TREX-CoE/trexio.git synced 2024-12-22 12:23:54 +01:00

Fix line truncation

This commit is contained in:
Evgeny Posenitskiy 2022-07-12 19:35:15 +02:00 committed by GitHub
parent 2ed5251004
commit 43bb57de59
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

View File

@ -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