CFD Online Discussion Forums

CFD Online Discussion Forums (https://www.cfd-online.com/Forums/)
-   Main CFD Forum (https://www.cfd-online.com/Forums/main/)
-   -   pls, run my complete code (https://www.cfd-online.com/Forums/main/194512-pls-run-my-complete-code.html)

batuning October 17, 2017 13:11

just an Erorr ,,, complete airfoil code
 
Hi
i have a full code .but have a small matter


" warning "

code and compiler online :
https://www.tutorialspoint.com/compi...ran_online.php

naffrancois October 18, 2017 02:50

Loop index variable has type real. This is a deprecated fortran feature. Consider rewritting these blocks using integer variables.

As you do not use the implicit none statement, fortran will interpret all variables which do not start by i,j,k,l,m,n as real numbers. I strongly recommend using the implicit none statement in your program preambule and then declare explicitly all your variables types.

ex: you would want to replace this:

do o=0.,2*pi,step
x=xm*cos(delta)+a*cos(o)
end do

by something like

program test
implicit none
integer :: i,imax
real :: o,pi,step

imax=10
pi=4.0*ACOS(-1.0)
step = (2*pi)/(imax-1)
do i=1,imax
o=(i-1)*step
print*,cos(REAL(i))
end do

end program test

batuning October 19, 2017 12:46

thanks
i need x & y
is just for x


All times are GMT -4. The time now is 21:36.