Name

---

      SCRAMBLE

Purpose

---

      Scrambles an array or returns an array scrambled indices.

Category

---

Calling Sequence

---

      r = scramble(in)

Inputs

---

      in = array to scramble. in
        If in is a scalar integer then an array of
        indices from 0 to in-1 is returned in scrambled form.

Keyword Parameters

---

Outputs

---

      r = scrambled values returned. out

Common Blocks

---

      scramble_com

Notes

---

Modification History

---

      Written by R. Sterner, 17 Dec, 1984.
      RES 10 Feb, 1987 --- allowed arrays.
      R. Sterner, 1999 Jun 9 --- Upgraded to long ints.
      Johns Hopkins University Applied Physics Laboratory.
  Copyright (C) 1984, Johns Hopkins University/Applied Physics Laboratory
  This software may be used, copied, or redistributed as long as it is not
  sold and this copyright notice is reproduced on each copy made. This
  routine is provided as is without any express or implied warranties
  whatsoever. Other limitations apply as described in the file disclaimer.txt.