最近用fortran编写最小二乘曲线模拟程序，一直出现问题

燕雨蔷薇

第五行，只是定义它是“可以”分配的，然而并没有分配。
应该像 15 行，对 X Y 分配那样，同样的对 a 进行分配。