clean_2d - cleanup after 2D run.

INTERFACE:

    subroutine clean_2d()
    IMPLICIT NONE
INPUT PARAMETERS:
INPUT/OUTPUT PARAMETERS:
OUTPUT PARAMETERS:

DESCRIPTION:

This routine executes a final call to do_residual where the residual current calculations are finished. LOCAL VARIABLES: