adorian / PFE_28

Blame view

Giac_maj/giac-1.4.9/examples/geo/geo13 212 Bytes
Edit Raw Normal View History
6663b6c9   adorian   projet complet av... 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
  A:=point(-3);
  p:=3;
  K:= point(A+p);
  t:=element(0..1);
  B:=A+t*(K-A);
  C:=rotation(B,pi/2,K);
  D:= C+A-B;
  segment(A,B);
  segment(C,B);
  segment(C,D);
  segment(A,D);
  f(x):=9*x*(1-x);
  G:=plotfunc(f(x),x);
  M:=element(G,t);