### 10.18.10 Savoir si on a un parallélogramme : is_parallelogram est_parallelogramme

Voir aussi : 11.13.14 pour la géométrie 3-d.
est_parallelogramme est une fonction booléenne ayant comme argument quatre points ou un objet géométrique.
est_parallelogramme vaut 1 (resp 2, 3, 4) si les quatre points forment un parallélogramme (resp un losange, un rectangle, un carré) ou si l’objet géométrique est un parallélogramme (resp un losange, un rectangle, un carré), et vaut 0 sinon.
On tape :

est_parallelogramme(i,-1+i,-1-i,1-i)

On obtient :

0

On tape :

est_parallelogramme(1+i,-1+i,-1-i,1-i)

On obtient :

1

On tape :

Q:=quadrilatere(1+i,-1+i,-1-i,1-i);est_parallelogramme(Q)

On obtient :

4

Attention
On doit taper :

P:=parallelogramme(-1-i,1-i,i,D);est_parallelogramme(P[0])

Pour obtienir :

1

En effet c’est P[0] qui désigne un parallélogramme car P est une liste composée d’un parallélogramme et de son dernier sommet D.
Si on tape affixe(D)), on obtient -2+i.