From 17098a0e744dd882a4bd4c3665820fcdebce1dc3 Mon Sep 17 00:00:00 2001
From: Tony Hess <anthony.hess@pnl.gov>
Date: Tue, 20 Aug 1996 23:51:48 +0000
Subject: [PATCH] call to gap_parse adde to this routine

---
 src/input/input_parse.F | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/src/input/input_parse.F b/src/input/input_parse.F
index 4922968f42..179768fb0d 100644
--- a/src/input/input_parse.F
+++ b/src/input/input_parse.F
@@ -1,5 +1,5 @@
       logical function input_parse(rtdb)
-C     $Id: input_parse.F,v 1.26 1996-08-06 05:35:41 d3g681 Exp $
+C     $Id: input_parse.F,v 1.27 1996-08-20 23:51:48 d3e863 Exp $
       implicit none
       integer rtdb              ! [input]
 #include "inp.fh"
@@ -91,6 +91,8 @@ c
                call prop_input(rtdb)
             else if (inp_compare(.false.,test,'speech')) then
                call speech_input(rtdb)
+            else if (inp_compare(.false.,test,'gapss')) then
+               call gap_parse(rtdb)
 c
 c     INSERT NEW ELSE IF CLAUSES HERE
 c