The & Operator
Arguments in Fortran are always passed by reference
(Just like in Perl)
That means that the Fortran call FOO(X) passes the address of X
Of course, the receiving side doesn't see the address
Instead, the formal parameter is temporarily aliased to X
Just like in Perl:
foo($x);
sub foo {
# $_[0] is temporarily aliased to $x
}