From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.6 (2021-04-09) on
	ip-172-31-65-14.ec2.internal
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 required=3.0 tests=BAYES_00,T_SCC_BODY_TEXT_LINE
	autolearn=ham autolearn_force=no version=3.4.6
Path: eternal-september.org!news.eternal-september.org!.POSTED!not-for-mail
From: Simon Wright <simon@pushface.org>
Newsgroups: comp.lang.ada
Subject: Re: When using the Ada Big_Numbers.Big_Integers package, can the To_String function output be sliced?
Date: Fri, 28 Jul 2023 19:21:08 +0100
Organization: A noiseless patient Spider
Message-ID: <lycz0baodn.fsf@pushface.org>
References: <b5e3d389-0bb0-41ac-8a47-6110a5b62d67n@googlegroups.com>
	<u9tbaf$1r81p$1@dont-email.me>
	<be16b58d-d612-4d48-aae1-062818184a66n@googlegroups.com>
MIME-Version: 1.0
Content-Type: text/plain
Injection-Info: dont-email.me; posting-host="5728df52d77c6c842acfbbf5e73a106f";
	logging-data="2432113"; mail-complaints-to="abuse@eternal-september.org";	posting-account="U2FsdGVkX1+wZ7D4slOUuYDQnu6kVEgiLsHXxSgqWzc="
User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/28.2 (darwin)
Cancel-Lock: sha1:y5u8/jh+GLbg9Aq/eXG03MwWpLQ=
	sha1:YI/vM5tlWz0D3CX1+RnzLN2xgrU=
Xref: news.eternal-september.org comp.lang.ada:65462
List-Id: <comp.lang.ada>

This works for me:

   for I in 1 .. Max loop
      Powers_of_2 := Powers_of_2 * To_Big_Integer (2);
      if I >= 4 then
         if To_String (Powers_Of_2)(2 .. 3) = "12" then
            Put ("2^");
            Put (I, 0);
            Put_Line (To_String (Powers_of_2));
         end if;
      end if;
   end loop;