Added Michael Shirts long-range dispersion and repulsion corrections that are correct...
[gromacs.git] / src / gmxlib / minvert.h
blob4191b0205be970c47a8c8f20720d1e4f128a8982
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 3.2.0
11 * Written by David van der Spoel, Erik Lindahl, Berk Hess, and others.
12 * Copyright (c) 1991-2000, University of Groningen, The Netherlands.
13 * Copyright (c) 2001-2004, The GROMACS development team,
14 * check out http://www.gromacs.org for more information.
16 * This program is free software; you can redistribute it and/or
17 * modify it under the terms of the GNU General Public License
18 * as published by the Free Software Foundation; either version 2
19 * of the License, or (at your option) any later version.
21 * If you want to redistribute modifications, please consider that
22 * scientific software is very special. Version control is crucial -
23 * bugs must be traceable. We will be happy to consider code for
24 * inclusion in the official distribution, but derived work must not
25 * be called official GROMACS. Details are found in the README & COPYING
26 * files - if they are missing, get the official version at www.gromacs.org.
28 * To help us fund GROMACS development, we humbly ask that you cite
29 * the papers on the package - you can find them in the top README file.
31 * For more info, check our website at http://www.gromacs.org
33 * And Hey:
34 * GROningen Mixture of Alchemy and Childrens' Stories
37 #ifndef _minvert_h
38 #define _minvert_h
40 #include "typedefs.h"
42 /* A bunch of routines that works on matrices that run from 1 thru n
43 * although they are allocated from 0 thru n
46 extern void mat_mult(int n,real **A,real **B,real **C);
48 extern real **mk_mat(int n);
50 extern real **mk_mat2(int nrow,int ncol);
52 extern void cp_mat(int n,real **src,real **dest);
54 extern void print_mat(FILE *fp,char *title,int n,real **a,int *indx);
55 /* index may be NULL */
57 extern void invert_mat(int n,real **A,real **Ainv);
59 #endif