disProg2sts: Convert disProg object to sts and vice versa
Description
A small helper function to convert a disProg object to become
an object of the S4 class sts and vice versa. In the future the
sts should replace the disProg class, but for now this
function allows for conversion between the two formats.