Rule Locrian ( ) { return Sequence ( IgnoreCase ( "loc" ) , Optional ( Sequence ( IgnoreCase ( "r" ) , Optional ( Sequence ( IgnoreCase ( "i" ) , Optional ( Sequence ( IgnoreCase ( "a" ) , Optional ( IgnoreCase ( "n" ) ) ) ) ) ) ) ) ) . label ( Locrian ) . suppressSubnodes ( ) ; }
minor with flat 2nd and 5th