Help, my code is not working

I am trying to run code in summer project. I asked a friend to run in his Mac with gforttan. Its works fine. When I tried to run using PLATO, it doesn't give me anything. Somebody can help me?

BTW, I am beginner of FORTRAN and no way to solve this problem other than ask my friend to let his computer to use it 😢

Code is very long to type here. I can email to anyone