source: ThirdParty/mpqc_open/src/lib/util/psi3/libpsio/toclast.cc@ 866dec

AutomationFragmentation_failures Candidate_v1.6.1 ChemicalSpaceEvaluator Enhanced_StructuralOptimization_continued Exclude_Hydrogens_annealWithBondGraph ForceAnnealing_with_BondGraph ForceAnnealing_with_BondGraph_contraction-expansion Gui_displays_atomic_force_velocity PythonUI_with_named_parameters StoppableMakroAction TremoloParser_IncreasedPrecision
Last change on this file since 866dec was 860145, checked in by Frederik Heber <heber@…>, 8 years ago

Merge commit '0b990dfaa8c6007a996d030163a25f7f5fc8a7e7' as 'ThirdParty/mpqc_open'

  • Property mode set to 100644
File size: 409 bytes
Line 
1/*!
2 \file toclast.c
3 \ingroup (PSIO)
4*/
5
6#include <util/psi3/libpsio/psio.h>
7
8namespace psi3 {
9namespace libpsio {
10
11/*!
12** PSIO_TOCLAST(): Returns the last TOC entry.
13**
14** \ingroup (PSIO)
15*/
16
17psio_tocentry *psio_toclast(unsigned int unit)
18{
19 psio_tocentry *this_entry;
20
21 this_entry = psio_unit[unit].toc;
22
23 while(this_entry->next != NULL) this_entry = this_entry->next;
24
25 return(this_entry);
26}
27
28}
29}
Note: See TracBrowser for help on using the repository browser.