euler/e121.c