# Question:Difficulty with displat draw and textplot

## Question:Difficulty with displat draw and textplot

Maple 2021

restart;
with(geometry):
with(plots):
_EnvHorizontalName = 'x':
_EnvVerticalName = 'y':
Vdot := proc(U, V) local i; add(U[i]*V[i], i = 1 .. 2); end proc:
R := 5:
ang := [2/3*Pi, -3*Pi*1/4, -Pi*1/6]:
seq(point(`||`(P, i), [R*cos(ang[i]), R*sin(ang[i])]), i = 1 .. 3):
seq(dsegment(`||`(seg, i), [`||`(P, i), `||`(P, irem(i, 3) + 1)]), i = 1 .. 3):
circle(cir, [point(OO, [0, 0]), R]):
dist := proc(M, N) sqrt(Vdot(M - N, M - N)); end proc:

display*([draw*[P1(color = black, symbol = solidcircle, symbolsize = 12),
P2(color = black, symbol = solidcircle, symbolsize = 12),
P3(color = black, symbol = solidcircle, symbolsize = 12),
cir(color = blue)],
textplot*([[coordinates(P1)[], "P1"],
[coordinates(P2)[], "P2"],
[coordinates(P3)[], "P3"]], align = [above, right])], axes = none);
/[
plots:-display |[geometry:-draw [
\[

P1(color = black, symbol = solidcircle, symbolsize = 12),

P2(color = black, symbol = solidcircle, symbolsize = 12),

P3(color = black, symbol = solidcircle, symbolsize = 12),

/[[-5  5  (1/2)      ]
cir(color = blue)], plots:-textplot |[[--, - 3     , "P1"],
\[[2   2             ]

[  5  (1/2)    5  (1/2)      ]  [5  (1/2)  -5      ]]
[- - 2     , - - 2     , "P2"], [- 3     , --, "P3"]],
[  2           2             ]  [2         2       ]]

\]             \
align = [above, right]|], axes = none|
/]             /

no figure drawn, Why? Thank you

﻿