transfer Trans : Nat -> Nat = {
  transfer Nat = nat2bin ;
}