From 6edc43c9fc96b328653352b48f9a786a9b86b4f0 Mon Sep 17 00:00:00 2001
From: Knut <knutaros@gmx.net>
Date: Tue, 19 Feb 2019 02:11:54 +0100
Subject: [PATCH] numerical_analyses: bugfix after merge

---
 src/getm/register_all_variables.F90 | 39 +----------------------------
 1 file changed, 1 insertion(+), 38 deletions(-)

diff --git a/src/getm/register_all_variables.F90 b/src/getm/register_all_variables.F90
index 2687e7ae..5b3cc454 100644
--- a/src/getm/register_all_variables.F90
+++ b/src/getm/register_all_variables.F90
@@ -231,6 +231,7 @@
 #ifdef _FABM_
    call finalize_register_fabm_variables(fm)
 #endif
+   call finalize_register_processed_variables(fm)
 
    return
    end subroutine finalize_register_all_variables
@@ -381,44 +382,6 @@
    end subroutine register_diagnostic_variables
 !EOC
 
-!-----------------------------------------------------------------------
-!BOP
-!
-! !ROUTINE: finalize_register_all_variables() - send optional variables.
-!
-! !INTERFACE:
-   subroutine finalize_register_all_variables(runtype)
-!
-! !DESCRIPTION:
-!
-! !USES:
-   use variables_2d
-#ifndef NO_3D
-   use variables_3d
-#endif
-#ifdef _FABM_
-   use getm_fabm
-#endif
-   IMPLICIT NONE
-!
-! !INPUT PARAMETERS:
-   integer, intent(in)               :: runtype
-!
-! !REVISION HISTORY:
-!  Original author(s): Karsten Bolding & Jorn Bruggeman
-!
-! !LOCAL VARIABLES:
-!EOP
-!-----------------------------------------------------------------------
-!BOC
-   LEVEL1 'finalize_register_all_variables()'
-
-   call finalize_register_processed_variables(fm)
-
-   return
-   end subroutine finalize_register_all_variables
-!EOC
-
 !-----------------------------------------------------------------------
 
    end module register_all_variables
-- 
GitLab