GrassmannCalculus`
ToListCoordinates  |
|
| | ||||
Details and Options
Examples
(1)
Basic Examples
(1)
In[1]:=
<<GrassmannCalculus`<<Presentations`
We will draw some graphical elements in the GrassmannPlane using Grassmann expressions and .
ToListCoordinates
In[2]:=
SetGrassmannNSpace[2,{x,y},"Vector"]
In[3]:=
Draw2D{(*Drawseveralwhitepoints*)CirclePoint[★+3,3,Black,White],CirclePoint[★-3+4,3,Black,White],(*Drawaredline*){Red,Line[{★-3,★+2+3}]},(*DrawanArrow*)Arrow[{★+,★+2+2}],(*Drawacoloredtriangle*),FaceForm[ColorData["Legacy"]["SandyBrown"]],EdgeForm[Black],Polygon[{★-4-4,★-2-,★-3}],(*DrawanoutlinedDisk*)FaceForm[ColorData["Legacy"]["Beige"]],Disk[★+2-2,1]}//
,PlotRange5,FrameTrue,AxesTrue,AxesOrigin{0,0},AxesStyleGrayLevel[0.8],Method{"AxesInFront"False},ImageSize300
e
x
e
x
e
y
e
x
e
x
e
y
e
y
e
x
e
y
e
x
e
y
e
x
e
y
e
y
e
x
e
y
 | ToListCoordinates |
Out[3]=
When using graphics expressions in which the arguments aren't evaluated it may be easiest to use With or Module statements.
In[4]:=
Withcurve=★+x+Sin[x]//
,Draw2D[{{ParametricDraw[curve,{x,0,2π}]}},PlotRangeAll,FrameTrue,ImageSize300]
e
x
e
y
 | ToListCoordinates |
Out[4]=
In[5]:=
Module{curve1,curve2},{curve1,curve2}={★+x+Sin[x],★+x+Cos[x]}//
;Draw2D[{{ParametricDraw[curve1,{x,0,2π}],Blue,ParametricDraw[curve2,{x,0,2π}]}},PlotRangeAll,FrameTrue,ImageSize300]
e
x
e
y
e
x
e
y
| ToListCoordinates |
Out[5]=
 |
|
 |
|
""