← Back to branch summary

~ubuntu-branches/ubuntu/karmic/hypre/karmic

« back to all changes in this revision

Viewing changes to src/babel/bHYPRE/bHYPRE_Schwarz.h

  • Committer: Bazaar Package Importer
  • Author(s): Adam C. Powell, IV
  • Date: 2009-03-20 11:40:12 UTC
  • mfrom: (4.1.2 sid)
  • Revision ID: james.westby@ubuntu.com-20090320114012-132h6ok9w2r6o609
Tags: 2.4.0b-2
Rebuild against new openmpi.

Show diffs side-by-side

added added

removed removed

Lines of Context:
src/babel/bHYPRE/bHYPRE_Schwarz.h
2
2
 * File:          bHYPRE_Schwarz.h
3
3
 * Symbol:        bHYPRE.Schwarz-v1.0.0
4
4
 * Symbol Type:   class
5
 
 * Babel Version: 1.0.0
 
5
 * Babel Version: 1.0.4
6
6
 * Description:   Client-side glue code for bHYPRE.Schwarz
7
7
 * 
8
8
 * WARNING: Automatically generated; changes will be lost
18
18
 * Objects of this type can be cast to Solver objects using the
19
19
 * {\tt \_\_cast} methods.
20
20
 * 
21
 
 * RDF: Documentation goes here.
22
 
 * 
23
21
 * Schwarz requires an IJParCSR matrix
24
22
 */
25
23
struct bHYPRE_Schwarz__object;
101
99
bHYPRE_Schwarz__connect(const char *, sidl_BaseInterface *_ex);
102
100
 
103
101
/**
104
 
 * Method:  Create[]
 
102
 *  This function is the preferred way to create a Schwarz solver. 
105
103
 */
106
104
bHYPRE_Schwarz
107
105
bHYPRE_Schwarz_Create(
148
146
  /* out */ sidl_BaseInterface *_ex)
149
147
#ifdef SIDL_C_HAS_INLINE
150
148
{
151
 
  return (*self->d_epv->f_isSame)(
 
149
  sidl_bool _result;
 
150
  _result = (*self->d_epv->f_isSame)(
152
151
    self,
153
152
    iobj,
154
153
    _ex);
 
154
  return _result;
155
155
}
156
156
#else
157
157
;
166
166
  /* out */ sidl_BaseInterface *_ex)
167
167
#ifdef SIDL_C_HAS_INLINE
168
168
{
169
 
  return (*self->d_epv->f_isType)(
 
169
  sidl_bool _result;
 
170
  _result = (*self->d_epv->f_isType)(
170
171
    self,
171
172
    name,
172
173
    _ex);
 
174
  return _result;
173
175
}
174
176
#else
175
177
;
183
185
  /* out */ sidl_BaseInterface *_ex)
184
186
#ifdef SIDL_C_HAS_INLINE
185
187
{
186
 
  return (*self->d_epv->f_getClassInfo)(
 
188
  sidl_ClassInfo _result;
 
189
  _result = (*self->d_epv->f_getClassInfo)(
187
190
    self,
188
191
    _ex);
 
192
  return _result;
189
193
}
190
194
#else
191
195
;
204
208
  /* out */ sidl_BaseInterface *_ex)
205
209
#ifdef SIDL_C_HAS_INLINE
206
210
{
207
 
  return (*self->d_epv->f_SetOperator)(
 
211
  int32_t _result;
 
212
  _result = (*self->d_epv->f_SetOperator)(
208
213
    self,
209
214
    A,
210
215
    _ex);
 
216
  return _result;
211
217
}
212
218
#else
213
219
;
226
232
  /* out */ sidl_BaseInterface *_ex)
227
233
#ifdef SIDL_C_HAS_INLINE
228
234
{
229
 
  return (*self->d_epv->f_SetTolerance)(
 
235
  int32_t _result;
 
236
  _result = (*self->d_epv->f_SetTolerance)(
230
237
    self,
231
238
    tolerance,
232
239
    _ex);
 
240
  return _result;
233
241
}
234
242
#else
235
243
;
248
256
  /* out */ sidl_BaseInterface *_ex)
249
257
#ifdef SIDL_C_HAS_INLINE
250
258
{
251
 
  return (*self->d_epv->f_SetMaxIterations)(
 
259
  int32_t _result;
 
260
  _result = (*self->d_epv->f_SetMaxIterations)(
252
261
    self,
253
262
    max_iterations,
254
263
    _ex);
 
264
  return _result;
255
265
}
256
266
#else
257
267
;
274
284
  /* out */ sidl_BaseInterface *_ex)
275
285
#ifdef SIDL_C_HAS_INLINE
276
286
{
277
 
  return (*self->d_epv->f_SetLogging)(
 
287
  int32_t _result;
 
288
  _result = (*self->d_epv->f_SetLogging)(
278
289
    self,
279
290
    level,
280
291
    _ex);
 
292
  return _result;
281
293
}
282
294
#else
283
295
;
300
312
  /* out */ sidl_BaseInterface *_ex)
