!goto $wims_read_parm

:def
!set title=Simplify
synonyme=numerical simplify, simplify numerically
input=mixed
!exit

:proc

formula=!rawmath $formula

result=!exec pari simplify($formula)

!exit

:output

!htmlmath $formula
 =
!insmath $result
 .
!exit

