Re: Problem from a Newbie

[Jeffrey Carter <spam@spam.com>]

Jeffrey Carter wrote:

> Dennis Lee Bieber wrote:
> 
>>         Cycle : float := 360.0;         --use degrees directly in sin()
>>         HalfWidth : float := 30.0;      --scale 0..1 to 0..30 (and -1..0)
>>         StepCycle : float := Cycle / 45.0;      --reduce total points
>>         Length : integer := integer((2.0 * Cycle) / StepCycle); --#points
> 
> These all appear to be constants, and should be declared as such. The 
> first 3 could be named numbers.
> 
>>         Point : float;
>>         Position : float;
>>
>> begin
>>         for i in 0..Length loop
>>                 Point := ff.sin(float(i) * StepCycle, Cycle);
>>                 Position := Point * HalfWidth + HalfWidth + 1.0;
>>                 new_line;
>>                 for j in 0..integer(Position) loop
>>                         put(" ");       --space output across line
>>                 end loop;
>>                 put("*");
>>         end loop;
>> end wave;

I apologize for leaving this big chunk of quoted text at the end for now 
reason. It's something I try to avoid.

-- 
Jeff Carter
"We use a large, vibrating egg."
Annie Hall
44