##############################################################################
###+---------+################################################################
#+-| F_CLOSE |--------------------------------------------------+#############
#| +---------+ Closes the text file associated with file_stream |#############
#+--------------------------------------------------------------+#############
##############################################################################
##############################################################################
#+--| Summary |----------------+##############################################
#|     #INCLUDE fileio.hdr     |##############################################
#+-----------------------------+##############################################
##############################################################################
##############################################################################
#+--| Syntax |--------------------------+#####################################
#|     PROCEDURE f_close PROTOTYPE      |#####################################
#|      PARAMETERS FILE file_stream     |#####################################
#+--------------------------------------+#####################################
##############################################################################
##############################################################################
##########+---| Description |-------------------------------------+###########
##########| The f_close procedure closes the text file associated |###########
##########| with file_stream.  All buffers are flushed to the     |###########
##########| file before closing.                                  |###########
##########+-------------------------------------------------------+###########
##############################################################################
##############################################################################
#########+--| Example 1 |-------------------------------------------+#########
#########| *    Close file before terminating program.              |#########
#########|                                                          |#########
#########| DO f_close WITH file_stream                              |#########
#########| QUIT                                                     |#########
#########+----------------------------------------------------------+#########
##############################################################################
##############################################################################
#########+--| Example 2 |-------------------------------------------+#########
#########| *    Alternative method of encoding f_close.             |#########
#########| *    Note that procedures can be called in the same      |#########
#########| *    manner as a function.                               |#########
#########|                                                          |#########
#########| f_close( file_stream )                                   |#########
#########| QUIT                                                     |#########
#########+----------------------------------------------------------+#########
##############################################################################