/[escript]/trunk/paso/src/Options_getPackage.c
ViewVC logotype

Diff of /trunk/paso/src/Options_getPackage.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 969 by ksteube, Tue Feb 13 23:02:23 2007 UTC revision 2548 by jfenwick, Mon Jul 20 06:20:06 2009 UTC
# Line 1  Line 1 
 /* $Id$ */  
1    
2  /*  /*******************************************************
3  ********************************************************************************  *
4  *               Copyright   2006 by ACcESS MNRF                                *  * Copyright (c) 2003-2009 by University of Queensland
5  *                                                                              *  * Earth Systems Science Computational Center (ESSCC)
6  *                 http://www.access.edu.au                                     *  * http://www.uq.edu.au/esscc
7  *           Primary Business: Queensland, Australia                            *  *
8  *     Licensed under the Open Software License version 3.0             *  * Primary Business: Queensland, Australia
9  *        http://www.opensource.org/licenses/osl-3.0.php                        *  * Licensed under the Open Software License version 3.0
10  ********************************************************************************  * http://www.opensource.org/licenses/osl-3.0.php
11  */  *
12    *******************************************************/
13    
14    
15  /**************************************************************/  /**************************************************************/
16    
# Line 27  Line 28 
28    
29  /**************************************************************/  /**************************************************************/
30    
31  index_t Paso_Options_getPackage(index_t solver,index_t package, bool_t symmetry) {  index_t Paso_Options_getPackage(index_t solver,index_t package, bool_t symmetry, Paso_MPIInfo *mpi_info) {
32    index_t out=PASO_PASO;    index_t out=PASO_PASO;
33    if (package==PASO_DEFAULT) {    if (package==PASO_DEFAULT) {
34        if (solver==PASO_DIRECT) {        if (solver==PASO_DIRECT) {
35           #ifdef MKL           #ifdef MKL
36              out=PASO_MKL;              out=PASO_MKL;
37           #else           #else
38              #ifdef SCSL              #ifdef UMFPACK
39                out=PASO_SCSL;                out=PASO_UMFPACK;
40              #else              #else
41                #ifdef UMFPACK                #ifdef PASTIX
42                  out=PASO_UMFPACK;                 out=PASO_PASTIX
43                #endif                #endif
44              #endif              #endif
45           #endif           #endif
46             if (( (out == PASO_MKL) || (out==PASO_UMFPACK) || (out == PASO_PASTIX) ) && (mpi_info->size>1) ) {  /* these packages require CSC  which is not supported with MPI */
47                  out= PASO_PASO;
48             }
49        } else {        } else {
50           out=PASO_PASO;           out=PASO_PASO;
51        }        }
52    } else if (package==PASO_PASO) {    } else if (package==PASO_PASO) {
53        out=PASO_PASO;        out=PASO_PASO;
54    } else if (package==PASO_SCSL) {    } else if (package==PASO_PASTIX) {
55        out=PASO_SCSL;        out=PASO_PASTIX;
56    } else if (package==PASO_MKL) {    } else if (package==PASO_MKL) {
57        out=PASO_MKL;        out=PASO_MKL;
58    } else if (package==PASO_UMFPACK) {    } else if (package==PASO_UMFPACK) {
# Line 60  index_t Paso_Options_getPackage(index_t Line 64  index_t Paso_Options_getPackage(index_t
64    }    }
65    return out;    return out;
66  }  }
   
 /*  
  * $Log$  
  * Revision 1.2  2005/09/15 03:44:38  jgs  
  * Merge of development branch dev-02 back to main trunk on 2005-09-15  
  *  
  * Revision 1.1.2.1  2005/09/05 06:29:46  gross  
  * These files have been extracted from finley to define a stand alone libray for iterative  
  * linear solvers on the ALTIX. main entry through Paso_solve. this version compiles but  
  * has not been tested yet.  
  *  
  *  
  */  

Legend:
Removed from v.969  
changed lines
  Added in v.2548

  ViewVC Help
Powered by ViewVC 1.1.26