blob: b173dce6fbd77cd5aec17803a1c61ada0be64c1c (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
#!/usr/bin/env bash
# Esoteric random number generator
# <http://dilbert.com/strip/2001-10-25>
# Apply algorithm
for ((seed = RANDOM ** 2, i = 0; i < ${#seed}; i++)) ; do
((sum += ${seed:i:1}))
done
for ((red = seed - sum; ${#red} > 1; red = redn)) ; do
for ((j = 0, redn = 0; j < ${#red}; j++)) ; do
((redn += ${red:j:1}))
done
done
# Print result
printf '%u\n' "$red"
|
