VMS rand: assign before check, not the other way around