Hi,
I'd like to ask a style question. As far as I know there are two
ways to define a function. Is the 2) a better way than 1)?
Richard
1)
real function test(a)
real, intent(in) :: a
a=a+1
test=a
end function test
2)
function test(a)result(b)
real, intent(in) :: a
real :: b
b=a+1
end function test
|