:error#6784:the number of actual arguments cannot be greater than the number of dummy arguments
错误 6784号 实参个数,不能比形参(虚参)多 。
虽然如此,这里的代码的错误其实是call centbound(i,j,ndir,z_R,qx_R,qy_R,qc_R); zb_R=zbp
多了各分号;
fortran 语句应该不能使用分好的吧!
错误提示好像是你的定义的变量大小与你赋予变量数值的大小不一样,超出了范围 ,双击一下 看看是哪一行
1.确保所有实参已经被定义为双精度。
2.看一下错误提示,错误发生在哪一行?你确定你给出了错误行么?