diff options
author | Karl Berry <karl@freefriends.org> | 2010-09-12 23:03:48 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2010-09-12 23:03:48 +0000 |
commit | 14889c6d7bd31fd163f9cb123c8ba772769d176b (patch) | |
tree | 87daf844b7fc365e2a328b7f6b39632e5aa68f94 /Master/texmf-dist/metapost/metauml/metauml_component_relations.mp | |
parent | 2468fdd0a97481e170ef878e0839faf948be681a (diff) |
metauml 0.2.5 (31jul10)
git-svn-id: svn://tug.org/texlive/trunk@19692 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/metapost/metauml/metauml_component_relations.mp')
-rw-r--r-- | Master/texmf-dist/metapost/metauml/metauml_component_relations.mp | 69 |
1 files changed, 69 insertions, 0 deletions
diff --git a/Master/texmf-dist/metapost/metauml/metauml_component_relations.mp b/Master/texmf-dist/metapost/metauml/metauml_component_relations.mp new file mode 100644 index 00000000000..3c8f68c225e --- /dev/null +++ b/Master/texmf-dist/metapost/metauml/metauml_component_relations.mp @@ -0,0 +1,69 @@ +% MetaUML, a MetaPost library for typesetting exquisite UML diagrams. +% Copyright (C) 2006 Radu-George Radulescu, Ovidiu Gheorghies +% +% This program is free software; you can redistribute it and/or +% modify it under the terms of the GNU General Public License +% as published by the Free Software Foundation; either version 2 +% of the License, or (at your option) any later version. +% +% This program is distributed in the hope that it will be useful, +% but WITHOUT ANY WARRANTY; without even the implied warranty of +% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +% GNU General Public License for more details. +% +% You should have received a copy of the GNU General Public License +% along with this program; if not, write to the Free Software +% Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. + +if known _metauml_component_relations_mp: + expandafter endinput +fi; +_metauml_component_relations_mp:=1; + +defaultRelationHeadWidth := 25; +defaultRelationHeadHeight := 10; +requiredInterfaceHeadWidth := 5; +requiredInterfaceHeadHeight := 15; + +vardef requiredInterfaceInfo@# = + LinkInfo@#; + + @#widthA = 0; + @#heightA = 0; + @#drawMethodA = "drawNothing"; + + @#widthB = requiredInterfaceHeadWidth; + @#heightB = requiredInterfaceHeadHeight; + @#drawMethodB = "drawSemiCircle"; + + @#drawMethod = "drawLine"; +enddef; + +vardef providedInterfaceInfo@# = + LinkInfo@#; + + @#widthB = defaultRelationHeadWidth; + @#heightB = defaultRelationHeadHeight; + @#drawMethodB = "drawCircle"; + + @#widthA = 0; + @#heightA = 0; + @#drawMethodA = "drawNothing"; + + @#drawMethod = "drawLine"; +enddef; + +requiredInterfaceInfo.requiredInterface; +providedInterfaceInfo.providedInterface; + +vardef drawRelation(text iLink)(expr myPath)= + link(iLink)(myPath); +enddef; + +vardef drawLine(expr my_path) = + draw my_path; +enddef; + +vardef drawNothing(text pA)(text pB)(text base) = +enddef; + |