~ubuntu-branches/ubuntu/warty/petsc/warty

« back to all changes in this revision

Viewing changes to src/sles/pc/impls/none/none.c

  • Committer: Bazaar Package Importer
  • Author(s): Adam C. Powell, IV
  • Date: 2004-06-07 13:41:43 UTC
  • mfrom: (1.1.1 upstream)
  • Revision ID: james.westby@ubuntu.com-20040607134143-92p586zrauvie0le
Tags: 2.2.0-2
* Upstream patch level 2.
* New PETSC_BOPT_EXTRA option for different BOPT and lib names, with _c++
  symlinks only for plain and single (closes: #249617).
* New DEBIAN_DIST=contrib option to link with hypre, parmetis (closes:
  #249619).
* Combined petsc-c and petsc-fortran substvars into petsc-compilers.
* Extra quote in -dev prerm eliminates "too many arguments" problem.

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
 
/*$Id: none.c,v 1.30 2001/03/23 23:23:06 balay Exp $*/
2
 
/*
3
 
    Identity preconditioner, simply copies vector x to y.
4
 
*/
5
 
#include "src/sles/pc/pcimpl.h"          /*I "petscpc.h" I*/
6
 
 
7
 
#undef __FUNCT__  
8
 
#define __FUNCT__ "PCApply_None"
9
 
int PCApply_None(PC pc,Vec x,Vec y)
10
 
{
11
 
  int ierr;
12
 
 
13
 
  PetscFunctionBegin;
14
 
  ierr = VecCopy(x,y);CHKERRQ(ierr);
15
 
  PetscFunctionReturn(0);
16
 
}
17
 
 
18
 
EXTERN_C_BEGIN
19
 
#undef __FUNCT__  
20
 
#define __FUNCT__ "PCCreate_None"
21
 
int PCCreate_None(PC pc)
22
 
{
23
 
  PetscFunctionBegin;
24
 
  pc->ops->apply               = PCApply_None;
25
 
  pc->ops->applytranspose      = PCApply_None;
26
 
  pc->ops->destroy             = 0;
27
 
  pc->ops->setup               = 0;
28
 
  pc->ops->view                = 0;
29
 
  pc->ops->applysymmetricleft  = PCApply_None;
30
 
  pc->ops->applysymmetricright = PCApply_None;
31
 
 
32
 
  pc->data                     = 0;
33
 
  PetscFunctionReturn(0);
34
 
}
35
 
EXTERN_C_END