Save the model results in file

INTERFACE:

    subroutine do_output(n,nlev)

DESCRIPTION:

Calls the routine, which will do the actual storing of results, depending on the output format.

USES:

    IMPLICIT NONE

INPUT PARAMETERS:

    integer, intent(in)                 :: n,nlev

REVISION HISTORY:

    Original author(s): Karsten Bolding & Hans Burchard

LOCAL VARIABLES:

    REALTYPE                   :: secs