Untitled

        let rec finish = compare_vc_current_class vector_class current_class in
        if finish = true then exit 0
        else begin
                let w_current = vector_add (vector_mult(error_vect lr_matrix)) w_current in
                let current_class = cur_class_vect trainData w_current in
                (* call finish again *)
        end