#undef PEEK
/*
XOPEN(4,600)
*/