Subversion Repositories wimsdev

Rev

Rev 13573 | Rev 17501 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 13573 Rev 13699
Line 7... Line 7...
7
    ans_type=symtext
7
    ans_type=symtext
8
  !endif
8
  !endif
9
!endif
9
!endif
10
 
10
 
11
ans_w=$[$(replyweight$ans_1)]
11
ans_w=$[$(replyweight$ans_1)]
12
!if $ans_w!=$empty and NaN notin $ans_w and Inf notin $ans_w and \
12
!if $(replyweight$ans_1)!=$empty and NaN notin $ans_w and Inf notin $ans_w \
13
	$ans_w>0 and $ans_w!=1 and nocompare notwordof $ans_2
13
	  and $ans_w!=1 and nocompare notwordof $ans_2
14
  ans_got=$freegot
14
  ans_got=$freegot
15
  prec_got=$precgood
15
  prec_got=$precgood
16
  weightadjust=$[$weightadjust+$ans_w-1]
16
  weightadjust=$[$weightadjust+$ans_w-1]
17
  !read anstype/$ans_type $ans_2
17
  !read anstype/$ans_type $ans_2
18
  ans_this=$[$freegot-$ans_got]
18
  ans_this=$[$freegot-$ans_got]