real function F(x,y,m,n) implicit none real::x,y,pi integer :: m,n PI=4.d0*ATAN(1.d0) F = exp((0.d0,-1.d0)*(2.d0*pi*x/m+2.d0*pi*y/ ...
Botton 发表于 2020-11-18 09:35 能具体讲一下么
风平老涡 发表于 2020-11-18 04:53 x1, y1在调用 F 前没有赋值。
捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )
GMT+8, 2024-5-3 16:45
Powered by Tencent X3.4
© 2013-2024 Tencent