8.5 SUBROUTINE EXPEC1

c----------------------------------------------------------------------
      subroutine expec1(den1,method,iop1,iop2)
c----------------------------------------------------------------------
      implicit double precision (a-h,o-z)
      character*(*) method
      dimension den1(*)

evaluates expectation vales for operators specified on expec card. (see subroutine EXPEC_INP).
Note: dipole moments are not printed!

Input parameters:

den1

density in AO basis (symmetric, lower triangle)

method

string to be printed

iop1

first operator to be used (normally 1)

iop2

last operator to be used (normally noper1)