modified vbpsol