lift = fix ((`ap` tail) . (. head) . flip ((.) . liftM2 (:)))

It is possible to fill in basic function bodies based on their type, using ghc-justdoit (https://hackage.haskell.org/package/ghc-justdoit). That's maybe not what you meant, if you are looking for integrating pointfree into Haskell it can be added to ghci or your development environment.

    foo :: ((a -> r) -> r) -> (a -> ((b -> r) -> r)) -> ((b -> r) -> r)
    foo = (…)

      flip \a -> ($ a)
    = flip (&)
    = flip (flip ($))
    = ($)

    (??) :: Functor f => f (a -> b) -> a -> f b
    funs ?? a = fmap ($ a) funs

This is valid definition of lift along a different, less interesting but more general axis.

    lift = (??) @[]

    lift = flip $ \a -> ($a)