Re: Fortran, no RAN ?

On 17/6/24 03:54, Arne Vajhøj wrote:

On 6/16/2024 12:22 PM, Michael Brown wrote:

I've been building MTREK, written in fortran, on my community edition and it compiles fine but complains of no RAN function at link time.

 VMS Fortran got both RAN and the standard RANDOM_NUMBER:
 

That example was very reassuring when it compiled and ran, so I looked more carefully at my compiler warnings compiling MTREK...
           RNDOM = RAN(I1, I2)
..................^
%F90-W-WARNING, The number of arguments is incompatible with intrinsic procedure, assume 'external'.   [RAN]
at line number 67 in file SYS$SYSDEVICE:[MBROWN.DEVS.MTREK]mtrekini.for;4
and it is telling me the problem, assumed external because of too many parameters, then it tries to link some external name RAN which isn't there. I can understand this.
But the question now is why RAN(I1, I2) works on the VAX compiler,and not on the X86_64 compiler. And what is it doing with those 2 parameters on the VAX so I can simulate it somehow.
--
House Harris Software.
Making the world a safer place for our products.
https://eisner.decus.org/~brown_mi