TREX/trexio
1
0
Fork 0
mirror of https://github.com/TREX-CoE/trexio.git synced 2024-12-22 20:35:44 +01:00
Code Issues Projects Releases Wiki Activity

Fix line truncation

Browse Source
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
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/templates_front/templator_front.org
View File

@ -5517,7 +5517,8 @@ end interface
#+begin_src f90 :tangle prefix_fortran.f90 #+begin_src f90 :tangle prefix_fortran.f90
interface 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 use, intrinsic :: iso_c_binding
import import
integer(c_int32_t), intent(in) :: list(*) integer(c_int32_t), intent(in) :: list(*)
@ -5530,7 +5531,8 @@ end interface
#+begin_src f90 :tangle prefix_fortran.f90 #+begin_src f90 :tangle prefix_fortran.f90
interface 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 use, intrinsic :: iso_c_binding
import import
integer(c_int32_t), intent(in), value :: N_int integer(c_int32_t), intent(in), value :: N_int