fname_Q=$$m_Q
fname_Z=$$m_Z
fname_C=$$m_Q[$$m_i]
fname_G=$$m_Z[$$m_i]

!if $type=system
 name_line=quation
 name_lines=quations
 de_line=d'quation
!else
 name_line=ligne
 name_lines=lignes
 de_line=de ligne
!endif

!if $thisstep=$empty
 !goto next
!endif

modif=!item 1 of $thisstep
origin=!item 2 of $thisstep
dest=!item 3 of $thisstep
coef=!item 4 to -1 of $thisstep

!if $modif=add
 desc=l'addition de $coef fois $name_line ($origin)  $name_line ($dest)
 !goto next
!endif

!if $modif=multiply
 desc=la multiplication $de_line ($dest) par $coef
 !goto next
!endif

!if $modif=exchange
 desc=l'change des $name_lines ($origin) et ($dest)
 !goto next
!endif

:next
sst=!line $step+1 of $steplist
!if $sst=$empty
 !exit
!endif

modif=!item 1 of $sst
origin=!item 2 of $sst
dest=!item 3 of $sst
coef=!item 4 to -1 of $sst

!if $modif=add
 adesc=ajout $coef fois $name_line ($origin)  $name_line ($dest)
 !exit
!endif

!if $modif=multiply
 adesc=multipli par $coef $name_line ($dest)
 !exit
!endif

!if $modif=exchange
 adesc=chang $name_lines ($origin) et ($dest)
 !exit
!endif

