Subversion Repositories wimsdev

!set methtit=Separate cases according to an inequality
!set methenv=ZZ QQ RR
!set methparmtype=function, choice 4, function
!set methhelp=This method separates the situation into two cases, according \
 to the truth of an inequality. The inequality and its inverse will be added\
 to the hypotheses of the two cases respectively.

!if $wims_read_parm iswordof form check
  !goto $wims_read_parm
!endif

!exit
:form
 Separate the cases according to the truth of the inequality <br>
!read deduc/methparm.phtml 1,10
!formselect methparm2 from 1 to 4 prompt <,>,<=,>=
!read deduc/methparm.phtml 3,10
!exit
:check
sign1=!item $methparm2 of <,>,<=,>=
sign2=!item $methparm2 of >=,<=,>,<

 casesplit=$methparm1 $sign1 $methparm3\
  $methparm1 $sign2 $methparm3
mt1=$methparm1 $sign1 $methparm3
mt2=$methparm1 $sign2 $methparm3
methexp=Separate the cases \($mt1) and \($mt2)

!exit