From bbd835402d40fed7040b220d607e8d6ea23906b9 Mon Sep 17 00:00:00 2001
From: edoapra <edoardo.apra@gmail.com>
Date: Wed, 14 Dec 2022 18:06:11 -0800
Subject: [PATCH] backing off commit 58800d4f3b6f151afa92e0068a491f8b9d75f74d

---
 src/basis/bas_input.F | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/src/basis/bas_input.F b/src/basis/bas_input.F
index 9517e2b5f9..2a3e6cd9bf 100644
--- a/src/basis/bas_input.F
+++ b/src/basis/bas_input.F
@@ -1135,11 +1135,13 @@ c     Now read the basis for this magical atom type in using
 c     the given tag
 c
  10   if (.not. inp_a(field)) field=' '
+#ifdef IGNORE_HEH
 c
 c     ignore spherical vs cartesian from bse for He/H
 c     since they do assign spherical when the other elements are cartesian
 c
       if (.not.inp_compare(.false., 'h', string(1:1))) then
+#endif
       if(read_sphere) then
          if (inp_compare(.false., 'spherical', field)) then
             if (.not. bas_set_spherical(basis, .true.))
@@ -1147,7 +1149,9 @@ c
      &           (' bas_set_spherical failed ',911, BASIS_ERR)
          endif
       endif
+#ifdef IGNORE_HEH
       endif
+#endif
       if (.not. inp_read()) call errquit
      $     ('bas_tag_lib: premature EOF', 0, INPUT_ERR)
 c