[FORTRAN] IF-loop, FIX[] en FLT[] statements

[El_kingo]

Dag allen,

Ik hoop dat hier nog een paar FORTRAN guru's rondlopen aangezien ik niet uit een stuk FORTRAN code kom wat ik om wil hebben gezet.

het gaat om het volgende:

code:

IF[P(I)-RANDM] 18,16,16

mijn vraag is waar staan de 18, 16 en 16 voor. Voor regelnummers (labels) ja dat klopt, maar wanneer wordt welke uitgevoerd, mijn gok is: 18 als true, 16 als false en dan de laatste 16?

2^de en 3^de probleem:

code:

i = i + FIX(epsil*a)
iset(n) = FLT[j-iset(n)]

wat doen deze 2 statements (FIX en FLT)

Ik hoop dat iemand hier antwoord op heeft, Google geeft voor deze vorm van if-loop geen voorbeelden vandaar mijn vraag hier.

[El_kingo]

_{Klein bescheiden kickje richting top, is er echt niemand die hier meer over weet??}