Fortran 程序错误

Fortran 程序错误 program gyyimplicit nonereal*8 t,d,l,c,k,f,f1write(*,*) "请输入周期T与水深d,中间用逗号连接."read(*,*)t,dl=(9.8*t**2)/(2*3.1415926)7 f=l-(9.8*(t**2)*TANH(2*3.1415926*d/l))/(2*3.1415926)f1=1+9.8*t**2/((l**2)*(COSH(2*3.1415926*d/l))**2)if(f