/* $Id: slesimpl.h,v 1.12 2000/05/05 22:16:55 balay Exp $ */

#if !defined(_SLESIMPL_H)
#define _SLESIMPL_H

#include "petscsles.h"

struct _p_SLES {
  PETSCHEADER(int)
  int        setupcalled;
  PetscTruth dscale;      /* diagonal scale system; used with SLESSetDiagonalScale() */
  PetscTruth dscalefix;   /* unscale system after solve */
  PetscTruth dscalefix2;  /* system has been unscaled */
  Vec        diagonal;    /* 1/sqrt(diag of matrix) */
  PC         pc;
  KSP        ksp;
};

#endif