301
313
#ifdef SIDL_C_HAS_INLINE
302
314
{
303
 
  return (*self->d_epv->f_SetPrintLevel)(
 
315
  int32_t _result;
 
316
  _result = (*self->d_epv->f_SetPrintLevel)(
304
317
    self,
305
318
    level,
306
319
    _ex);
 
320
  return _result;
307
321
}
308
322
#else
309
323
;
321
335
  /* out */ sidl_BaseInterface *_ex)
322
336
#ifdef SIDL_C_HAS_INLINE
323
337
{
324
 
  return (*self->d_epv->f_GetNumIterations)(
 
338
  int32_t _result;
 
339
  _result = (*self->d_epv->f_GetNumIterations)(
325
340
    self,
326
341
    num_iterations,
327
342
    _ex);
 
343
  return _result;
328
344
}
329
345
#else
330
346
;
342
358
  /* out */ sidl_BaseInterface *_ex)
343
359
#ifdef SIDL_C_HAS_INLINE
344
360
{
345
 
  return (*self->d_epv->f_GetRelResidualNorm)(
 
361
  int32_t _result;
 
362
  _result = (*self->d_epv->f_GetRelResidualNorm)(
346
363
    self,
347
364
    norm,
348
365
    _ex);
 
366
  return _result;
349
367
}
350
368
#else
351
369
;
364
382
  /* out */ sidl_BaseInterface *_ex)
365
383
#ifdef SIDL_C_HAS_INLINE
366
384
{
367
 
  return (*self->d_epv->f_SetCommunicator)(
 
385
  int32_t _result;
 
386
  _result = (*self->d_epv->f_SetCommunicator)(
368
387
    self,
369
388
    mpi_comm,
370
389
    _ex);
 
390
  return _result;
371
391
}
372
392
#else
373
393
;
408
428
  /* out */ sidl_BaseInterface *_ex)
409
429
#ifdef SIDL_C_HAS_INLINE
410
430
{
411
 
  return (*self->d_epv->f_SetIntParameter)(
 
431
  int32_t _result;
 
432
  _result = (*self->d_epv->f_SetIntParameter)(
412
433
    self,
413
434
    name,
414
435
    value,
415
436
    _ex);
 
437
  return _result;
416
438
}
417
439
#else
418
440
;
431
453
  /* out */ sidl_BaseInterface *_ex)
432
454
#ifdef SIDL_C_HAS_INLINE
433
455
{
434
 
  return (*self->d_epv->f_SetDoubleParameter)(
 
456
  int32_t _result;
 
457
  _result = (*self->d_epv->f_SetDoubleParameter)(
435
458
    self,
436
459
    name,
437
460
    value,
438
461
    _ex);
 
462
  return _result;
439
463
}
440
464
#else
441
465
;
454
478
  /* out */ sidl_BaseInterface *_ex)
455
479
#ifdef SIDL_C_HAS_INLINE
456
480
{
457
 
  return (*self->d_epv->f_SetStringParameter)(
 
481
  int32_t _result;
 
482
  _result = (*self->d_epv->f_SetStringParameter)(
458
483
    self,
459
484
    name,
460
485
    value,
461
486
    _ex);
 
487
  return _result;
462
488
}
463
489
#else
464
490
;
478
504
  /* out */ sidl_BaseInterface *_ex)
