ESScript  Revision_4488
LapackInverseHelper.h
Go to the documentation of this file.
1 
2 /*****************************************************************************
3 *
4 * Copyright (c) 2009-2013 by University of Queensland
5 * http://www.uq.edu.au
6 *
7 * Primary Business: Queensland, Australia
8 * Licensed under the Open Software License version 3.0
9 * http://www.opensource.org/licenses/osl-3.0.php
10 *
11 * Development until 2012 by Earth Systems Science Computational Center (ESSCC)
12 * Development since 2012 by School of Earth Sciences
13 *
14 *****************************************************************************/
15 
16 #ifndef LAPACKINVERSEHELPER_H
17 #define LAPACKINVERSEHELPER_H
18 
19 namespace escript
20 {
21 
26 {
27 public:
30  int invert(double* matrix);
31 private:
32  int* piv;
33  double* work;
34  int N;
35  int lwork;
36 };
37 
38 } // end of escript namespace
39 
40 #endif
41