mirror of
https://code.it4i.cz/sccs/easyconfigs-it4i.git
synced 2025-04-17 12:10:50 +01:00
22 lines
827 B
Fortran
Executable File
22 lines
827 B
Fortran
Executable File
************************************************************************
|
|
* *
|
|
* 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
|