{ [s:Atom List]. [n:].
    (str-to-nat-plus(s;n) = (str-to-nat(s) + (n * 10^||s||))) }

{ Proof }



Definitions occuring in Statement :  str-to-nat: str-to-nat(s) str-to-nat-plus: str-to-nat-plus(s;n) length: ||as|| nat: uall: [x:A]. B[x] list: type List multiply: n * m add: n + m natural_number: $n int: atom: Atom equal: s = t exp: i^n
Definitions :  uall: [x:A]. B[x] str-to-nat-plus: str-to-nat-plus(s;n) str-to-nat: str-to-nat(s) length: ||as|| member: t  T ycomb: Y top: Top all: x:A. B[x] subtype: S  T prop: rev_implies: P  Q iff: P  Q and: P  Q implies: P  Q nat: le: A  B not: A false: False uimplies: b supposing a
Lemmas :  nat_wf str1-to-nat_wf str-to-nat-plus_wf exp_wf2 length_wf1 non_neg_length length_wf_nat top_wf str-to-nat_wf add_functionality_wrt_eq le_wf exp_add exp1

\mforall{}[s:Atom  List].  \mforall{}[n:\mBbbN{}].    (str-to-nat-plus(s;n)  =  (str-to-nat(s)  +  (n  *  10\^{}||s||)))


Date html generated: 2011_08_10-AM-07_42_40
Last ObjectModification: 2011_06_18-AM-08_09_44

Home Index