!!! fichier de traitement de l'exercice 1 !!!

vf=

!if $parmlist=$empty
  alert=$(alerts[1;])
  !exit
!endif

parmlist=!rawmath $parmlist
repsnb=1
reps1=!translate internal , to\
$?$ in $parmlist
NonValide=$(alerts[2;])
!read comsDir/repclean

!if $alertreps1!=$empty
  alert=$NonValide
  parmlist=$reps1
  !exit
!endif

TF=!exec maxima ratsimp(($parmlist)-($polyp));

!if $TF=0
  note=10
  vf=$(vfbool[1;])
 !else
  note=0
  vf=$(vfbool[2;])
!endif

module_score=$note
!read answer.phtml
status=done

