modify : brush up #7 program