include "Simantics/All" layer0Categories :: Resource -> Maybe Resource layer0Categories predicate = match predicate with L0.HasName -> Just MOD.SystemPropertyInfo _ -> Nothing