Aliase für Standard-Common-Lisp-Funktionen definieren?

Lisp soll eine Neudefinition seiner Kernfunktionen ermöglichen. Ich möchte einen Alias für die Funktion definierencl:documentation Funktion, so dass

(doc 'write 'function) === (documentation 'write 'function)

Wie kann dies in SBCL durchgeführt und dauerhaft gemacht werden?