Subversion Repositories wimsdev

Rev

Rev 12363 | 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
5
  !set seedlastcnt=!getseedlastcnt user=$wims_user sheet=$wims_sheet work=$wims_exo
6
  !! find the number of distinct seeds (faire une fonction dans score.c ??)
7
  !set seedcnt=!getseedscores user=$wims_user sheet=$wims_sheet work=$wims_exo
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
12364 bpr 15
!!