GOTOが原因かははっきりしないが
気象に関してはどうしようもないからGOTO減らすしかないんじゃないの