← Back to branch summary

~ubuntu-branches/ubuntu/vivid/psicode/vivid

« back to all changes in this revision

Viewing changes to src/bin/ccenergy/get_moinfo.c

  • Committer: Bazaar Package Importer
  • Author(s): Michael Banck
  • Date: 2008-06-07 16:49:57 UTC
  • mfrom: (2.1.2 hardy)
  • Revision ID: james.westby@ubuntu.com-20080607164957-8pifvb133yjlkagn
Tags: 3.3.0-3
http://bugs.debian.org/464867
* debian/rules (DEB_MAKE_CHECK_TARGET): Do not abort test suite on
  failures.
* debian/rules (DEB_CONFIGURE_EXTRA_FLAGS): Set ${bindir} to /usr/lib/psi.
* debian/rules (install/psi3): Move psi3 file to /usr/bin.
* debian/patches/07_464867_move_executables.dpatch: New patch, add
  /usr/lib/psi to the $PATH, so that the moved executables are found.
  (closes: #464867)
* debian/patches/00list: Adjusted.

Show diffs side-by-side

added added

removed removed

Lines of Context:
src/bin/ccenergy/get_moinfo.c
26
26
  moinfo.nirreps = chkpt_rd_nirreps();
27
27
  moinfo.nmo = chkpt_rd_nmo();
28
28
  moinfo.nso = chkpt_rd_nso();
 
29
  moinfo.nao = chkpt_rd_nao();
29
30
  moinfo.iopen = chkpt_rd_iopen();
30
31
  moinfo.labels = chkpt_rd_irr_labs();
31
32
  moinfo.enuc = chkpt_rd_enuc();
246
247
      moinfo.openpi[i] - moinfo.fruocc[i] -
247
248
      moinfo.frdocc[i];
248
249
 
 
250
  if(params.ref == 0) {
 
251
    moinfo.nvirt = 0;
 
252
    for(h=0; h < nirreps; h++) moinfo.nvirt += moinfo.virtpi[h];
 
253
  }
 
254
 
249
255
  psio_read_entry(CC_INFO, "Reference Energy", (char *) &(moinfo.eref), 
250
256
                  sizeof(double));
251
257
 
259
265
{
260
266
  int i, h;
261
267
 
262
 
  psio_write_entry(CC_INFO, "CCSD Energy", (char *) &(moinfo.ecc),
263
 
                   sizeof(double));
 
268
  if( (!strcmp(params.wfn,"CC2")) || (!strcmp(params.wfn,"EOM_CC2"))) {
 
269
    psio_write_entry(CC_INFO, "CC2 Energy", (char *) &(moinfo.ecc),
 
270
                     sizeof(double));
 
271
  }
 
272
  else if( (!strcmp(params.wfn,"CC3")) || (!strcmp(params.wfn,"EOM_CC3"))) {
 
273
    psio_write_entry(CC_INFO, "CC3 Energy", (char *) &(moinfo.ecc),
 
274
                     sizeof(double));
 
275
  }
 
276
  else {
 
277
    psio_write_entry(CC_INFO, "CCSD Energy", (char *) &(moinfo.ecc),
 
278
                     sizeof(double));
 
279
  }
264
280
 
265
281
  if(params.ref == 0 || params.ref == 1) {
266
282
    for(h=0; h < moinfo.nirreps; h++)