1
0
mirror of https://github.com/TREX-CoE/qmckl.git synced 2024-07-03 01:46:12 +02:00

Fixed bug in polynomials

This commit is contained in:
Anthony Scemama 2021-03-19 23:16:30 +01:00
parent 885f7b000e
commit b1f1843e01

View File

@ -320,7 +320,7 @@ integer function qmckl_ao_polynomial_vgl_f(context, X, R, lmax, n, L, ldl, VGL,
return
endif
if (lmax <= 0) then
if (lmax < 0) then
info = QMCKL_INVALID_ARG_4
return
endif