include/nrjac.h

   1 /*
   2  * $Id$
   3  *
   4  *       This source code is part of
   5  *
   6  *        G   R   O   M   A   C   S
   7  *
   8  * GROningen MAchine for Chemical Simulations
   9  *
  10  *               VERSION 2.0
  11  *
  12  * Copyright (c) 1991-1999
  13  * BIOSON Research Institute, Dept. of Biophysical Chemistry
  14  * University of Groningen, The Netherlands
  15  *
  16  * Please refer to:
  17  * GROMACS: A message-passing parallel molecular dynamics implementation
  18  * H.J.C. Berendsen, D. van der Spoel and R. van Drunen
  19  * Comp. Phys. Comm. 91, 43-56 (1995)
  20  *
  21  * Also check out our WWW page:
  22  * http://md.chem.rug.nl/~gmx
  23  * or e-mail to:
  24  * gromacs@chem.rug.nl
  25  *
  26  * And Hey:
  27  * Good ROcking Metal Altar for Chronical Sinners
  28  */
  29
  30 #ifndef _nrjac_h
  31 #define _nrjac_h
  32
  33 static char *SRCID_nrjac_h = "$Id$";
  34
  35 #ifdef HAVE_CONFIG_H
  36 #include <config.h>
  37 #endif
  38
  39 extern void jacobi(double **a,int n,double d[],double **v,int *nrot);
  40 /*
  41  * real   **omega = input matrix a[0..n-1][0..n-1] must be symmetric
  42  * int     natoms = number of rows and columns
  43  * real      NULL = d[0]..d[n-1] are the eigenvalues of a[][]
  44  * real       **v = v[0..n-1][0..n-1] contains the vectors in columns
  45  * int      *irot = number of jacobi rotations
  46  */
  47 #endif