Two simple progs