!!! fichier d'initialisation de l'exo 6 !!!

## lecture du fichier commun
!read commonDir/common1

## fabrication d'un trinome
a=!randint -5,5
!if $a=0
  a=!randitem -3,3
!endif
b=!randint -4,4
c=!randint -3,3
polyq=($a)*t^2+($b)*t+($c)

## fabrication d'une forme linaire
c1=!randint -3,3
c2=!randint -3,3
!if $c1=0
  c1=!randitem -2,2
!endif
!if $c2=0
  c2=!randitem -1,1
!endif

vecL=($c1)*[$vecw]+($c2)*[$vecv]
vecw=($vecw)

## calcul de dterminant
n=$[$dim-1]
polyp=(($polyq)^($n))*(($c1)+($polyq))

## appel  maxima
tmpexec=!exec maxima ($vecL) . transpose([$vecx]);\
$polyq;\
$polyp;

!distribute lines $tmpexec into formL,polyq,goodrep
## pour affichage
formL=!texmath $formL
formL=\(L(x)= $formL)
vecx=!texmath ($vecx)
vecx=\($vecx)
polyq=!texmath $polyq
ut=!texmath f_{t}(x)=\frac{L(x)}{||w||^2}\cdot w + ($polyq) x
ut=\($ut)
fparm=!texmath f_{t}
question=!texmath det(f_{t})=
question=\($question)

