example of use of ranlux in Fortran