(loop(format t"~D "(- 180(mod(-(read)(read)180)360))))