parsec-presentation/example/img/mp/list-tree-endofunctor-morphism.mp

8 lines
180 B
Text
Raw Normal View History

2013-01-07 13:18:37 +00:00
pair tree,list;
resize(.8cm);
list=origin;
tree=list shifted (gu,0);
drawState(list,"\mathtt{[]}");
drawState(tree,"\mathtt{List}");
drawEdgeAngle(list,tree,"\mathtt{toList}",30);