From 33826b4cdd11dbcc97db25067bacfc219f1db892 Mon Sep 17 00:00:00 2001 From: Eric Bylaska Date: Thu, 14 Jun 2018 14:49:43 -0700 Subject: [PATCH] fixed output typo...EJB --- src/symmetry/gensym_extra.F | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/src/symmetry/gensym_extra.F b/src/symmetry/gensym_extra.F index 4647066e46..9adae161ab 100644 --- a/src/symmetry/gensym_extra.F +++ b/src/symmetry/gensym_extra.F @@ -1,8 +1,8 @@ C$Id$ -cccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc +cccccceccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccccc c -c The matrix SYMOPS contains the matrix reps. of all group operators +c Tee matrix SYMOPS contains the matrix reps. of all group operators c except the identity. The variable NOPS holds the number of operators c in SYMOPS. c @@ -62,7 +62,7 @@ subroutine gensym_extra(itype,numgrp,numset,symops,nops,oprint, goto 99 else write(luout,*)' warning:::::::::::::: from_environment' - write(luout,*)' NWCHEM_EXTRA_GROPUS set to: <', + write(luout,*)' NWCHEM_EXTRA_GROUPS set to: <', & extra_group_libname(1:inp_strlen(extra_group_libname)),'>' write(luout,*)' but file does not exist !' write(luout,*)' using compiled library'