module AsPatternAlias; f : Type -> Type; f a@b := b; end;