/* #elif KERNEL_ELEC=='CubicSplineTable' */
/* CUBIC SPLINE TABLE ELECTROSTATICS */
- /* #if 'Force' in KERNEL_VF */
+ /* #if 'Potential' in KERNEL_VF */
Y = vftab[vfitab];
/* #endif */
F = vftab[vfitab+1];
/* CUBIC SPLINE TABLE DISPERSION */
vfitab += {TABLE_VDW_OFFSET};
- /* #if 'Force' in KERNEL_VF */
+ /* #if 'Potential' in KERNEL_VF */
Y = vftab[vfitab];
/* #endif */
F = vftab[vfitab+1];
/* #endif */
/* CUBIC SPLINE TABLE REPULSION */
- /* #if 'Force' in KERNEL_VF */
+ /* #if 'Potential' in KERNEL_VF */
Y = vftab[vfitab+4];
/* #endif */
F = vftab[vfitab+5];
/* #endif */
/* #endif */
/* #if 'GeneralizedBorn' in KERNEL_ELEC and 'Force' in KERNEL_VF */
- dvda[nri] = dvda[nri] + dvdasum*isai{I}*isai{I};
+ dvda[inr] = dvda[inr] + dvdasum*isai{I}*isai{I};
/* #endif */
/* Increment number of inner iterations */