testprogram works