Path: utzoo!utgpu!news-server.csri.toronto.edu!rpi!zaphod.mps.ohio-state.edu!cis.ohio-state.edu!tut.cis.ohio-state.edu!udecc.engr.udayton.edu!blackbird.afit.af.mil!dlindsle
From: dlindsle@afit.af.mil (David T. Lindsley)
Newsgroups: comp.lang.ada
Subject: Re: Has anyone gotten test_math.a to run on a Sun4/OS 4.1 using VADS 6.0 ?
Message-ID: <1991Jun14.171209.10860@afit.af.mil>
Date: 14 Jun 91 17:12:09 GMT
References: <813@infotec.UUCP>
Organization: Air Force Institute of Technology
Lines: 27

lee@infotec.UUCP (Lee Van Dyke) writes:

[stuff deleted]


>        Find_Iexp: 
>            declare
>                Y : Floating := 1.0;
>                A : Floating := Betain;
>                I : Integer := 0;
>            begin
>                loop
>                    Y := A * A;
>                    exit when Y = 0.0;
>                    I := I + 1;
>                    A := Y;
>                end loop;

Could someone please refer me to where these "declare" segments are
explained in the LRM?

(Yes, I'm quite sure this is an FAQ, but...)

-- 
Dave Lindsley	#24601#			OPINIONS.  MINE.  (Nobody tells me
dlindsle@blackbird.afit.af.mil		  anything anyway, so I can't possibly 
    ?? lamroN eb yhW ??			  be anybody's mouthpiece...)