Subversion Repositories wimsdev

Rev

Rev 5763 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5763 Rev 17234
Line 8... Line 8...
8 
!endif
 8 
!endif
9 
 
 9 
 
10 
!exit
 10 
!exit
11 
:form
 11 
:form
12 
 ÒýÈëºã²»µÈʽ
 12 
 ÒýÈëºã²»µÈʽ
13 
 <input size=12 name=methparm1 value="$methparm1"/>
 13 
 <input size=12 name=methparm1 value="$methparm1">
14 
 !formselect methparm2 from 1 to 4 prompt <,>,<=,>=
 14 
 !formselect methparm2 from 1 to 4 prompt <,>,<=,>=
15 
 <input size=12 name=methparm3 value="$methparm3"/>
 15 
 <input size=12 name=methparm3 value="$methparm3">
16 
!exit
 16 
!exit
17 
:check
 17 
:check
18 
 sign=!item $methparm2 of <,>,<=,>=
 18 
 sign=!item $methparm2 of <,>,<=,>=
19 
 !read deduc/sub/checkineq $methparm1,$sign,$methparm3
 19 
 !read deduc/sub/checkineq $methparm1,$sign,$methparm3
20 
 !if $out!=true
 20 
 !if $out!=true