асто нужно извлечь, чтобы ограничить списки значений для подсписков, т.е. еслиvals дает значенияvars={x1,x2,x3,x4}и мне нужны значенияsvars={x2,x4} я делаюrestrict[list,vars,svars]где

restrict[vars_, svars_, vals_] := 
 Extract[vals, Flatten[Position[vars, #] & /@ svars, 1]]

Я хотел бы улучшить читаемость кода, возможно, путем определения следующих пользовательских обозначений дляrestrict[vars,svars,vals]

http://yaroslavvb.com/upload/custom-notation.png

Мои вопросы

Какой хороший способ реализовать это?Это хорошая идея в целом?