let
add_filter proj filter =
proj.
T
.actions <- filter :: proj.
T
.actions