/[escript]/branches/domexper/dudley/src/Dudley.c
ViewVC logotype

Contents of /branches/domexper/dudley/src/Dudley.c

Parent Directory Parent Directory | Revision Log Revision Log


Revision 155 - (show annotations)
Wed Nov 9 02:02:19 2005 UTC (13 years, 4 months ago) by jgs
Original Path: trunk/finley/src/finleyC/Finley.c
File MIME type: text/plain
File size: 2888 byte(s)
move all directories from trunk/esys2 into trunk and remove esys2

1 /*
2 ******************************************************************************
3 * *
4 * COPYRIGHT ACcESS 2003,2004,2005 - All Rights Reserved *
5 * *
6 * This software is the property of ACcESS. No part of this code *
7 * may be copied in any form or by any means without the expressed written *
8 * consent of ACcESS. Copying, use or modification of this software *
9 * by any unauthorised person is illegal unless that person has a software *
10 * license agreement with ACcESS. *
11 * *
12 ******************************************************************************
13 */
14
15 /**************************************************************/
16
17 /* Finley finite element solver */
18
19 /**************************************************************/
20
21 /* Author: gross@access.edu.au */
22 /* Version: $Id$ */
23
24 /**************************************************************/
25
26 #include "Finley.h"
27
28
29 /* This function returns a time mark */
30 double Finley_timer(void) {
31 return Paso_timer();
32 }
33
34 /* This function checks if the pointer ptr has a target. If not an
35 error is raised and TRUE is returned. */
36 bool_t Finley_checkPtr(void* arg) {
37 return Paso_checkPtr(arg);
38 }
39
40 /* reset the error to NO_ERROR */
41 void Finley_resetError(void) {
42 Paso_resetError();
43 }
44
45 /* sets an error */
46 void Finley_setError(Finley_ErrorCodeType err,char* msg) {
47 Paso_setError(err,msg);
48 }
49
50 /* checks if there is no error */
51 bool_t Finley_noError(void) {
52 return Paso_noError();
53 }
54
55 /* return the error code */
56 Finley_ErrorCodeType Finley_getErrorType(void) {
57 return Paso_getErrorType();
58 }
59
60 /* return the error message */
61 char* Finley_getErrorMessage(void) {
62 return Paso_getErrorMessage();
63 }
64 /* return the error message */
65 void Finley_convertPasoError(void) {
66 /* nothing has to be done here */
67 }
68
69
70 /**************************************************************/
71
72
73 /*
74 * $Log$
75 * Revision 1.3 2005/09/15 03:44:22 jgs
76 * Merge of development branch dev-02 back to main trunk on 2005-09-15
77 *
78 * Revision 1.2.2.1 2005/09/07 06:26:18 gross
79 * the solver from finley are put into the standalone package paso now
80 *
81 * Revision 1.2 2005/07/08 04:07:50 jgs
82 * Merge of development branch back to main trunk on 2005-07-08
83 *
84 * Revision 1.1.1.1.2.1 2005/06/29 02:34:50 gross
85 * some changes towards 64 integers in finley
86 *
87 * Revision 1.1.1.1 2004/10/26 06:53:57 jgs
88 * initial import of project esys2
89 *
90 * Revision 1.2 2004/07/02 04:21:13 gross
91 * Finley C code has been included
92 *
93 * Revision 1.1.1.1 2004/06/24 04:00:40 johng
94 * Initial version of eys using boost-python.
95 *
96 *
97 */

Properties

Name Value
svn:eol-style native
svn:keywords Author Date Id Revision

  ViewVC Help
Powered by ViewVC 1.1.26