Update BasisSetSchrodinger.wl

b3m2a1 · b3m2a1 · commit 62a4e1827cf4 · 2018-12-10T01:01:50.000-08:00
diff --git a/BasisSetSchrodinger.wl b/BasisSetSchrodinger.wl
@@ -115,8 +115,9 @@ getBasisFunction["HarmonicOscillator", ops___]:=
     ];
 getBasisFunction[l_List]:=
   getBasisFunction@@l;
-getBasisFunction[___]:=
+getBasisFunction[_String, ___]:=
   $Failed;
+getBasisFunction[e_]:=e;
 
 
 (* ::Subsubsection:: *)
