Subversion Repositories wimsdev

Rev

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

Rev 7357 Rev 7359
Line 28... Line 28...
28 
   !read oef/ans.proc $i nocompare
 28 
   !read oef/ans.proc $i nocompare
29 
   !if $error!=$empty
 29 
   !if $error!=$empty
30 
    !exit
 30 
    !exit
31 
   !endif
 31 
   !endif
32 
   !default m_reply$i=$(reply$i)
 32 
   !default m_reply$i=$(reply$i)
- 
 
 33 
   !default m_reply_$i=$(reply_$i)
33 
   !default m_reply_$i=$(m_reply$i)
 34 
   !default m_reply_$i=$(reply$i)
34 
   !read oef/screply.proc
 35 
   !read oef/screply.proc
35 
   val$t_=$(reply$i)
 36 
   val$t_=$(reply$i)
36 
   !if NaN isin $test
 37 
   !if NaN isin $test
37 
    !goto badans
 38 
    !goto badans
38 
   !endif
 39 
   !endif
39 
   !goto cont
 40 
   !goto cont
40 
  !endif
 41 
  !endif
41 
  !read oef/ans.proc $i
 42 
  !read oef/ans.proc $i
42 
  !default m_reply$i=$(reply$i)
 43 
  !default m_reply$i=$(reply$i)
- 
 
 44 
  !default m_reply_$i=$(reply_$i)
- 
 
 45 
  !default m_reply_$i=$(reply$i)
43 
  !read oef/screply.proc
 46 
  !read oef/screply.proc
44 
  !if bad isin $Test
 47 
  !if bad isin $Test
45 
   error=bad_exo
 48 
   error=bad_exo
46 
   !advance reply_cnt
 49 
   !advance reply_cnt
47 
   status=
 50 
   status=