Internal functions
Gproduct(f,Dw,G0) controls_dbplsr(distance,weights,ncomp,y)
Not to be called by users
Useful links