Subversion Repositories wimsdev

!goto $wims_read_parm

:def
title=Dénominateur en commun
synonyme=denominator
input=mixed
!exit

:proc

fml=!rawmath $formula
cnt=!itemcnt $fml
!if $cnt>1
 fml=[$fml]
!endif

result=!exec pari denominator($fml)

!exit

:output

Dénominateur commun de
!htmlmath $formula
 :
<p class="wimscenter"> $result</p>

!exit