(Program
{+(BeginBlock
    (Identifier))+}
{-(Identifier)-}
{-(BeginBlock
    (Identifier))-})