4 lines
181 B
Text
4 lines
181 B
Text
|
size = {4, 3};
|
||
|
|
cr = CutRectangle[size];
|
||
|
|
Graphics[{Style[Rectangle[{0, 0}, size], FaceForm[], EdgeForm[Red]], Style[Arrow[#], Black], Style[Point[#], Black]}, ] & /@ cr["Solutions"]
|