Re: Doubt about formula transcription

"Leonardo Marques" <surf3r0@[EMAIL PROTECTED]
> wrote in message
news:9c4bdee7-084e-4644-8b90-74cbef524878@[EMAIL PROTECTED]
> hey guys,
>
> im with a little problem when im transcripting a math formula from
> maple to fortran, because when i put a solution on the equation, i got
> a result diferent from zero.
>
> The formula is: 2*arctan(sin(a)*cos(a)/(.8-cos(a)^2))-4/9*Pi ;
> I've transcripted to fortran as: 2*atan((sin(a)*cos(a))/(0.8-
> cos(a)**2))-((pi)*4/9)
>
> There's correct?!
> a piece of my code:

You need the statement IMPLICIT NONE after the FUNCTION statement
(and in all other procedures).

That will reveal errors of the kind that you made in the code.