Subversion Repositories wimsdev

Rev

Rev 12366 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
12364 bpr 1
!if $seedrepeat<=0
2
  !exit
3
!endif
12350 bpr 4
!if $wims_user!=$empty and $wims_user!=supervisor
12366 bpr 5
  !set seedlastcnt=!getseedlastcnt sheet=$wims_sheet work=$wims_exo
12350 bpr 6
  !! find the number of distinct seeds (faire une fonction dans score.c ??)
12366 bpr 7
  !set seedcnt=!getseedscores sheet=$wims_sheet work=$wims_exo
12350 bpr 8
  !set seedcnt=!declosing $seedcnt
9
  !set seedcnt=!listuniq $(seedcnt[;1])
10
  !set seedcnt=!itemcnt $seedcnt
12363 bpr 11
!else
12
  !set seedcnt=$wims_seedcnt
13
  !set seedlastcnt=$wims_seedlastcnt
12350 bpr 14
!endif