Procedure: main by
Description of the procedure:
Source:
procedure main
va 100
ga 90
va 100
ga 90
va 100
ga 90
va 100
fin