Function Extract-Head-Form

Part of:

package metabang.utilities
( extract-head-form < fexp > )
Give back the thing that can appear as the head of a procedure
application.