Subversion Repositories wimsdev

!set methtit=½»»»²»µÈʽµÄÁ½±ß

!set methenv=ZZ QQ RR

!set methparmtype=parm inequality

!set methhelp=´Ë·½·¨°Ñ²»µÈʽ \(A < B) ¸Äд³É \(B > A),\

 »ò·´Ö®.

!if $wims_read_parm iswordof form check

 !goto $wims_read_parm

!endif

!exit

:form

 ½»»»²»µÈʽµÄÁ½±ß

 !read deduc/methparm.phtml 1

!exit

:check

 !distribute items $methparmobj1 into data,left,sign,right

 methexp=½»»» \($left $sign $right) µÄÁ½±ß

 newsign=!translate internal <> to >< in $sign

 newobject1=$right $newsign $left

 oldobject=1

 contextlist=$ct_Always,\

    $ct_OnlywhenÁ½±ßÊÇÕýµÄ,\

    $ct_OnlywhenÁ½±ßͬºÅ,\

    $ct_Onlywhen²»µÈʽÊÇÑϸñµÄ

 resultlist=$newobject1,\

  $right $sign $left

!exit