Update BasisFnc.cpp

s-type basis function, inner loop
working on:
dynamic allocation, outher loop (\chi)