slight addition to test program