constraint_block ::=
solve identifier_list before identifier_list ;
| expression dist { dist_list } ;
| constraint_expression
…