ESYS13  Revision_
LapackInverseHelper.h
Go to the documentation of this file.
00001 
00002 /*******************************************************
00003 *
00004 * Copyright (c) 2009-2012 by University of Queensland
00005 * Earth Systems Science Computational Center (ESSCC)
00006 * http://www.uq.edu.au/esscc
00007 *
00008 * Primary Business: Queensland, Australia
00009 * Licensed under the Open Software License version 3.0
00010 * http://www.opensource.org/licenses/osl-3.0.php
00011 *
00012 *******************************************************/
00013 
00014 #ifndef LAPACKINVERSEHELPER_H
00015 #define LAPACKINVERSEHELPER_H
00016 
00017 namespace escript
00018 {
00019 
00023 class LapackInverseHelper
00024 {
00025 public:
00026     LapackInverseHelper(int N);
00027     ~LapackInverseHelper();
00028     int invert(double* matrix);
00029 private:
00030     int* piv;
00031     double* work;
00032     int N;
00033     int lwork;
00034 };
00035 
00036 }   // end of escript namespace
00037 
00038 #endif