Subversion Repositories wimsdev

 a_$i=!word $i of $scores

  a_$i=!word $i of $scores

 b_$i=!word $i of $means

  b_$i=!word $i of $means

 c_$i=!word $i of $requires

  c_$i=!word $i of $requires

 l_=!record $i of $s_

  l_=!record $i of $s_

 d_=!line 7 of $l_

  d_=!line 7 of $l_

 d_=!trim $d_

  d_=!trim $d_

 C_=

  C_=

 !if $d_!=$empty

  !if $d_!=$empty

  d_=!translate internal , to $\

    d_=!translate internal , to $\

  d_=!translate internal +: to $ , in $d_

    d_=!translate internal +: to $ , in $d_

  d_=!nonempty lines $d_

    d_=!nonempty lines $d_

  N_=!linecnt $d_

    N_=!linecnt $d_

  !for j=1 to $N_

    !for j=1 to $N_

   l_=!line $j of $d_

      l_=!line $j of $d_

   !distribute items $l_ into e_,p_

      !distribute items $l_ into e_,p_

   !if $p_>0 and $p_<=100

      !if $p_>0 and $p_<=100

    e_=!words2items $e_

        e_=!words2items $e_

    !distribute items 0,0,0 into sum_,mean_,user_,term_

        !distribute items 0,0,0 into sum_,mean_,user_,term_

    !for e in $e_

        !for e in $e_

     !if $e>0 and $e<256

          !if $e>0 and $e<256

      term_=$[$term_+10]

            term_=$[$term_+10]

      sum_=$[$sum_+$(c_$e)]

            sum_=$[$sum_+$(c_$e)]

      mean_=$[$mean_+$(b_$e)]

            mean_=$[$mean_+$(b_$e)]

      user_=$[$user_+$(a_$e)]

            user_=$[$user_+$(a_$e)]

     !endif

          !endif

    !next

        !next

    !if $sum_>0 and $user_*sqrt($mean_/$term_)/$sum_*100<$p_

        !if $sum_>0 and $user_*sqrt($mean_/$term_)/$sum_*100<$p_

     C_=!append item $e_ to $C_

          C_=!append item $e_ to $C_

    !endif

        !endif

   !endif

      !endif

  !next j

    !next j

  C_=!listuniq $C_

    C_=!listuniq $C_

 !endif

  !endif

 !appendfile $depfile :$C_

  !appendfile $depfile :$C_

 deps=$deps$C_;

  deps=$deps$C_;