procedure_declaration ::= procedure_heading ";" block ident
This rule is called by -> declaration
-> declaration
