-
Notifications
You must be signed in to change notification settings - Fork 8
/
Copy pathpi.mws
15 lines (15 loc) · 955 Bytes
/
pi.mws
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
{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 }{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0
0 0 0 0 0 0 0 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Text Ou
tput" -1 2 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 0 0 0 0 0 1 3
0 3 0 }1 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "" 2 6 1 {CSTYLE ""
-1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 2 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0
-1 0 }}
{SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "read(\"est_pi.mpl\")
:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "est_pi(100000):" }}
{PARA 6 "" 1 "" {TEXT -1 36 " Estimating Pi using: 100000 slices" }}
{PARA 6 "" 1 "" {TEXT -1 41 "Estimated value of Pi: 3.141592648 \+
" }}{PARA 6 "" 1 "" {TEXT -1 40 " Elapsed time(s): .703 \+
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "2 0 0"
0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }