/*  OpenTally: Open-source election vote counting
 *  Copyright © 2021 Lee Yingtong Li (RunasSudo)
 *
 *  This program is free software: you can redistribute it and/or modify
 *  it under the terms of the GNU Affero General Public License as published by
 *  the Free Software Foundation, either version 3 of the License, or
 *  (at your option) any later version.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU Affero General Public License for more details.
 *
 *  You should have received a copy of the GNU Affero General Public License
 *  along with this program.  If not, see <https://www.gnu.org/licenses/>.
 */

use crate::utils;

use opentally::numbers::Rational;
use opentally::stv;
use opentally::ties::TieStrategy;

#[test]
fn dublin_north_2002_rational() {
	let stv_opts = stv::STVOptionsBuilder::default()
		.round_quota(Some(0))
		.normalise_ballots(true)
		.quota_criterion(stv::QuotaCriterion::GreaterOrEqual)
		.surplus(stv::SurplusMethod::Hare)
		.surplus_order(stv::SurplusOrder::ByOrder)
		.transferable_only(true)
		.defer_surpluses(true)
		.build().unwrap();
	
	assert_eq!(stv_opts.describe::<Rational>(), "--round-quota 0 --normalise-ballots --quota-criterion geq --surplus hare --surplus-order by_order --transferable-only --defer-surpluses");
	 
	utils::read_validate_election::<Rational>("tests/data/DublinNorthSorted.csv", "tests/data/DublinNorthSorted.blt", stv_opts, None, &["exhausted"]);
}

#[test]
fn grey_fitzgerald_rational() {
	let stv_opts = stv::STVOptionsBuilder::default()
		.round_quota(Some(0))
		.normalise_ballots(true)
		.quota_criterion(stv::QuotaCriterion::GreaterOrEqual)
		.ties(vec![TieStrategy::Forwards])
		.surplus(stv::SurplusMethod::Hare)
		.surplus_order(stv::SurplusOrder::BySize) // Differs to Dail
		.transferable_only(true)
		.bulk_exclude(true)
		.defer_surpluses(true)
		.build().unwrap();
	
	assert_eq!(stv_opts.describe::<Rational>(), "--round-quota 0 --normalise-ballots --quota-criterion geq --ties forwards --surplus hare --transferable-only --bulk-exclude --defer-surpluses");
	
	utils::read_validate_election::<Rational>("tests/data/grey_fitzgerald.csv", "tests/data/grey_fitzgerald.blt", stv_opts, None, &["exhausted"]);
}