mirror of
https://github.com/TREX-CoE/qmckl.git
synced 2024-08-25 06:31:45 +02:00
Fix bugs for Python and Jastrow
This commit is contained in:
parent
3db1765cdb
commit
d77dc26e52
@ -422,7 +422,7 @@ qmckl_exit_code qmckl_set_jastrow_champ_aord_num (qmckl_context contex
|
|||||||
qmckl_exit_code qmckl_set_jastrow_champ_bord_num (qmckl_context context, const int64_t bord_num);
|
qmckl_exit_code qmckl_set_jastrow_champ_bord_num (qmckl_context context, const int64_t bord_num);
|
||||||
qmckl_exit_code qmckl_set_jastrow_champ_cord_num (qmckl_context context, const int64_t cord_num);
|
qmckl_exit_code qmckl_set_jastrow_champ_cord_num (qmckl_context context, const int64_t cord_num);
|
||||||
qmckl_exit_code qmckl_set_jastrow_champ_type_nucl_num (qmckl_context context, const int64_t type_nucl_num);
|
qmckl_exit_code qmckl_set_jastrow_champ_type_nucl_num (qmckl_context context, const int64_t type_nucl_num);
|
||||||
qmckl_exit_code qmckl_set_jastrow_champ_type_nucl_vector (qmckl_context context, const int64_t* type_nucl_vector, const int64_t nucl_num);
|
qmckl_exit_code qmckl_set_jastrow_champ_type_nucl_vector (qmckl_context context, const int64_t* type_nucl_vector, const int64_t size_max);
|
||||||
qmckl_exit_code qmckl_set_jastrow_champ_a_vector (qmckl_context context, const double * a_vector, const int64_t size_max);
|
qmckl_exit_code qmckl_set_jastrow_champ_a_vector (qmckl_context context, const double * a_vector, const int64_t size_max);
|
||||||
qmckl_exit_code qmckl_set_jastrow_champ_b_vector (qmckl_context context, const double * b_vector, const int64_t size_max);
|
qmckl_exit_code qmckl_set_jastrow_champ_b_vector (qmckl_context context, const double * b_vector, const int64_t size_max);
|
||||||
qmckl_exit_code qmckl_set_jastrow_champ_c_vector (qmckl_context context, const double * c_vector, const int64_t size_max);
|
qmckl_exit_code qmckl_set_jastrow_champ_c_vector (qmckl_context context, const double * c_vector, const int64_t size_max);
|
||||||
@ -1759,8 +1759,8 @@ qmckl_exit_code qmckl_provide_jastrow_champ_asymp_jasb(qmckl_context context)
|
|||||||
NULL);
|
NULL);
|
||||||
}
|
}
|
||||||
|
|
||||||
/* Compute if necessary */
|
// /* Compute if necessary */
|
||||||
if (ctx->date > ctx->jastrow_champ.asymp_jasb_date) {
|
// if (ctx->date > ctx->jastrow_champ.asymp_jasb_date) {
|
||||||
|
|
||||||
rc = qmckl_compute_jastrow_champ_asymp_jasb(context,
|
rc = qmckl_compute_jastrow_champ_asymp_jasb(context,
|
||||||
ctx->jastrow_champ.bord_num,
|
ctx->jastrow_champ.bord_num,
|
||||||
@ -1772,7 +1772,7 @@ qmckl_exit_code qmckl_provide_jastrow_champ_asymp_jasb(qmckl_context context)
|
|||||||
}
|
}
|
||||||
|
|
||||||
ctx->jastrow_champ.asymp_jasb_date = ctx->date;
|
ctx->jastrow_champ.asymp_jasb_date = ctx->date;
|
||||||
}
|
// }
|
||||||
|
|
||||||
return QMCKL_SUCCESS;
|
return QMCKL_SUCCESS;
|
||||||
}
|
}
|
||||||
@ -3746,8 +3746,8 @@ qmckl_exit_code qmckl_provide_jastrow_champ_asymp_jasa(qmckl_context context)
|
|||||||
NULL);
|
NULL);
|
||||||
}
|
}
|
||||||
|
|
||||||
/* Compute if necessary */
|
// /* Compute if necessary */
|
||||||
if (ctx->date > ctx->jastrow_champ.asymp_jasa_date) {
|
// if (ctx->date > ctx->jastrow_champ.asymp_jasa_date) {
|
||||||
|
|
||||||
/* Allocate array */
|
/* Allocate array */
|
||||||
if (ctx->jastrow_champ.asymp_jasa == NULL) {
|
if (ctx->jastrow_champ.asymp_jasa == NULL) {
|
||||||
@ -3776,7 +3776,7 @@ qmckl_exit_code qmckl_provide_jastrow_champ_asymp_jasa(qmckl_context context)
|
|||||||
}
|
}
|
||||||
|
|
||||||
ctx->jastrow_champ.asymp_jasa_date = ctx->date;
|
ctx->jastrow_champ.asymp_jasa_date = ctx->date;
|
||||||
}
|
// }
|
||||||
|
|
||||||
return QMCKL_SUCCESS;
|
return QMCKL_SUCCESS;
|
||||||
}
|
}
|
||||||
|
@ -58,6 +58,11 @@ import_array();
|
|||||||
%apply ( double* ARGOUT_ARRAY1 , int64_t DIM1 ) { ( double* const C, const int64_t size_max_C) };
|
%apply ( double* ARGOUT_ARRAY1 , int64_t DIM1 ) { ( double* const C, const int64_t size_max_C) };
|
||||||
%apply ( double* ARGOUT_ARRAY1 , int64_t DIM1 ) { ( double* const B, const int64_t size_max_B) };
|
%apply ( double* ARGOUT_ARRAY1 , int64_t DIM1 ) { ( double* const B, const int64_t size_max_B) };
|
||||||
|
|
||||||
|
%apply ( int64_t* IN_ARRAY1 , int64_t DIM1 ) { ( const int64_t* A, const int64_t size_max_A) };
|
||||||
|
%apply ( int64_t* IN_ARRAY1 , int64_t DIM1 ) { ( const int64_t* B, const int64_t size_max_B) };
|
||||||
|
%apply ( int64_t* ARGOUT_ARRAY1 , int64_t DIM1 ) { ( int64_t* const C, const int64_t size_max_C) };
|
||||||
|
%apply ( int64_t* ARGOUT_ARRAY1 , int64_t DIM1 ) { ( int64_t* const B, const int64_t size_max_B) };
|
||||||
|
|
||||||
/* Handle properly get_point */
|
/* Handle properly get_point */
|
||||||
|
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user