/[escript]/branches/trilinos_from_5897/dudley/src/Dudley.cpp
ViewVC logotype

Contents of /branches/trilinos_from_5897/dudley/src/Dudley.cpp

Parent Directory Parent Directory | Revision Log Revision Log


Revision 5898 - (show annotations)
Fri Feb 5 03:37:49 2016 UTC (3 years, 2 months ago) by caltinay
File size: 2001 byte(s)
trilinos playground

1
2 /*****************************************************************************
3 *
4 * Copyright (c) 2003-2016 by The 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 2012-2013 by School of Earth Sciences
13 * Development from 2014 by Centre for Geoscience Computing (GeoComp)
14 *
15 *****************************************************************************/
16
17 /************************************************************************************/
18
19 /* Dudley finite element solver */
20
21 /************************************************************************************/
22
23 #include "Dudley.h"
24
25 /* This function returns a time mark */
26 double Dudley_timer(void)
27 {
28 return Esys_timer();
29 }
30
31 /* This function checks if the pointer ptr has a target. If not an
32 error is raised and TRUE is returned. */
33 bool Dudley_checkPtr(void *arg)
34 {
35 return Esys_checkPtr(arg);
36 }
37
38 /* reset the error to NO_ERROR */
39 void Dudley_resetError(void)
40 {
41 Esys_resetError();
42 }
43
44 /* sets an error */
45 void Dudley_setError(Dudley_ErrorCodeType err, __const char *msg)
46 {
47 Esys_setError(err, msg);
48 }
49
50 /* checks if there is no error */
51 bool Dudley_noError(void)
52 {
53 return Esys_noError();
54 }
55
56 /* return the error code */
57 Dudley_ErrorCodeType Dudley_getErrorType(void)
58 {
59 return Esys_getErrorType();
60 }
61
62 /* return the error message */
63 char *Dudley_getErrorMessage(void)
64 {
65 return Esys_getErrorMessage();
66 }
67
68 /* return the error message */
69 void Dudley_convertPasoError(void)
70 {
71 /* nothing has to be done here */
72 }
73
74 /* checks that there is no error across all processes in a communicator */
75 /* NOTE : does not make guarantee consistency of error string on each process */
76 bool Dudley_MPI_noError(esysUtils::JMPI& mpi_info)
77 {
78 return esysUtils::Esys_MPIInfo_noError(mpi_info);
79 }

Properties

Name Value
svn:eol-style native
svn:keywords Author Date Id Revision
svn:mergeinfo /branches/4.0fordebian/dudley/src/Dudley.cpp:5567-5588 /branches/lapack2681/finley/src/Finley.c:2682-2741 /branches/pasowrap/dudley/src/Dudley.c:3661-3674 /branches/py3_attempt2/dudley/src/Dudley.c:3871-3891 /branches/restext/finley/src/Finley.c:2610-2624 /branches/ripleygmg_from_3668/dudley/src/Dudley.c:3669-3791 /branches/stage3.0/finley/src/Finley.c:2569-2590 /branches/symbolic_from_3470/dudley/src/Dudley.c:3471-3974 /branches/symbolic_from_3470/ripley/test/python/dudley/src/Dudley.c:3517-3974 /release/3.0/finley/src/Finley.c:2591-2601 /release/4.0/dudley/src/Dudley.cpp:5380-5406 /trunk/dudley/src/Dudley.cpp:4257-4344 /trunk/ripley/test/python/dudley/src/Dudley.c:3480-3515

  ViewVC Help
Powered by ViewVC 1.1.26