Section Header
    + name := UINTEGER_BIG;
Aucun Auto-Cast pour l'instant...(peut etre
INTEGER_BIG ...)
    - comment := "Integer without bits limit! (Just for fun!)";
- default := 0;
Section Inherit
    - parent_unsigned:UNSIGNED :=
Section UINTEGER_BIG
    + storage:FAST_ARRAY[UINTEGER];
    - last_modulo:UINTEGER;
    - make init:UINTEGER :SELF <-
    - count:INTEGER <-
    - lower:INTEGER <-
    - upper:INTEGER <-
    - item idx:INTEGER :UINTEGER <-
    - copy other:UINTEGER_BIG <-
    - force elt:UINTEGER to idx:INTEGER <-
    - put elt:UINTEGER to idx:INTEGER <-
    - add_last elt:UINTEGER <-
    - resize new_size:INTEGER <-
Section INTEGER
    - create init:UINTEGER :UINTEGER_BIG <-
Section Public
    - object_size:INTEGER <-
Range.
    - maximum:UINTEGER_64 <-
Conversion format with test.
    - to_uinteger_64:UINTEGER_64 <-
    - to_uinteger:UINTEGER <-
    - to_uinteger_16:UINTEGER_16 <-
    - to_uinteger_8:UINTEGER_8 <-
    - to_integer_64:INTEGER_64 <-
    - to_integer:INTEGER <-
    - to_integer_16:INTEGER_16 <-
    - to_integer_8:INTEGER_8 <-
- to_ureal_26_6:UREAL_26_6 <- self;
    - to_ulargeint:UINTEGER_BIG <-
    - clean <-
binary operator :
    - '-' Left 80 other:SELF :SELF <-
    - '-#' Left 80 other:INTEGER :SELF <-
    - '+' Left 80 other:SELF :SELF <-
    - '+#' Left 80 other:INTEGER :SELF <-
    - '*' Left 100 other:SELF :SELF <-
    - '*#' Left 100 other:INTEGER :SELF <-
    - '/' Left 100 other:SELF :SELF <-
    - '/#' Left 100 other:INTEGER :SELF <-
    - '&' Left 100 other:SELF :SELF <-
Test binary operator :
    - '>' Right 60 other:SELF :BOOLEAN <-
    - '>#' Right 60 other:INTEGER :BOOLEAN <-
    - '==' Right 60 other:SELF :BOOLEAN <-
prefix : Unary operator
    - '~' :SELF <-
    - '-' :SELF <-
    - factorial:SELF <-
conversion
    - append_in buffer:STRING <-
        Append in the `buffer' the equivalent of `to_string'. No new STRING
        creation during the process.