/*****************************************************************************
	ExeCtL()
	This function executes a ^L (control-L or caret-L) command.
*****************************************************************************/
#include "zport.h"		/* define portability identifiers */
#include "tecoc.h"		/* define general identifiers */
#include "defext.h"		/* define external global variables */
#include "dchars.h"		/* define identifiers for characters */
DEFAULT ExeCtL()		/* execute an ^L (control-L) command */
{
	ZDspCh(FORMFD);
	return SUCCESS;
}