butchi · December 15, 2015 21:49
diff --git a/file0.txt b/file0.txt
 listPts = Table[{Cos[a Pi], Sin[a Pi]}, {a, 0, 4, 4/5}]
 ListLinePlot[listPts, AspectRatio -> Automatic]
diff --git a/file1.txt b/file1.txt
 listPts2 = (# + {1, 2}) & /@ listPts
 ListLinePlot[listPts2, AspectRatio -> Automatic]
diff --git a/file10.txt b/file10.txt
 Complex @@ {1, 2}
diff --git a/file11.txt b/file11.txt
 reim[c_?NumberQ] := {Re[c], Im[c]}
 reim[li_List] := {Re[#], Im[#]}& /@ li
diff --git a/file2.txt b/file2.txt
 listPts2 = (RotationMatrix[30 Degree].#) & /@ listPts
 ListLinePlot[listPts2, AspectRatio -> Automatic]
diff --git a/file3.txt b/file3.txt
 compPts = (-1)^Range[0, 4, 4/5]
 {Re[#], Im[#]} & /@ compPts
 ListLinePlot[{Re[#], Im[#]} & /@ compPts, AspectRatio -> Automatic]
diff --git a/file4.txt b/file4.txt
 compPts2 = compPts + (1 + 2 I)
 ListLinePlot[{Re[#], Im[#]} & /@ compPts2, AspectRatio -> Automatic]
diff --git a/file5.txt b/file5.txt
 compPts2 = E^(Pi/6 I) compPts
 ListLinePlot[{Re[#], Im[#]} & /@ compPts2, AspectRatio -> Automatic]
diff --git a/file6.txt b/file6.txt
 In[1] = FullForm[1 + 2 I]
 Out[1] = Complex[1, 2]
diff --git a/file7.txt b/file7.txt
 {Re[#], Im[#]} &
diff --git a/file8.txt b/file8.txt
 List @@ (1 + 2I)
diff --git a/file9.txt b/file9.txt
 (1 + 2I)[[{1, 2}]]
	listPts = Table[{Cos[a Pi], Sin[a Pi]}, {a, 0, 4, 4/5}]
	ListLinePlot[listPts, AspectRatio -> Automatic]
	listPts2 = (# + {1, 2}) & /@ listPts
	ListLinePlot[listPts2, AspectRatio -> Automatic]
	reim[c_?NumberQ] := {Re[c], Im[c]}
	reim[li_List] := {Re[#], Im[#]}& /@ li
	listPts2 = (RotationMatrix[30 Degree].#) & /@ listPts
	ListLinePlot[listPts2, AspectRatio -> Automatic]
	compPts = (-1)^Range[0, 4, 4/5]
	{Re[#], Im[#]} & /@ compPts
	ListLinePlot[{Re[#], Im[#]} & /@ compPts, AspectRatio -> Automatic]
	compPts2 = compPts + (1 + 2 I)
	ListLinePlot[{Re[#], Im[#]} & /@ compPts2, AspectRatio -> Automatic]
	compPts2 = E^(Pi/6 I) compPts
	ListLinePlot[{Re[#], Im[#]} & /@ compPts2, AspectRatio -> Automatic]