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

« back to all changes in this revision

Viewing changes to src/test/ij_b.c

  • 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:
 
1
/*BHEADER**********************************************************************
 
2
 * Copyright (c) 2008,  Lawrence Livermore National Security, LLC.
 
3
 * Produced at the Lawrence Livermore National Laboratory.
 
4
 * This file is part of HYPRE.  See file COPYRIGHT for details.
 
5
 *
 
6
 * HYPRE is free software; you can redistribute it and/or modify it under the
 
7
 * terms of the GNU Lesser General Public License (as published by the Free
 
8
 * Software Foundation) version 2.1 dated February 1999.
 
9
 *
 
10
 * $Revision: 1.43 $
 
11
 ***********************************************************************EHEADER*/
 
12
 
1
13
/*--------------------------------------------------------------------------
2
14
 * Test driver for unstructured matrix interface (IJ_matrix interface).
3
15
 * This is the version which uses the Babel interface.
7
19
 * that matrix row-by-row into the IJMatrix interface. AJC 7/99.
8
20
 *--------------------------------------------------------------------------*/
9
21
/* As of October 2005, the solvers implemented are AMG, ParaSails, PCG, GMRES, diagonal
10
 
   scaling, and combinations thereof.  The babel (bHYPRE) interface is used exclusively.
11
22
*/
12
23
#include <stdlib.h>
13
24
#include <stdio.h>
646
657
                                              "driver.out.log", &_ex );
647
658
         bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "MaxIter", 1, &_ex );
648
659
         bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "CycleType", clp->cycle_type, &_ex );
649
 
         bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "Cycle0NumSweeps",
650
 
                                           (clp->num_grid_sweeps)[0], &_ex );
651
660
         bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "Cycle1NumSweeps",
652
661
                                           (clp->num_grid_sweeps)[1], &_ex );
653
662
         bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "Cycle2NumSweeps",
654
663
                                           (clp->num_grid_sweeps)[2], &_ex );
655
664
         bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "Cycle3NumSweeps",
656
665
                                           (clp->num_grid_sweeps)[3], &_ex );
657
 
         bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "Cycle0RelaxType",
658
 
                                           (clp->grid_relax_type)[0], &_ex );
659
666
         bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "Cycle1RelaxType",
660
667
                                           (clp->grid_relax_type)[1], &_ex );
661
668
         bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "Cycle2RelaxType",
1067
1074
                                              "driver.out.log", &_ex );
1068
1075
         bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "MaxIter", 1, &_ex );
1069
1076
         bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "CycleType", clp->cycle_type, &_ex );
1070
 
         bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "Cycle0NumSweeps",
1071
 
                                           (clp->num_grid_sweeps)[0], &_ex );
1072
1077
         bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "Cycle1NumSweeps",
1073
1078
                                           (clp->num_grid_sweeps)[1], &_ex );
1074
1079
         bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "Cycle2NumSweeps",
1075
1080
                                           (clp->num_grid_sweeps)[2], &_ex );
1076
1081
         bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "Cycle3NumSweeps",
1077
1082
                                           (clp->num_grid_sweeps)[3], &_ex );
1078
 
         bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "Cycle0RelaxType",
1079
 
                                           (clp->grid_relax_type)[0], &_ex );
1080
1083
         bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "Cycle1RelaxType",
1081
1084
                                           (clp->grid_relax_type)[1], &_ex );
1082
1085
         bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "Cycle2RelaxType",
3515
3518
   bHYPRE_BoomerAMG_SetDoubleParameter( bH_AMG, "TruncFactor",
3516
3519
                                        clp->trunc_factor, &_ex );
3517
3520
   bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "CycleType", clp->cycle_type, &_ex );
3518
 
   bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "Cycle0NumSweeps",
3519
 
                                     (clp->num_grid_sweeps)[0], &_ex );
3520
3521
   bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "Cycle1NumSweeps",
3521
3522
                                     (clp->num_grid_sweeps)[1], &_ex );
3522
3523
   bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "Cycle2NumSweeps",
3523
3524
                                     (clp->num_grid_sweeps)[2], &_ex );
3524
3525
   bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "Cycle3NumSweeps",
3525
3526
                                     (clp->num_grid_sweeps)[3], &_ex );
3526
 
   bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "Cycle0RelaxType",
3527
 
                                     (clp->grid_relax_type)[0], &_ex );
3528
3527
   bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "Cycle1RelaxType",
3529
3528
                                     (clp->grid_relax_type)[1], &_ex );
3530
3529
   bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "Cycle2RelaxType",
3630
3629
                                        "driver.out.log", &_ex );
3631
3630
   bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "MaxIter", 1, &_ex );
3632
3631
   bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "CycleType", clp->cycle_type, &_ex );
3633
 
   bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "Cycle0NumSweeps",
3634
 
                                     (clp->num_grid_sweeps)[0], &_ex );
3635
3632
   bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "Cycle1NumSweeps",
3636
3633
                                     (clp->num_grid_sweeps)[1], &_ex );
3637
3634
   bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "Cycle2NumSweeps",
3638
3635
                                     (clp->num_grid_sweeps)[2], &_ex );
3639
3636
   bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "Cycle3NumSweeps",
3640
3637
                                     (clp->num_grid_sweeps)[3], &_ex );
3641
 
   bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "Cycle0RelaxType",
3642
 
                                     (clp->grid_relax_type)[0], &_ex );
3643
3638
   bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "Cycle1RelaxType",
3644
3639
                                     (clp->grid_relax_type)[1], &_ex );
3645
3640
   bHYPRE_BoomerAMG_SetIntParameter( bH_AMG, "Cycle2RelaxType",