diff options
author | Karl Berry <karl@freefriends.org> | 2013-08-04 23:27:56 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2013-08-04 23:27:56 +0000 |
commit | 45685e2c30714eae1fb1e722a26ca3d24b2f679e (patch) | |
tree | 34e73fd5f0b271a853a975e9b0afb91a1daf0715 /Master/texmf-dist/doc/metapost/featpost/example/tdcircarrow.mp | |
parent | e2b5fb5b3af29ba822d3c923b88353508331b8e7 (diff) |
featpost
git-svn-id: svn://tug.org/texlive/trunk@31346 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/doc/metapost/featpost/example/tdcircarrow.mp')
-rw-r--r-- | Master/texmf-dist/doc/metapost/featpost/example/tdcircarrow.mp | 29 |
1 files changed, 29 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/metapost/featpost/example/tdcircarrow.mp b/Master/texmf-dist/doc/metapost/featpost/example/tdcircarrow.mp new file mode 100644 index 00000000000..41e35a9dc8d --- /dev/null +++ b/Master/texmf-dist/doc/metapost/featpost/example/tdcircarrow.mp @@ -0,0 +1,29 @@ +% tdcircarrow.mp +% L. Nobre G. +% 2012 + +input featpost3Dplus2D; + +f := (3,5,2); +Spread := 200; +TDAtiplen := 0.06; +TDAhalftipbase := 0.04; +TDAhalfthick := 0.025; + +beginfig(1); + setthearena(11,1); + numeric i, begsum, amp, margi; + margi = 6; + begsum = 0; + amp = 36; + for i=1 upto 4: + tdcircarrow( black, blue, 0.6, begsum, amp-margi ); + begsum := begsum+amp; + amp := 36*(i+1); + endfor; + tdarrow(black,0.6*ncrossprod( -f, blue )); + tdarrow(black,0.6*ncrossprod( ccrossprod( -f, blue ), blue )); +endfig; + +end. +
\ No newline at end of file |