From 8f1089d78729cdfc61cee4704124dd539d0c0ba4 Mon Sep 17 00:00:00 2001
From: daminton <daminton@purdue.edu>
Date: Tue, 6 Dec 2016 15:23:04 +0000
Subject: [PATCH] Removed obsolete tally components.

---
 src/init/init_surf.f90 | 3 ---
 1 file changed, 3 deletions(-)

diff --git a/src/init/init_surf.f90 b/src/init/init_surf.f90
index 9ec49ba3..8a0609f7 100644
--- a/src/init/init_surf.f90
+++ b/src/init/init_surf.f90
@@ -32,11 +32,8 @@ subroutine init_surf(user,surf)
    surf%dem    = 0.0_DP
    do layer = 1,user%numlayers
       surf%diam(layer)   = 0.0_DP
-      surf%isrim(layer)  = 0
       surf%xl(layer)     = 0.0_SP
       surf%yl(layer)     = 0.0_SP
-      surf%original_depth(layer) = 0.0_SP
-      surf%baseline(layer) = 0.0_SP
    end do
    !if (user%docrustal_thinning) surf%mantle = 0._DP