mirror of
https://github.com/TREX-CoE/qmckl.git
synced 2024-07-18 00:43:51 +02:00
Error in FOrtran interface fixed
This commit is contained in:
parent
bd86faf1a6
commit
f005f587e7
@ -1087,7 +1087,7 @@ interface
|
|||||||
end function
|
end function
|
||||||
end interface
|
end interface
|
||||||
interface
|
interface
|
||||||
integer(c_int32_t) function qmckl_set_ao_basis_nucleus_shell_ang_mom(context,shell_ang_mom) &
|
integer(c_int32_t) function qmckl_set_ao_basis_shell_ang_mom(context,shell_ang_mom) &
|
||||||
bind(C)
|
bind(C)
|
||||||
use, intrinsic :: iso_c_binding
|
use, intrinsic :: iso_c_binding
|
||||||
import
|
import
|
||||||
@ -1097,7 +1097,7 @@ interface
|
|||||||
end function
|
end function
|
||||||
end interface
|
end interface
|
||||||
interface
|
interface
|
||||||
integer(c_int32_t) function qmckl_set_ao_basis_nucleus_shell_prim_num(context,shell_prim_num) &
|
integer(c_int32_t) function qmckl_set_ao_basis_shell_prim_num(context,shell_prim_num) &
|
||||||
bind(C)
|
bind(C)
|
||||||
use, intrinsic :: iso_c_binding
|
use, intrinsic :: iso_c_binding
|
||||||
import
|
import
|
||||||
@ -1107,7 +1107,7 @@ interface
|
|||||||
end function
|
end function
|
||||||
end interface
|
end interface
|
||||||
interface
|
interface
|
||||||
integer(c_int32_t) function qmckl_set_ao_basis_nucleus_shell_prim_index(context,shell_prim_index) &
|
integer(c_int32_t) function qmckl_set_ao_basis_shell_prim_index(context,shell_prim_index) &
|
||||||
bind(C)
|
bind(C)
|
||||||
use, intrinsic :: iso_c_binding
|
use, intrinsic :: iso_c_binding
|
||||||
import
|
import
|
||||||
@ -1117,7 +1117,7 @@ interface
|
|||||||
end function
|
end function
|
||||||
end interface
|
end interface
|
||||||
interface
|
interface
|
||||||
integer(c_int32_t) function qmckl_set_ao_basis_nucleus_shell_factor(context,shell_factor) &
|
integer(c_int32_t) function qmckl_set_ao_basis_shell_factor(context,shell_factor) &
|
||||||
bind(C)
|
bind(C)
|
||||||
use, intrinsic :: iso_c_binding
|
use, intrinsic :: iso_c_binding
|
||||||
import
|
import
|
||||||
@ -1127,7 +1127,7 @@ interface
|
|||||||
end function
|
end function
|
||||||
end interface
|
end interface
|
||||||
interface
|
interface
|
||||||
integer(c_int32_t) function qmckl_set_ao_basis_nucleus_exponent(context,exponent) &
|
integer(c_int32_t) function qmckl_set_ao_basis_exponent(context,exponent) &
|
||||||
bind(C)
|
bind(C)
|
||||||
use, intrinsic :: iso_c_binding
|
use, intrinsic :: iso_c_binding
|
||||||
import
|
import
|
||||||
@ -1137,7 +1137,7 @@ interface
|
|||||||
end function
|
end function
|
||||||
end interface
|
end interface
|
||||||
interface
|
interface
|
||||||
integer(c_int32_t) function qmckl_set_ao_basis_nucleus_coefficient(context,coefficient) &
|
integer(c_int32_t) function qmckl_set_ao_basis_coefficient(context,coefficient) &
|
||||||
bind(C)
|
bind(C)
|
||||||
use, intrinsic :: iso_c_binding
|
use, intrinsic :: iso_c_binding
|
||||||
import
|
import
|
||||||
@ -1147,7 +1147,7 @@ interface
|
|||||||
end function
|
end function
|
||||||
end interface
|
end interface
|
||||||
interface
|
interface
|
||||||
integer(c_int32_t) function qmckl_set_ao_basis_nucleus_prim_factor(context,prim_factor) &
|
integer(c_int32_t) function qmckl_set_ao_basis_prim_factor(context,prim_factor) &
|
||||||
bind(C)
|
bind(C)
|
||||||
use, intrinsic :: iso_c_binding
|
use, intrinsic :: iso_c_binding
|
||||||
import
|
import
|
||||||
|
Loading…
Reference in New Issue
Block a user