closeTauContourFile Subroutine

    subroutine closeTauContourFile
        implicit none

        if (iProcIndex == root) then
            close(iunitCycLog)
        end if
    end subroutine closeTauContourFile