NDF_HECHO - Write out lines of history text

Description:

The routine writes a series of lines of text to the standard output channel, indented by three spaces. It is provided as a default service routine which may be passed as an argument to NDF_HOUT in order to display NDF history information.

The specification of this routine may be used as a template when writing alternative service routines for use by NDF_HOUT.

Invocation:

CALL NDF_HECHO( NLINES, TEXT, STATUS )

Arguments:

NLINES = INTEGER (Given)

Number of lines of text to be written.

TEXT( NLINES ) = CHARACTER $*$ ( $*$ ) (Given)

Array of text lines.

STATUS = INTEGER (Given and Returned)

The global status.

Notes:

Before passing this (or a similar) routine as an argument to NDF_HOUT the calling routine should declare it in a Fortran EXTERNAL statement.