Formula for compface/uncompface.

Useful for Emacs Gnus users.