1 #include "isajet/pilot.h"
2 SUBROUTINE RANFST(SEED)
4 C Set seed for RANF() from real or double precision SEED
6 #if defined(CERNLIB_IMPNONE)
9 #if defined(CERNLIB_SINGLE)
12 #if defined(CERNLIB_DOUBLE)
15 #if defined(CERNLIB_RANFCALL)
18 #if defined(CERNLIB_CRAY)