source constructor for Program working