modified pol.c