Procedure: main by Hans

Description of the procedure:
procedure main
repeat 3 tri
end

procedure tri
go 100
turn 60
end

Source:

procedure main
go 100
end