cleaned up progs
fin