mirror of
https://github.com/TREX-CoE/qmckl.git
synced 2024-08-24 22:21:46 +02:00
Removed redundant iso_c_binding
This commit is contained in:
parent
e0abd84059
commit
574cde88e5
@ -2,4 +2,4 @@
|
|||||||
|
|
||||||
export srcdir="."
|
export srcdir="."
|
||||||
python3 ${srcdir}/tools/build_makefile.py
|
python3 ${srcdir}/tools/build_makefile.py
|
||||||
autoreconf -i -Wall --no-recursive
|
autoreconf -vi -Wall --no-recursive
|
||||||
|
@ -1903,8 +1903,6 @@ qmckl_exit_code qmckl_provide_jastrow_champ_asymp_jasb(qmckl_context context)
|
|||||||
function qmckl_compute_jastrow_champ_asymp_jasb_doc(context, &
|
function qmckl_compute_jastrow_champ_asymp_jasb_doc(context, &
|
||||||
bord_num, b_vector, rescale_factor_ee, spin_independent, asymp_jasb) &
|
bord_num, b_vector, rescale_factor_ee, spin_independent, asymp_jasb) &
|
||||||
bind(C) result(info)
|
bind(C) result(info)
|
||||||
use, intrinsic :: iso_c_binding
|
|
||||||
|
|
||||||
use qmckl
|
use qmckl
|
||||||
implicit none
|
implicit none
|
||||||
|
|
||||||
@ -2347,8 +2345,6 @@ function qmckl_compute_jastrow_champ_factor_ee_doc(context, &
|
|||||||
walk_num, elec_num, up_num, bord_num, b_vector, &
|
walk_num, elec_num, up_num, bord_num, b_vector, &
|
||||||
ee_distance_rescaled, asymp_jasb, spin_independent, factor_ee) &
|
ee_distance_rescaled, asymp_jasb, spin_independent, factor_ee) &
|
||||||
bind(C) result(info)
|
bind(C) result(info)
|
||||||
use, intrinsic :: iso_c_binding
|
|
||||||
|
|
||||||
use qmckl
|
use qmckl
|
||||||
implicit none
|
implicit none
|
||||||
|
|
||||||
@ -2824,8 +2820,6 @@ function qmckl_compute_jastrow_champ_factor_ee_gl_doc( &
|
|||||||
b_vector, ee_distance_rescaled, ee_distance_rescaled_gl, &
|
b_vector, ee_distance_rescaled, ee_distance_rescaled_gl, &
|
||||||
spin_independent, factor_ee_gl) &
|
spin_independent, factor_ee_gl) &
|
||||||
bind(C) result(info)
|
bind(C) result(info)
|
||||||
use, intrinsic :: iso_c_binding
|
|
||||||
|
|
||||||
use qmckl
|
use qmckl
|
||||||
implicit none
|
implicit none
|
||||||
|
|
||||||
@ -3383,7 +3377,6 @@ function qmckl_compute_ee_distance_rescaled_doc(context, &
|
|||||||
elec_num, rescale_factor_ee, walk_num, &
|
elec_num, rescale_factor_ee, walk_num, &
|
||||||
coord, ee_distance_rescaled) &
|
coord, ee_distance_rescaled) &
|
||||||
bind(C) result(info)
|
bind(C) result(info)
|
||||||
use, intrinsic :: iso_c_binding
|
|
||||||
use qmckl
|
use qmckl
|
||||||
implicit none
|
implicit none
|
||||||
|
|
||||||
@ -3709,7 +3702,6 @@ qmckl_exit_code qmckl_provide_ee_distance_rescaled_gl(qmckl_context context)
|
|||||||
function qmckl_compute_ee_distance_rescaled_gl_doc(context, &
|
function qmckl_compute_ee_distance_rescaled_gl_doc(context, &
|
||||||
elec_num, rescale_factor_ee, walk_num, coord, ee_distance_rescaled_gl) &
|
elec_num, rescale_factor_ee, walk_num, coord, ee_distance_rescaled_gl) &
|
||||||
bind(C) result(info)
|
bind(C) result(info)
|
||||||
use, intrinsic :: iso_c_binding
|
|
||||||
use qmckl
|
use qmckl
|
||||||
implicit none
|
implicit none
|
||||||
|
|
||||||
@ -4325,7 +4317,6 @@ function qmckl_compute_jastrow_champ_factor_en_doc( &
|
|||||||
type_nucl_vector, aord_num, a_vector, &
|
type_nucl_vector, aord_num, a_vector, &
|
||||||
en_distance_rescaled, asymp_jasa, factor_en) &
|
en_distance_rescaled, asymp_jasa, factor_en) &
|
||||||
bind(C) result(info)
|
bind(C) result(info)
|
||||||
use, intrinsic :: iso_c_binding
|
|
||||||
use qmckl
|
use qmckl
|
||||||
implicit none
|
implicit none
|
||||||
|
|
||||||
@ -4746,7 +4737,6 @@ function qmckl_compute_jastrow_champ_factor_en_gl_doc( &
|
|||||||
type_nucl_vector, aord_num, a_vector, &
|
type_nucl_vector, aord_num, a_vector, &
|
||||||
en_distance_rescaled, en_distance_rescaled_gl, factor_en_gl) &
|
en_distance_rescaled, en_distance_rescaled_gl, factor_en_gl) &
|
||||||
bind(C) result(info)
|
bind(C) result(info)
|
||||||
use, intrinsic :: iso_c_binding
|
|
||||||
use qmckl
|
use qmckl
|
||||||
implicit none
|
implicit none
|
||||||
|
|
||||||
@ -5270,7 +5260,6 @@ function qmckl_compute_en_distance_rescaled_doc(context, &
|
|||||||
type_nucl_vector, rescale_factor_en, walk_num, elec_coord, &
|
type_nucl_vector, rescale_factor_en, walk_num, elec_coord, &
|
||||||
nucl_coord, en_distance_rescaled) &
|
nucl_coord, en_distance_rescaled) &
|
||||||
bind(C) result(info)
|
bind(C) result(info)
|
||||||
use, intrinsic :: iso_c_binding
|
|
||||||
use qmckl
|
use qmckl
|
||||||
implicit none
|
implicit none
|
||||||
integer (qmckl_context), intent(in), value :: context
|
integer (qmckl_context), intent(in), value :: context
|
||||||
|
Loading…
Reference in New Issue
Block a user