%* ------------------------------------------- %* mathsPIC 2.1 %* Copyright (c) RWD Nickalls 1999-2000 %* Email: dicknickalls@compuserve.com %* Date (m/d/y) : 11-05-2000 21:05:21 %* Command Line: /b/s MPICM09.M %* Input Filename: MPICM09.M %* Output Filename: MPICM09.MT %* ------------------------------------------- %% mPICm09.m (figure 9) %% mathsPIC (4 circles figure) %\documentclass[a4paper]{article} %\usepackage{pictexwd} %\begin{document} %%------------------- \beginpicture %% paper{units(mm),xrange(0,70),yrange(0,60)} % \setcoordinatesystem units < 1mm, 1mm> \setplotarea x from 0 to 70, y from 0 to 60 %% point(A){30,11}[circle,8] ( 30 , 11 ) %% point(B){A,shift(-10,30)}[circle,15] ( 20 , 41 ) %% big circle %% point(C){A,polar(30,20deg)}[circle,5] ( 58.19078 , 21.2606 ) %% point(D){A,polar(45,50deg)}[circle,7] ( 58.92544 , 45.472 ) %% drawPoints(ABCD) \circulararc 360 degrees from 38 11 center at 30 11 \circulararc 360 degrees from 35 41 center at 20 41 \circulararc 360 degrees from 63.19078 21.2606 center at 58.19078 21.2606 \circulararc 360 degrees from 65.92545 45.472 center at 58.92544 45.472 %% drawLines(AB,AC,BC,BD,CD) \plot 27.47018 18.58947 24.74342 26.76975 / %% AB \plot 37.51754 13.73616 53.49232 19.5505 / %% AC \plot 33.32532 34.11264 53.74901 23.55639 / %% BC \plot 34.90198 42.71203 51.97118 44.67305 / %% BD \plot 58.34243 26.2583 58.71313 38.47522 / %% CD \setdashes %% drawLine(AD) \plot 35.1423 17.12836 54.42593 40.10969 / %% AD %% text($A$){A} \put {$A$} at 30 11 %% use a macro for the formula \newcommand{\formula}{% $\displaystyle \sum_{p\ge0} \Delta_{jp} z^{(p+1)}$% }% %% text(\formula){B} \put {\formula} at 20 41 %% text($C$){C} \put {$C$} at 58.19078 21.2606 %% text($D$){D} \put {$D$} at 58.92544 45.472 \endpicture %%------------------ %\end{document}