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

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

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

revision 3086 by jfenwick, Thu Aug 5 05:07:58 2010 UTC revision 3224 by jfenwick, Wed Sep 29 05:19:37 2010 UTC
# Line 11  Line 11 
11  *  *
12  *******************************************************/  *******************************************************/
13    
   
14  /**************************************************************/  /**************************************************************/
15    
16  /*    Dudley finite element solver */  /*    Dudley finite element solver */
# Line 21  Line 20 
20  #include "Dudley.h"  #include "Dudley.h"
21    
22  /* This function returns a time mark */  /* This function returns a time mark */
23  double Dudley_timer(void) {  double Dudley_timer(void)
24     return Paso_timer();  {
25        return Paso_timer();
26  }  }
27    
28  /* This function checks if the pointer ptr has a target. If not an  /* This function checks if the pointer ptr has a target. If not an
29     error is raised and TRUE is returned. */     error is raised and TRUE is returned. */
30  bool_t Dudley_checkPtr(void* arg) {  bool_t Dudley_checkPtr(void *arg)
31     return Paso_checkPtr(arg);  {
32        return Paso_checkPtr(arg);
33  }  }
34    
35  /* reset the error to NO_ERROR */  /* reset the error to NO_ERROR */
36  void Dudley_resetError(void) {  void Dudley_resetError(void)
37    Paso_resetError();  {
38        Paso_resetError();
39  }  }
40    
41  /* sets an error */  /* sets an error */
42  void Dudley_setError(Dudley_ErrorCodeType err,__const char* msg) {  void Dudley_setError(Dudley_ErrorCodeType err, __const char *msg)
43    Paso_setError(err,msg);  {
44        Paso_setError(err, msg);
45  }  }
46    
47  /* checks if there is no error */  /* checks if there is no error */
48  bool_t Dudley_noError(void) {  bool_t Dudley_noError(void)
49     return Paso_noError();  {
50        return Paso_noError();
51  }  }
52    
53  /* return the error code */  /* return the error code */
54  Dudley_ErrorCodeType Dudley_getErrorType(void) {  Dudley_ErrorCodeType Dudley_getErrorType(void)
55    {
56      return Paso_getErrorType();      return Paso_getErrorType();
57  }  }
58    
59  /* return the error message */  /* return the error message */
60  char* Dudley_getErrorMessage(void) {  char *Dudley_getErrorMessage(void)
61    return Paso_getErrorMessage();  {
62        return Paso_getErrorMessage();
63  }  }
64    
65  /* return the error message */  /* return the error message */
66  void Dudley_convertPasoError(void) {  void Dudley_convertPasoError(void)
67    /* nothing has to be done here */  {
68        /* nothing has to be done here */
69  }  }
70    
71  /* checks that there is no error accross all processes in a communicator */  /* checks that there is no error accross all processes in a communicator */
72  /* NOTE : does not make guarentee consistency of error string on each process */  /* NOTE : does not make guarentee consistency of error string on each process */
73  bool_t Dudley_MPI_noError( Paso_MPIInfo *mpi_info )  bool_t Dudley_MPI_noError(Paso_MPIInfo * mpi_info)
74  {  {
75      return Paso_MPIInfo_noError( mpi_info );      return Paso_MPIInfo_noError(mpi_info);
76  }  }
   
   

Legend:
Removed from v.3086  
changed lines
  Added in v.3224

  ViewVC Help
Powered by ViewVC 1.1.26