Rev 2071 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 2071 | Rev 17063 | ||
---|---|---|---|
Line 15... | Line 15... | ||
15 | !read deduc/methparm.phtml 2 |
15 | !read deduc/methparm.phtml 2 |
16 | µÄÁ½±ß |
16 | µÄÁ½±ß |
17 | !exit |
17 | !exit |
18 | :check |
18 | :check |
19 | !distribute items $methparmobj2 into data,left,sign,right |
19 | !distribute items $methparmobj2 into data,left,sign,right |
20 | methexp=°Ñ \( |
20 | methexp=°Ñ \($methparm1) ¼Óµ½ \($left $sign $right) µÄÁ½±ß |
21 | 21 | ||
22 | !read deduc/sub/simplify ($left + ($methparm1)\ |
22 | !read deduc/sub/simplify ($left + ($methparm1)\ |
23 | $right + ($methparm1) |
23 | $right + ($methparm1) |
24 | !distribute lines $out into newleft,newright |
24 | !distribute lines $out into newleft,newright |
25 | !if $newleft=$empty or $newright=$empty |
25 | !if $newleft=$empty or $newright=$empty |
Line 27... | Line 27... | ||
27 | !exit |
27 | !exit |
28 | !endif |
28 | !endif |
29 | newsign=$sign |
29 | newsign=$sign |
30 | newobject2=$newleft $newsign $newright |
30 | newobject2=$newleft $newsign $newright |
31 | oldobject=2 |
31 | oldobject=2 |
32 | 32 | ||
33 | contextlist=$ct_Always,\ |
33 | contextlist=$ct_Always,\ |
34 | $ct_OnlywhenËù¼ÓµÄÊýÓй̶¨µÄ·ûºÅ,\ |
34 | $ct_OnlywhenËù¼ÓµÄÊýÓй̶¨µÄ·ûºÅ,\ |
35 | $ct_OnlywhenËù¼ÓµÄÊýÊÇÕýµÄ |
35 | $ct_OnlywhenËù¼ÓµÄÊýÊÇÕýµÄ |
36 | 36 | ||
37 | !if $askresult>1 |
37 | !if $askresult>1 |
38 | !read deduc/sub/simplify $left - ($methparm1)\ |
38 | !read deduc/sub/simplify $left - ($methparm1)\ |
39 | $right - ($methparm1) |
39 | $right - ($methparm1) |
40 | !distribute lines $out into badleft, badright |
40 | !distribute lines $out into badleft, badright |
41 | badsign=!translate internal <> to >< in $newsign |
41 | badsign=!translate internal <> to >< in $newsign |
42 | 42 | ||
43 | resultlist=$newobject2,\ |
43 | resultlist=$newobject2,\ |
44 | $newleft $newsign $badright,\ |
44 | $newleft $newsign $badright,\ |
45 | $badleft $newsign $newright |
45 | $badleft $newsign $newright |
46 | !endif |
46 | !endif |
47 | 47 |