source: CIVL/examples/mpi-omp/AMG2013/krylov_bug/gmres_bug.CPP

main
Last change on this file was ea777aa, checked in by Alex Wilton <awilton@…>, 3 years ago

Moved examples, include, build_default.properties, common.xml, and README out from dev.civl.com into the root of the repo.

git-svn-id: svn://vsl.cis.udel.edu/civl/trunk@5704 fb995dde-84ed-4084-dfe6-e5aef3e2452c

  • Property mode set to 100644
File size: 659 bytes
RevLine 
[01e5f885]1# 1 "gmres_bug.c"
2# 1 "<built-in>" 1
3# 1 "<built-in>" 3
4# 321 "<built-in>" 3
5# 1 "<command line>" 1
6# 1 "<built-in>" 2
7# 1 "gmres_bug.c" 2
8# 1 "./krylov_bug.h" 1
9
10
11
12
13typedef struct
14{
15 char * (*CAlloc) ( int count, int elt_size );
16
17} hypre_GMRESFunctions;
18
19typedef struct
20{
21 int k_dim;
22
23} hypre_GMRESData;
24
25void *hypre_GMRESCreate( hypre_GMRESFunctions *gmres_functions );
26# 2 "gmres_bug.c" 2
27
28void *
29hypre_GMRESCreate( hypre_GMRESFunctions *gmres_functions )
30{
31 hypre_GMRESData *gmres_data;
32
33 gmres_data = ( (hypre_GMRESData *)(*(gmres_functions->CAlloc))((unsigned int)(1), (unsigned int)sizeof(hypre_GMRESData)) );
34
35 return (void *) gmres_data;
36}
Note: See TracBrowser for help on using the repository browser.