Question

This is something that’s I’ve wanted to know recently, mostly out of curiousity. I’m in the mood to learn some old coding styles, and FORTRAN seems like a good place to start.

I guess I should help you guys out by providing a good starting point.
So how would this C procedure be written in FORTRAN?

int foo ( int x , int y )
{
    int tempX = x ;
    x += y / 2 ;
    y -= tempX * 3 ;    // tempX holds x's original value.
    return x * y ;
}

I know the entire function could be a single line:

return ( x + ( y / 2 ) ) * ( y - ( x * 3 ) ) ;

But the point of me asking this question is to see how those four statements would be written individually in FORTRAN, not neccessarily combined into a single statement.

Answer 1

Where do you learn FORTRAN from? Just take a look at the wikibooks!

Derived from the example, I’d say:

function func(x, y) result(r)
   integer, intent(in) :: x, y 
   integer             :: r 
   integer             :: tempX
   tempX = x
   x = x / 2
   y = y - tempX * 3
   r = x * y
end function foo