Re: Fortran, no RAN ?

On 18/6/24 09:46, Arne Vajhøj wrote:

On 6/17/2024 6:12 PM, Arne Vajhøj wrote:

On 6/17/2024 12:09 AM, Michael Brown wrote:

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.

>
Are you sure that it is intrinsic and not something picked
up from some library?
>
What type is RNDOM? Default REAL*4? Or Integer*4?
>
If INTEGER*4 then my guess would be that:
>
RAN(I1, I2)
>
is:
>
RAN_INT_IN_INTERVAL(LOW_BOUND, HIGH_BOUND)

 Example:
 $ typ ranfun2.for

<insert code here......>

       end
 Arne
 

That was extremely useful code,  I think RNDOM is integer, certainly the ran2arg function compiled into it without complaint, and there is no RAN funcion defined in any or the code. I don't know why the RAN with 2 args works n the VAX.
Alas as far as porting mtrek is concerned that just led to another problem. seems the  the call ERRSET doesn't seem to work(undefined symbol at link time) under the X86 fortran.
But I think I am very close.
--
House Harris Software.
Making the world a safer place for our products.
https://eisner.decus.org/~brown_mi