use crate::ring::*;
use std::cmp::*;
pub trait OrderedRing: RingBase {
fn cmp(&self, lhs: &Self::Element, rhs: &Self::Element) -> Ordering;
fn abs_cmp(&self, lhs: &Self::Element, rhs: &Self::Element) -> Ordering {
self.cmp(&self.abs(self.clone_el(lhs)), &self.abs(self.clone_el(rhs)))
}
fn is_leq(&self, lhs: &Self::Element, rhs: &Self::Element) -> bool {
self.cmp(lhs, rhs) != Ordering::Greater
}
fn is_geq(&self, lhs: &Self::Element, rhs: &Self::Element) -> bool {
self.cmp(lhs, rhs) != Ordering::Less
}
fn is_lt(&self, lhs: &Self::Element, rhs: &Self::Element) -> bool {
self.cmp(lhs, rhs) == Ordering::Less
}
fn is_gt(&self, lhs: &Self::Element, rhs: &Self::Element) -> bool {
self.cmp(lhs, rhs) == Ordering::Greater
}
fn is_neg(&self, value: &Self::Element) -> bool {
self.is_lt(value, &self.zero())
}
fn is_pos(&self, value: &Self::Element) -> bool {
self.is_gt(value, &self.zero())
}
fn abs(&self, value: Self::Element) -> Self::Element {
if self.is_neg(&value) {
self.negate(value)
} else {
value
}
}
fn max<'a>(&self, fst: &'a Self::Element, snd: &'a Self::Element) -> &'a Self::Element {
if self.is_geq(fst, snd) {
return fst;
} else {
return snd;
}
}
}
pub trait OrderedRingStore: RingStore
where Self::Type: OrderedRing
{
delegate!{ OrderedRing, fn cmp(&self, lhs: &El<Self>, rhs: &El<Self>) -> Ordering }
delegate!{ OrderedRing, fn abs_cmp(&self, lhs: &El<Self>, rhs: &El<Self>) -> Ordering }
delegate!{ OrderedRing, fn is_leq(&self, lhs: &El<Self>, rhs: &El<Self>) -> bool }
delegate!{ OrderedRing, fn is_geq(&self, lhs: &El<Self>, rhs: &El<Self>) -> bool }
delegate!{ OrderedRing, fn is_lt(&self, lhs: &El<Self>, rhs: &El<Self>) -> bool }
delegate!{ OrderedRing, fn is_gt(&self, lhs: &El<Self>, rhs: &El<Self>) -> bool }
delegate!{ OrderedRing, fn is_neg(&self, value: &El<Self>) -> bool }
delegate!{ OrderedRing, fn is_pos(&self, value: &El<Self>) -> bool }
delegate!{ OrderedRing, fn abs(&self, value: El<Self>) -> El<Self> }
fn max<'a>(&self, fst: &'a El<Self>, snd: &'a El<Self>) -> &'a El<Self> {
self.get_ring().max(fst, snd)
}
}
impl<R: ?Sized> OrderedRingStore for R
where R: RingStore,
R::Type: OrderedRing
{}