void testRandom() {
        long   i;
        long   x;
        char   ok = 0;  

        selectStream(0);                  /* select the default stream */
        putSeed(1);                       /* and set the state to 1    */
        for(i = 0; i < 10000; i++) {
            random();
        }
        x = getSeed();                      /* get the new state value   */
        if (x == CHECK) {                /* and check for correctness */
            ok = 1;
        }

        selectStream(1);                  /* select stream 1                 */ 
        plantSeeds(1);                    /* set the state of all streams    */
        x = getSeed();                      /* get the state of stream 1       */

        if((ok == 1) && (x == A256)) {          /* x should be the jump multiplier */   
            ok = 1;
        } else {
            ok = 0;
        }

        if (ok == 1) {
            System.out.println("\n The implementation of Lehmer.java is correct.\n\n");
        } else {
            System.out.println("\n ERROR -- the implementation of rngs.c is not correct.\n\n");
        }
    }