{VERSION 6 0 "IBM INTEL LINUX" "6.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 }}
{SECT 0 {EXCHG {PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT 
-1 14 "PolarA17.mws\n\n" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "restart;" }}}{EXCHG {PARA 0 "" 0 "" 
{TEXT -1 66 "#########################################################
#########" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 34 "f := sin;     \+
    ##  r = f(theta)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 40 "trg
 := 0..Pi;     ##  parameter interval" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 42 "plot([f(t), t, t=trg]);  ## Cartesian Plot" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 34 "plot([f(t),t,t=trg],coords=p
olar);" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 64 "#######################
#########################################" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 38 "f := t  -> sin(4*t);  ##  r = f(theta)" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 44 "trg := 0..2*Pi;       ##  parameter
 interval" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 40 "plot([f(t),t,t
=trg]); ##  Cartesian plot" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
34 "plot([f(t),t,t=trg],coords=polar);" }}}{EXCHG {PARA 0 "" 0 "" 
{TEXT -1 63 "#########################################################
######" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 42 "f := t  -> 1 + 2*
cos(t/2);  ##  Problem 46" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
44 "trg := 0..4*Pi;       ##  parameter interval" }}}{EXCHG {PARA 0 ">
 " 0 "" {MPLTEXT 1 0 34 "plot([f(t),t,t=trg],coords=polar);" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 55 "############################
###########################" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
0 "" }}}}{MARK "18" 0 }{VIEWOPTS 1 1 0 3 2 1804 1 1 1 1 }{PAGENUMBERS 
0 1 2 33 1 1 }