{VERSION 5 0 "IBM INTEL NT" "5.0" }
{USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 
1 0 0 0 0 1 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 
0 0 1 }{CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 0 0 0 1 }
{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 
2 2 1 1 1 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Output" -1 
11 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }3 3 0 
0 0 0 1 0 1 0 2 2 0 1 }}
{SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 1 "#" }}}{EXCHG {PARA 0 
"> " 0 "" {MPLTEXT 1 0 65 "# Zufallszahlengenerator von Marsaglia (199
4), vgl. STATA, S. 122" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 1 "#
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "m1:=2^32;" }}{PARA 11 "
" 1 "" {XPPMATH 20 "6#>%#m1G\"+'Hn\\H%" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 11 "m2:=2^32-1;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#m2G
\"+&Hn\\H%" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "m3:=65184*2^1
5-1;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#m3G\"+6$\\f8#" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "m4:=63663*2^15-1;" }}{PARA 11 "" 1 
"" {XPPMATH 20 "6#>%#m4G\"+$=4h3#" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 12 "ifactor(m1);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#*$)-%
!G6#\"\"#\"#K\"\"\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "ifac
tor(m2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#*,-%!G6#\"\"$\"\"\"-F%6#\"
\"&F(-F%6#\"#<F(-F%6#\"$d#F(-F%6#\"&Pb'F(" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 12 "ifactor(m3);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%!
G6#\"+6$\\f8#" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "ifactor(m4
);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%!G6#\"+$=4h3#" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "lcm(m1,m2,m3,m4);" }}{PARA 11 "" 1 
"" {XPPMATH 20 "6#\"GgT_UY89(R<\\??J3_V&>#)" }}}{EXCHG {PARA 0 "> " 0 
"" {MPLTEXT 1 0 6 "%*1.0;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+@Na>#
)\"#G" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 6 "2^126;" }}{PARA 11 
"" 1 "" {XPPMATH 20 "6#\"GkG0Uz&=lVe'ehM-t\"fq])" }}}{EXCHG {PARA 0 ">
 " 0 "" {MPLTEXT 1 0 6 "%*1.0;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#$\"+
t\"fq])\"#G" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "# Hat G1 vol
le Periode m1=2^32?" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "m1:=2
^32;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#m1G\"+'Hn\\H%" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "a1:=69069;" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%#a1G\"&p!p" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
12 "c1:=1234567;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#c1G\"(nXB\"" }}
}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "gcd(6,9);" }}{PARA 11 "" 1 "
" {XPPMATH 20 "6#\"\"$" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 11 "g
cd(c1,m1);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"\"" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 9 "b1:=a1-1;" }}{PARA 11 "" 1 "" {XPPMATH 20 
"6#>%#b1G\"&o!p" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 5 "b1/4;" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#\"&ns\"" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 65 "# Satz A von Knuth i.O., d.h. der Generator G1 hat vo
lle Periode!" }}}}{MARK "23 0 0" 65 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 
}{PAGENUMBERS 0 1 2 33 1 1 }