************************************************************************
*                                                                      *
*    Written by: P. Bernat Szabo                                       *
*     @ Budapest University of Technology and Economics, 20/07/2020    *
*                                                                      *
************************************************************************
      program uccsd
************************************************************************
#include "MRCCCOMMON"
      integer ccmem(8)

      call mrccini
      call memalloc
      call uccsdpt(iimem,imem,maxcor,icore,dcore,irecln,iibufln,
     $             ibufln,gbasfile,ifcfile,diisfile,errfile,ccmem,
     $             iout,nbsetmax)

      call mrccend(0)

      stop
      end