[batuning]

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]

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]

thanks
i need x & y
is just for x