<html><head><meta http-equiv="Content-Type" content="text/html charset=utf-8"></head><body style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space;" class="">It should be possible, just to define font in which is character „space“ included:<div class=""><br class=""></div><div class=""><div class="">pair A, B, C, D;</div><div class="">u := 1cm; </div><div class="">A=(0,0); </div><div class="">B=(5u,0); </div><div class="">C=(2u,3u); </div><div class="">D = whatever[A,B] = C + whatever*dir(1/2*angle(A-C)+1/2*angle(B-C)); </div><div class="">draw A--B--C--cycle; </div><div class="">draw C--D; </div><div class="">dotlabel.lft("A",A); </div><div class="">dotlabel.urt("B",B); </div><div class="">dotlabel.top("C",C); </div><div class="">dotlabel.bot (((decimal day) & ". " & (decimal month) & ". " & (decimal year)) infont "ptmr8r",  D);</div><div class="">endfig;</div><div class=""></div></div><div class=""><img height="299" width="603" apple-width="yes" apple-height="yes" apple-inline="yes" id="472FFB62-90AA-4FFE-AC39-DDFF1AAFC02D" src="cid:65EA20E5-FDA4-4A88-9962-463FCD0579F6" class=""><img height="198" width="603" apple-width="yes" apple-height="yes" apple-inline="yes" id="8357ED10-6B9B-48B2-9560-55867547D0DD" src="cid:0A15DFC2-B520-4D0A-96DA-A28C73E80CD5" class=""></div><div class=""><br class=""></div><div class=""><br class=""></div><div class=""><br class=""><div><blockquote type="cite" class=""><div class="">27. 6. 2016 v 11:42, Martin Sluka <<a href="mailto:martinsluka@mac.com" class="">martinsluka@mac.com</a>>:</div><br class="Apple-interchange-newline"><div class=""><div style="font-family: Helvetica; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; orphans: auto; text-align: start; text-indent: 0px; text-transform: none; white-space: normal; widows: auto; word-spacing: 0px; -webkit-text-stroke-width: 0px;" class=""><div class="page" title="Page 66"><div class="layoutArea"><div class="column"><p class=""><span data-mce-style="font-size: 12.000000pt; font-family: 'LMRoman12'; font-weight: bold;" style="font-size: 12pt; font-family: LMRoman12; font-weight: bold;" class=""><a href="https://www.tug.org/docs/metapost/mpman.pdf" class="">https://www.tug.org/docs/metapost/mpman.pdf</a></span></p><p class=""><span data-mce-style="font-size: 12.000000pt; font-family: 'LMRoman12'; font-weight: bold;" style="font-size: 12pt; font-family: LMRoman12; font-weight: bold;" class=""><br data-mce-bogus="1" class=""></span></p><p class=""><span data-mce-style="font-size: 12.000000pt; font-family: 'LMRoman12'; font-weight: bold;" style="font-size: 12pt; font-family: LMRoman12; font-weight: bold;" class="">pge 65.</span></p><p class=""><span data-mce-style="font-size: 12.000000pt; font-family: 'LMRoman12'; font-weight: bold;" style="font-size: 12pt; font-family: LMRoman12; font-weight: bold;" class=""><br data-mce-bogus="1" class=""></span></p><p class=""><span data-mce-style="font-size: 12.000000pt; font-family: 'LMRoman12'; font-weight: bold;" style="font-size: 12pt; font-family: LMRoman12; font-weight: bold;" class="">14.1 Customizing Run-Time Behavior<span class="Apple-converted-space"> </span></span></p><p class=""><span data-mce-style="font-size: 10.000000pt; font-family: 'LMRoman10';" style="font-size: 10pt; font-family: LMRoman10;" class="">MetaPost knows and obeys a number of internal variables that have no direct impact on drawing commands, but can be used to customize the way the MetaPost compiler processes input files. The following paragraphs describe those variables (in no particular order).<span class="Apple-converted-space"> </span></span></p><p class=""><span data-mce-style="font-size: 10.000000pt; font-family: 'LMRoman10'; font-weight: bold;" style="font-size: 10pt; font-family: LMRoman10; font-weight: bold;" class="">Date and Time<span class="Apple-converted-space"> </span></span><span data-mce-style="font-size: 10.000000pt; font-family: 'LMRoman10';" style="font-size: 10pt; font-family: LMRoman10;" class="">MetaPost provides a number of internal numeric variables that store the date and time a job was started, i.e., the MetaPost executable was called on the command-line. Variables<span class="Apple-converted-space"> </span></span><span data-mce-style="font-size: 10.000000pt; font-family: 'LMMono10';" style="font-size: 10pt; font-family: LMMono10;" class="">year</span><span data-mce-style="font-size: 10.000000pt; font-family: 'LMRoman10';" style="font-size: 10pt; font-family: LMRoman10;" class="">,<span class="Apple-converted-space"> </span></span><span data-mce-style="font-size: 10.000000pt; font-family: 'LMMono10';" style="font-size: 10pt; font-family: LMMono10;" class="">month</span><span data-mce-style="font-size: 10.000000pt; font-family: 'LMRoman10';" style="font-size: 10pt; font-family: LMRoman10;" class="">,<span class="Apple-converted-space"> </span></span><span data-mce-style="font-size: 10.000000pt; font-family: 'LMMono10';" style="font-size: 10pt; font-family: LMMono10;" class="">day</span><span data-mce-style="font-size: 10.000000pt; font-family: 'LMRoman10';" style="font-size: 10pt; font-family: LMRoman10;" class="">,<span class="Apple-converted-space"> </span></span><span data-mce-style="font-size: 10.000000pt; font-family: 'LMMono10';" style="font-size: 10pt; font-family: LMMono10;" class="">hour</span><span data-mce-style="font-size: 10.000000pt; font-family: 'LMRoman10';" style="font-size: 10pt; font-family: LMRoman10;" class="">, and<span class="Apple-converted-space"> </span></span><span data-mce-style="font-size: 10.000000pt; font-family: 'LMMono10';" style="font-size: 10pt; font-family: LMMono10;" class="">minute<span class="Apple-converted-space"> </span></span><span data-mce-style="font-size: 10.000000pt; font-family: 'LMRoman10';" style="font-size: 10pt; font-family: LMRoman10;" class="">should be self-explanatory. Variable<span class="Apple-converted-space"> </span></span><span data-mce-style="font-size: 10.000000pt; font-family: 'LMMono10';" style="font-size: 10pt; font-family: LMMono10;" class="">time<span class="Apple-converted-space"> </span></span><span data-mce-style="font-size: 10.000000pt; font-family: 'LMRoman10';" style="font-size: 10pt; font-family: LMRoman10;" class="">returns the number of minutes past midnight, since the job was started, i.e.,<span class="Apple-converted-space"> </span></span><span data-mce-style="font-size: 10.000000pt; font-family: 'LMMono10';" style="font-size: 10pt; font-family: LMMono10;" class="">time<span class="Apple-converted-space"> </span></span><span data-mce-style="font-size: 10.000000pt; font-family: 'LMRoman10';" style="font-size: 10pt; font-family: LMRoman10;" class="">= 60<span class="Apple-converted-space"> </span></span><span data-mce-style="font-size: 10.000000pt; font-family: 'LMMathSymbols10';" style="font-size: 10pt; font-family: LMMathSymbols10;" class="">*<span class="Apple-converted-space"> </span></span><span data-mce-style="font-size: 10.000000pt; font-family: 'LMMono10';" style="font-size: 10pt; font-family: LMMono10;" class="">hour<span class="Apple-converted-space"> </span></span><span data-mce-style="font-size: 10.000000pt; font-family: 'LMRoman10';" style="font-size: 10pt; font-family: LMRoman10;" class="">+<span class="Apple-converted-space"> </span></span><span data-mce-style="font-size: 10.000000pt; font-family: 'LMMono10';" style="font-size: 10pt; font-family: LMMono10;" class="">minute</span><span data-mce-style="font-size: 10.000000pt; font-family: 'LMRoman10';" style="font-size: 10pt; font-family: LMRoman10;" class="">.</span></p><p class=""><span data-mce-style="font-size: 10.000000pt; font-family: 'LMRoman10';" style="font-size: 10pt; font-family: LMRoman10;" class=""><br data-mce-bogus="1" class=""></span></p><p class=""><span data-mce-style="font-size: 10.000000pt; font-family: 'LMRoman10';" style="font-size: 10pt; font-family: LMRoman10;" class="">m.</span></p></div></div></div></div><div style="font-family: Helvetica; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; orphans: auto; text-align: start; text-indent: 0px; text-transform: none; white-space: normal; widows: auto; word-spacing: 0px; -webkit-text-stroke-width: 0px;" class=""><br class="">On Jun 27, 2016, at 11:15 AM, Bruce <<a href="mailto:bruce@tomo.co.nz" class="">bruce@tomo.co.nz</a>> wrote:<br class=""><br class=""></div><div style="font-family: Helvetica; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; orphans: auto; text-align: start; text-indent: 0px; text-transform: none; white-space: normal; widows: auto; word-spacing: 0px; -webkit-text-stroke-width: 0px;" class=""><blockquote type="cite" class=""><div class="msg-quote" lang="EN-US" link="blue" vlink="purple"><div class="Section1" style="page: Section1;"><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Arial" data-mce-style="color: navy; font-family: Arial; font-size: small;" style="color: navy; font-family: Arial; font-size: small;" class=""><span data-mce-style="font-size: 10.0pt; font-family: Arial; color: navy;" style="font-size: 10pt; font-family: Arial; color: navy;" class="">Dirk</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Arial" data-mce-style="color: navy; font-family: Arial; font-size: small;" style="color: navy; font-family: Arial; font-size: small;" class=""><span data-mce-style="font-size: 10.0pt; font-family: Arial; color: navy;" style="font-size: 10pt; font-family: Arial; color: navy;" class="">I have posted this on the wiki, but not tested.</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Arial" data-mce-style="color: navy; font-family: Arial; font-size: small;" style="color: navy; font-family: Arial; font-size: small;" class=""><span data-mce-style="font-size: 10.0pt; font-family: Arial; color: navy;" style="font-size: 10pt; font-family: Arial; color: navy;" class=""><a href="http://therion.speleo.sk/wiki/doku.php/metapost#special_symbol_examples" data-mce-href="http://therion.speleo.sk/wiki/doku.php/metapost#special_symbol_examples" style="color: purple; text-decoration: underline;" class="">http://therion.speleo.sk/wiki/doku.php/metapost#special_symbol_examples</a></span></span></div><p class="MsoNormal" style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';"><span size="2" face="Arial" data-mce-style="color: navy; font-family: Arial; font-size: small;" style="color: navy; font-family: Arial; font-size: small;" class=""><span data-mce-style="font-size: 10.0pt; font-family: Arial; color: navy;" style="font-size: 10pt; font-family: Arial; color: navy;" class=""> </span></span></p><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Arial" data-mce-style="color: navy; font-family: Arial; font-size: small;" style="color: navy; font-family: Arial; font-size: small;" class=""><span data-mce-style="font-size: 10.0pt; font-family: Arial; color: navy;" style="font-size: 10pt; font-family: Arial; color: navy;" class="">Bruce</span></span></div><p class="MsoNormal" style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';"><span size="2" face="Arial" data-mce-style="color: navy; font-family: Arial; font-size: small;" style="color: navy; font-family: Arial; font-size: small;" class=""><span data-mce-style="font-size: 10.0pt; font-family: Arial; color: navy;" style="font-size: 10pt; font-family: Arial; color: navy;" class=""> </span></span></p><div class=""><div class="MsoNormal" align="center" data-mce-style="text-align: center;" style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman'; text-align: center;"><span size="3" face="Times New Roman" data-mce-style="font-family: 'Times New Roman'; font-size: medium;" style="font-family: 'Times New Roman'; font-size: 12px;" class=""><span data-mce-style="font-size: 12.0pt;" style="font-size: 12pt;" class=""><hr size="2" width="100%" align="center" class=""></span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><b class=""><span size="2" face="Tahoma" data-mce-style="font-family: Tahoma; font-size: small;" style="font-family: Tahoma; font-size: small;" class=""><span data-mce-style="font-size: 10.0pt; font-family: Tahoma; font-weight: bold;" style="font-size: 10pt; font-family: Tahoma; font-weight: bold;" class="">From:</span></span></b><span size="2" face="Tahoma" data-mce-style="font-family: Tahoma; font-size: small;" style="font-family: Tahoma; font-size: small;" class=""><span data-mce-style="font-size: 10.0pt; font-family: Tahoma;" style="font-size: 10pt; font-family: Tahoma;" class=""><span class="Apple-converted-space"> </span>Dirk Peinelt [<a href="mailto:dirk.peinelt@t-online.de" class="">mailto:dirk.peinelt@t-online.de</a>]<span class="Apple-converted-space"> </span><br class=""><b class=""><span data-mce-style="font-weight: bold;" style="font-weight: bold;" class="">Sent:</span></b><span class="Apple-converted-space"> </span>Thursday, 9 June 2016 7:35 a.m.<br class=""><b class=""><span data-mce-style="font-weight: bold;" style="font-weight: bold;" class="">To:</span></b><span class="Apple-converted-space"> </span>'Martin Sluka'; Bruce Mutton<br class=""><b class=""><span data-mce-style="font-weight: bold;" style="font-weight: bold;" class="">Subject:</span></b><span class="Apple-converted-space"> </span>AW: [Therion] Therion Digest, Vol 126, Issue 7</span></span></div></div><p class="MsoNormal" style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';"><span size="3" face="Times New Roman" data-mce-style="font-family: 'Times New Roman'; font-size: medium;" style="font-family: 'Times New Roman'; font-size: 12px;" class=""><span data-mce-style="font-size: 12.0pt;" style="font-size: 12pt;" class=""> </span></span></p><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">Hi Martin, Bruce,</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">the definition may be published to the wiki.<span class="Apple-converted-space"> </span></span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">I’dont know if the code is effective. (I’ve not used the A-D Pens.)</span></span></div><p class="MsoNormal" style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';"><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class=""> </span></span></p><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">I combine this compass rose with a creation date in the map-header (/currentdate).</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">A date variable is not present in metapost.</span></span></div><p class="MsoNormal" style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';"><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class=""> </span></span></p><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">If the CS is not set, the declination is Zero.</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">Also if the declination is Zero, the northarrow is a Nmag arrow:</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">North grid/true rotate the whole plan with the north arrow. (merid. Conv.?)</span></span></div><p class="MsoNormal" style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';"><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class=""> </span></span></p><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">A small change… (I hope i am not mistaken.)</span></span></div><p class="MsoNormal" style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';"><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class=""> </span></span></p><p class="MsoNormal" style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';"><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class=""> </span></span></p><p class="MsoNormal" style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';"><span size="3" face="Times New Roman" data-mce-style="font-family: 'Times New Roman'; font-size: medium;" style="font-family: 'Times New Roman'; font-size: 12px;" class=""><span lang="DE" data-mce-style="font-size: 12.0pt;" style="font-size: 12pt;" class=""></span></span></p><div class=""><span size="3" face="Times New Roman" data-mce-style="font-family: 'Times New Roman'; font-size: medium;" style="font-family: 'Times New Roman'; font-size: inherit;" class=""><image001.jpg></span></div><div class=""><span size="3" face="Times New Roman" data-mce-style="font-family: 'Times New Roman'; font-size: medium;" style="font-family: 'Times New Roman'; font-size: inherit;" class=""><image003.jpg></span></div><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class=""></span></span><div class=""><br class="webkit-block-placeholder"></div><p class="MsoNormal" style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';"><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class=""> </span></span></p><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">def s_northarrow (expr rot) =</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">              valscal=1.2; % scale your north arrow here</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">              decl:=MagDecl;<span class="Apple-converted-space"> </span></span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">              T:=identity;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">              picture tmp_pic;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">              tmp_pic = image (</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            pickup pencircle scaled .3;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            thfill fullcircle scaled 4cm withcolor 1white;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            thdraw fullcircle scaled 3.1cm;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            thdraw fullcircle scaled 4.05cm;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            pickup pencircle scaled .1;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            thdraw fullcircle scaled 3cm;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            thdraw fullcircle scaled 4cm;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            pickup pencircle scaled .2;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            thdraw (dir(45)*2.025cm)--(dir(45)*3.7cm);</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            thdraw (dir(135)*2.025cm)--(dir(135)*3.7cm);</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            thdraw (dir(225)*2.025cm)--(dir(225)*3.7cm);</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            thdraw (dir(315)*2.025cm)--(dir(315)*3.7cm);</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            pickup pencircle scaled .1;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            for whereto=0 step 15 until 345:</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                              thdraw dir(whereto)*.65cm--dir(whereto)*.9cm;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                              thdraw dir(whereto)*1.4cm--dir(whereto)*1.5cm;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            endfor;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            for whereto=0 step 5 until 355:</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                              thdraw dir(whereto)*.65cm--dir(whereto)*.8cm;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                              thdraw dir(whereto)*1.45cm--dir(whereto)*1.5cm;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            endfor;<span class="Apple-converted-space"> </span></span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            for whereto=0 step 1 until 359:</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                              thdraw dir(whereto)*1.94cm--dir(whereto)*2cm;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            endfor;<span class="Apple-converted-space"> </span></span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            pickup pencircle scaled 1;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            thdraw fullcircle scaled 1cm;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            thdraw fullcircle scaled 1.1cm;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            thdraw fullcircle scaled 1.3cm withpen pencircle scaled .3;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            vald=90-decl;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            texrot=0-decl;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            drawarrow(dir(vald)*-2cm--dir(vald)*2cm) withpen pencircle scaled .2;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                           <span class="Apple-converted-space"> </span><span data-mce-style="color: red;" style="color: red;" class=""><span data-mce-style="color: red;" style="color: red;" class="">if (MagDecl <> 0):<span class="Apple-converted-space"> </span></span></span>thdraw image(label.top(btex $mg$ etex, (0,0)) scaled .5 rotated texrot;) shifted (dir(vald)*2.04cm);<span class="Apple-converted-space"> </span><span data-mce-style="color: red;" style="color: red;" class=""><span data-mce-style="color: red;" style="color: red;" class="">fi;</span></span>                                              <span class="Apple-converted-space"> </span></span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            thfill (1.06cm,1.06cm)--(0,.2cm)--(-1.06cm,1.06cm)--(-.2cm,0)--(-1.06cm,-1.06cm)--(0,-.2cm)--(1.06cm,-1.06cm)--(.2cm,0)--cycle;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            thfill (-.2cm,.2cm)--(0,2cm)--(0,0)--cycle;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            thfill (.2cm,-.2cm)--(0,-2cm)--(0,0)--cycle;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            thfill (.2cm,.2cm)--(2cm,0)--(0,0)--cycle;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            thfill (-.2cm,-.2cm)--(-2cm,0)--(0,0)--cycle;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            thfill (.2cm,.2cm)--(-0,2cm)--(0,0)--cycle withcolor 1white;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            thfill (.2cm,-.2cm)--(2cm,0)--(0,0)--cycle withcolor 1white;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            thfill (-.2cm,-.2cm)--(0,-2cm)--(0,0)--cycle withcolor 1white;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            thfill (-.2cm,.2cm)--(-2cm,0)--(0,0)--cycle withcolor 1white;                                    <span class="Apple-converted-space"> </span></span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            pickup pencircle scaled .2;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            thdraw (-.2cm,.2cm)--(0,2cm)--(.2cm,.2cm)--(2cm,0cm)--(.2cm,-.2cm)--(0,-2cm)--(-.2cm,-.2cm)--(-2cm,0)--cycle;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            thfill fullcircle scaled .56cm withcolor 1white;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            pickup pencircle scaled .1;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            thdraw (.28cm,0)..(0,.28cm)..(-.28cm,0)..(0,-.28cm)..cycle;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            pickup pencircle scaled .4;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            thdraw (.2cm,0)..(0,.2cm)..(-.2cm,0)..(0,-.2cm)..cycle;</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                           <span class="Apple-converted-space"> </span><span data-mce-style="color: red;" style="color: red;" class=""><span data-mce-style="color: red;" style="color: red;" class="">if (MagDecl = 0): label.bot(btex $Nmag$ etex, (0,2.6cm)); else:<span class="Apple-converted-space"> </span></span></span>label.bot(btex $N$ etex, (0,2.6cm));<span class="Apple-converted-space"> </span><span data-mce-style="color: red;" style="color: red;" class=""><span data-mce-style="color: red;" style="color: red;" class="">fi;</span></span></span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            label.lft(btex $E$ etex, (2.6cm,0));</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            label.rt(btex $W$ etex, (-2.6cm,0));</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">                            label.top(btex $S$ etex, (0,-2.6cm));</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">              );</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">              thdraw tmp_pic scaled valscal rotatedaround(origin, -rot);</span></span></div><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">enddef;</span></span></div><p class="MsoNormal" style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';"><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class=""> </span></span></p><p class="MsoNormal" style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';"><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class=""> </span></span></p><div style="margin: 0cm 0cm 0.0001pt; font-size: 12pt; font-family: 'Times New Roman';" class=""><span size="2" face="Calibri" data-mce-style="font-family: Calibri; font-size: small;" style="font-family: Calibri; font-size: small;" class=""><span lang="DE" data-mce-style="font-size: 11.0pt; font-family: Calibri;" style="font-size: 11pt; font-family: Calibri;" class="">//dirk</span></span></div></div><div class="_stretch"><span class="body-text-content">_______________________________________________<br class="">Therion mailing list<br class=""><a href="mailto:Therion@speleo.sk" data-mce-href="mailto:Therion@speleo.sk" style="color: purple; text-decoration: underline;" class="">Therion@speleo.sk</a><br class=""><a href="http://mailman.speleo.sk/mailman/listinfo/therion" data-mce-href="http://mailman.speleo.sk/mailman/listinfo/therion" style="color: purple; text-decoration: underline;" class="">http://mailman.speleo.sk/mailman/listinfo/therion</a><br class=""></span></div><div class=""><image001.jpg></div><div class=""><image003.jpg></div></div></blockquote></div><span style="font-family: Helvetica; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; orphans: auto; text-align: start; text-indent: 0px; text-transform: none; white-space: normal; widows: auto; word-spacing: 0px; -webkit-text-stroke-width: 0px; float: none; display: inline !important;" class="">_______________________________________________</span><br style="font-family: Helvetica; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; orphans: auto; text-align: start; text-indent: 0px; text-transform: none; white-space: normal; widows: auto; word-spacing: 0px; -webkit-text-stroke-width: 0px;" class=""><span style="font-family: Helvetica; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; orphans: auto; text-align: start; text-indent: 0px; text-transform: none; white-space: normal; widows: auto; word-spacing: 0px; -webkit-text-stroke-width: 0px; float: none; display: inline !important;" class="">Therion mailing list</span><br style="font-family: Helvetica; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; orphans: auto; text-align: start; text-indent: 0px; text-transform: none; white-space: normal; widows: auto; word-spacing: 0px; -webkit-text-stroke-width: 0px;" class=""><a href="mailto:Therion@speleo.sk" style="font-family: Helvetica; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; orphans: auto; text-align: start; text-indent: 0px; text-transform: none; white-space: normal; widows: auto; word-spacing: 0px; -webkit-text-stroke-width: 0px;" class="">Therion@speleo.sk</a><br style="font-family: Helvetica; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; orphans: auto; text-align: start; text-indent: 0px; text-transform: none; white-space: normal; widows: auto; word-spacing: 0px; -webkit-text-stroke-width: 0px;" class=""><a href="http://mailman.speleo.sk/mailman/listinfo/therion" style="font-family: Helvetica; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; orphans: auto; text-align: start; text-indent: 0px; text-transform: none; white-space: normal; widows: auto; word-spacing: 0px; -webkit-text-stroke-width: 0px;" class="">http://mailman.speleo.sk/mailman/listinfo/therion</a></div></blockquote></div><br class=""></div></body></html>