From 478ce7cc386a56115217db73de0f3b8c0abfb843 Mon Sep 17 00:00:00 2001 From: vijay gopal chilkuri Date: Wed, 7 Jul 2021 20:45:55 +0530 Subject: [PATCH] Testing - II. #22 --- org/qmckl_jastrow.org | 44 +++++++++++++++++++++---------------------- 1 file changed, 22 insertions(+), 22 deletions(-) diff --git a/org/qmckl_jastrow.org b/org/qmckl_jastrow.org index f87d6be..d1f51ac 100644 --- a/org/qmckl_jastrow.org +++ b/org/qmckl_jastrow.org @@ -1402,28 +1402,28 @@ double* aord_vector = &(n2_aord_vector[0][0]); double* bord_vector = &(n2_bord_vector[0]); double* cord_vector = &(n2_cord_vector[0][0]); -///* Initialize the Jastrow data */ -//rc = qmckl_init_jastrow(context); -//assert(!qmckl_jastrow_provided(context)); -// -///* Set the data */ -//rc = qmckl_set_jastrow_ord_num(context, aord_num, bord_num, cord_num); -//assert(rc == QMCKL_SUCCESS); -//rc = qmckl_set_jastrow_type_nucl_num(context, type_nucl_num); -//assert(rc == QMCKL_SUCCESS); -//rc = qmckl_set_jastrow_type_nucl_vector(context, type_nucl_vector, nucl_num); -//assert(rc == QMCKL_SUCCESS); -//rc = qmckl_set_jastrow_aord_vector(context, aord_vector); -//assert(rc == QMCKL_SUCCESS); -//rc = qmckl_set_jastrow_bord_vector(context, bord_vector); -//assert(rc == QMCKL_SUCCESS); -//rc = qmckl_set_jastrow_cord_vector(context, cord_vector); -//assert(rc == QMCKL_SUCCESS); -//rc = qmckl_set_jastrow_dependencies(context); -//assert(rc == QMCKL_SUCCESS); -// -///* Check if Jastrow is properly initialized */ -//assert(qmckl_jastrow_provided(context)); +/* Initialize the Jastrow data */ +rc = qmckl_init_jastrow(context); +assert(!qmckl_jastrow_provided(context)); + +/* Set the data */ +rc = qmckl_set_jastrow_ord_num(context, aord_num, bord_num, cord_num); +assert(rc == QMCKL_SUCCESS); +rc = qmckl_set_jastrow_type_nucl_num(context, type_nucl_num); +assert(rc == QMCKL_SUCCESS); +rc = qmckl_set_jastrow_type_nucl_vector(context, type_nucl_vector, nucl_num); +assert(rc == QMCKL_SUCCESS); +rc = qmckl_set_jastrow_aord_vector(context, aord_vector); +assert(rc == QMCKL_SUCCESS); +rc = qmckl_set_jastrow_bord_vector(context, bord_vector); +assert(rc == QMCKL_SUCCESS); +rc = qmckl_set_jastrow_cord_vector(context, cord_vector); +assert(rc == QMCKL_SUCCESS); +rc = qmckl_set_jastrow_dependencies(context); +assert(rc == QMCKL_SUCCESS); + +/* Check if Jastrow is properly initialized */ +assert(qmckl_jastrow_provided(context)); // //double asymp_jasb[2]; //rc = qmckl_get_jastrow_asymp_jasb(context, asymp_jasb);