fact: Fixpoint usize (d:uint) : N := match d with | Nil => 0 | D0 d => N.succ (usize d) | D1 d => N.succ (usize d) | D2 d => N.succ (usize d) | D3 d => N.succ (usize d) | D4 d => N.succ (usize d) | D5 d => N.succ (usize d) | D6 d => N.succ (usize d) | D7 d => N.succ (usize d) | D8 d => N.succ (usize d) | D9 d => N.succ (usize d) | Da d => N.succ (usize d) | Db d => N.succ (usize d) | Dc d => N.succ (usize d) | Dd d => N.succ (usize d) | De d => N.succ (usize d) | Df d => N.succ (usize d) end.
imports: Hexadecimal HexadecimalFacts PArith NArith