第一次编这么长的程序，还不知道并列的SUBROUTINE之间是否可以这样调用。
程序已经编译，无错误，但是不能出out1.dat。
马上要交作业吖，做出数据才能分析，很头疼吖。
希望大家能帮我看看...

[em10][em10][em10]