479
505
#ifdef SIDL_C_HAS_INLINE
480
506
{
 
507
  int32_t _result;
481
508
  int32_t value_lower[1], value_upper[1], value_stride[1]; 
482
509
  struct sidl_int__array value_real;
483
510
  struct sidl_int__array*value_tmp = &value_real;
484
511
  value_upper[0] = nvalues-1;
485
 
  sidl_int__array_init(value, value_tmp, 1, value_lower, value_upper,
 
512
  sidl_int__array_init(value, value_tmp, 1, value_lower, value_upper, 
486
513
    value_stride);
487
 
  return (*self->d_epv->f_SetIntArray1Parameter)(
 
514
  _result = (*self->d_epv->f_SetIntArray1Parameter)(
488
515
    self,
489
516
    name,
490
517
    value_tmp,
491
518
    _ex);
 
519
#ifdef SIDL_DEBUG_REFCOUNT
 
520
  sidl__array_deleteRef((struct sidl__array*)value_tmp);
 
521
#endif /* SIDL_DEBUG_REFCOUNT */
 
522
  return _result;
492
523
}
493
524
#else
494
525
;
507
538
  /* out */ sidl_BaseInterface *_ex)
508
539
#ifdef SIDL_C_HAS_INLINE
509
540
{
510
 
  return (*self->d_epv->f_SetIntArray2Parameter)(
 
541
  int32_t _result;
 
542
  _result = (*self->d_epv->f_SetIntArray2Parameter)(
511
543
    self,
512
544
    name,
513
545
    value,
514
546
    _ex);
 
547
  return _result;
515
548
}
516
549
#else
517
550
;
531
564
  /* out */ sidl_BaseInterface *_ex)
532
565
#ifdef SIDL_C_HAS_INLINE
533
566
{
 
567
  int32_t _result;
534
568
  int32_t value_lower[1], value_upper[1], value_stride[1]; 
535
569
  struct sidl_double__array value_real;
536
570
  struct sidl_double__array*value_tmp = &value_real;
537
571
  value_upper[0] = nvalues-1;
538
 
  sidl_double__array_init(value, value_tmp, 1, value_lower, value_upper,
 
572
  sidl_double__array_init(value, value_tmp, 1, value_lower, value_upper, 
539
573
    value_stride);
540
 
  return (*self->d_epv->f_SetDoubleArray1Parameter)(
 
574
  _result = (*self->d_epv->f_SetDoubleArray1Parameter)(
541
575
    self,
542
576
    name,
543
577
    value_tmp,
544
578
    _ex);
 
579
#ifdef SIDL_DEBUG_REFCOUNT
 
580
  sidl__array_deleteRef((struct sidl__array*)value_tmp);
 
581
#endif /* SIDL_DEBUG_REFCOUNT */
 
582
  return _result;
545
583
}
546
584
#else
547
585
;
560
598
  /* out */ sidl_BaseInterface *_ex)
561
599
#ifdef SIDL_C_HAS_INLINE
562
600
{
563
 
  return (*self->d_epv->f_SetDoubleArray2Parameter)(
 
601
  int32_t _result;
 
602
  _result = (*self->d_epv->f_SetDoubleArray2Parameter)(
564
603
    self,
565
604
    name,
566
605
    value,
567
606
    _ex);
 
607
  return _result;
568
608
}
569
609
#else
570
610
;
583
623
  /* out */ sidl_BaseInterface *_ex)
584
624
#ifdef SIDL_C_HAS_INLINE
585
625
{
586
 
  return (*self->d_epv->f_GetIntValue)(
 
626
  int32_t _result;
 
627
  _result = (*self->d_epv->f_GetIntValue)(
587
628
    self,
588
629
    name,
589
630
    value,
590
631
    _ex);
 
632
  return _result;
591
633
}
592
634
#else
593
635
;
606
648
  /* out */ sidl_BaseInterface *_ex)
607
649
#ifdef SIDL_C_HAS_INLINE
608
650
{
609
 
  return (*self->d_epv->f_GetDoubleValue)(
 
651
  int32_t _result;
 
652
  _result = (*self->d_epv->f_GetDoubleValue)(
610
653
    self,
611
654
    name,
612
655
    value,
613
656
    _ex);
 
657
  return _result;
614
658
}
615
659
#else
616
660
;
630
674
  /* out */ sidl_BaseInterface *_ex)
631
675
#ifdef SIDL_C_HAS_INLINE
632
676
{
633
 
  return (*self->d_epv->f_Setup)(
 
677
  int32_t _result;
 
678
  _result = (*self->d_epv->f_Setup)(
634
679
    self,
635
680
    b,
636
681
    x,
637
682
    _ex);
 
683
  return _result;
638
684
}
639
685
#else
640
686
;
653
699
  /* out */ sidl_BaseInterface *_ex)
654
700
#ifdef SIDL_C_HAS_INLINE
655
701
{
656
 
  return (*self->d_epv->f_Apply)(
 
702
  int32_t _result;
 
703
  _result = (*self->d_epv->f_Apply)(
657
704
    self,
658
705
    b,
659
706
    x,
660
707
    _ex);
 
708
  return _result;
661
709
}
662
710
#else
663
711
;
676
724
  /* out */ sidl_BaseInterface *_ex)
677
725
#ifdef SIDL_C_HAS_INLINE
678
726
{
679
 
  return (*self->d_epv->f_ApplyAdjoint)(
 
727
  int32_t _result;
 
728
  _result = (*self->d_epv->f_ApplyAdjoint)(
680
729
    self,
681
730
    b,
682
731
    x,
683
732
    _ex);
 
733
  return _result;
684
734
}
685
735
#else
686
736
;
738
788
  /* out */ sidl_BaseInterface *_ex)
739
789
#ifdef SIDL_C_HAS_INLINE
740
790
{
741
 
  return (*self->d_epv->f__getURL)(
 
791
  char* _result;
 
792
  _result = (*self->d_epv->f__getURL)(
742
793
    self,
743
794
    _ex);
 
795
  return _result;
744
796
}
745
797
#else
746
798
;
774
826
  /* out */ sidl_BaseInterface *_ex)
775
827
#ifdef SIDL_C_HAS_INLINE
776
828
{
777
 
  return (*self->d_epv->f__isRemote)(
 
829
  sidl_bool _result;
 
830
  _result = (*self->d_epv->f__isRemote)(
778
831
    self,
779
832
    _ex);
 
833
  return _result;
780
834
}
781
835
#else
782
836
;
1033
1087
 * RMI connector function for the class. (no addref)
1034
1088
 */
1035
1089
struct bHYPRE_Schwarz__object*
1036
 
bHYPRE_Schwarz__connectI(const char * url, sidl_bool ar,
1037
 
  struct sidl_BaseInterface__object **_ex);
 
1090
bHYPRE_Schwarz__connectI(const char * url, sidl_bool ar, struct 
 
1091
  sidl_BaseInterface__object **_ex);
1038
1092
 
1039
1093
#ifdef __cplusplus
1040
1094
}