mirror of
https://github.com/TREX-CoE/qmckl.git
synced 2025-01-03 01:56:18 +01:00
added return value to fortran interface.
This commit is contained in:
parent
8a89003bf2
commit
06127f24cb
@ -468,7 +468,7 @@ qmckl_exit_code qmckl_sherman_morrison_naive(const qmckl_context context,
|
|||||||
interface
|
interface
|
||||||
integer(c_int32_t) function qmckl_sherman_morrison_naive_doc &
|
integer(c_int32_t) function qmckl_sherman_morrison_naive_doc &
|
||||||
(context, Dim, N_updates, Updates, Updates_index, breakdown, Slater_inv, determinant) &
|
(context, Dim, N_updates, Updates, Updates_index, breakdown, Slater_inv, determinant) &
|
||||||
bind(C)
|
bind(C) result(info)
|
||||||
|
|
||||||
use, intrinsic :: iso_c_binding
|
use, intrinsic :: iso_c_binding
|
||||||
import
|
import
|
||||||
|
Loading…
Reference in New Issue
Block a user