Actual source code: slepcds.h

  1: !
  2: !  Include file for Fortran use of the DS object in SLEPc
  3: !
  4: !
  5: !  - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
  6: !  SLEPc - Scalable Library for Eigenvalue Problem Computations
  7: !  Copyright (c) 2002-2012, Universitat Politecnica de Valencia, Spain
  8: !
  9: !  This file is part of SLEPc.
 10: !
 11: !  SLEPc is free software: you can redistribute it and/or modify it under  the
 12: !  terms of version 3 of the GNU Lesser General Public License as published by
 13: !  the Free Software Foundation.
 14: !
 15: !  SLEPc  is  distributed in the hope that it will be useful, but WITHOUT  ANY
 16: !  WARRANTY;  without even the implied warranty of MERCHANTABILITY or  FITNESS
 17: !  FOR  A  PARTICULAR PURPOSE. See the GNU Lesser General Public  License  for
 18: !  more details.
 19: !
 20: !  You  should have received a copy of the GNU Lesser General  Public  License
 21: !  along with SLEPc. If not, see <http://www.gnu.org/licenses/>.
 22: !  - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
 23: !
 24:  #include finclude/slepcdsdef.h

 26:       PetscEnum DS_STATE_RAW
 27:       PetscEnum DS_STATE_INTERMEDIATE
 28:       PetscEnum DS_STATE_CONDENSED
 29:       PetscEnum DS_STATE_TRUNCATED
 30: 
 31:       parameter (DS_STATE_RAW                =  0)
 32:       parameter (DS_STATE_INTERMEDIATE       =  1)
 33:       parameter (DS_STATE_CONDENSED          =  2)
 34:       parameter (DS_STATE_TRUNCATED          =  3)

 36:       PetscEnum DS_MAT_A
 37:       PetscEnum DS_MAT_B
 38:       PetscEnum DS_MAT_C
 39:       PetscEnum DS_MAT_T
 40:       PetscEnum DS_MAT_D
 41:       PetscEnum DS_MAT_Q
 42:       PetscEnum DS_MAT_Z
 43:       PetscEnum DS_MAT_X
 44:       PetscEnum DS_MAT_Y
 45:       PetscEnum DS_MAT_U
 46:       PetscEnum DS_MAT_VT
 47:       PetscEnum DS_MAT_W
 48:       PetscEnum DS_NUM_MAT

 50:       parameter (DS_MAT_A         =  0)
 51:       parameter (DS_MAT_B         =  1)
 52:       parameter (DS_MAT_C         =  2)
 53:       parameter (DS_MAT_T         =  3)
 54:       parameter (DS_MAT_D         =  4)
 55:       parameter (DS_MAT_Q         =  5)
 56:       parameter (DS_MAT_Z         =  6)
 57:       parameter (DS_MAT_X         =  7)
 58:       parameter (DS_MAT_Y         =  8)
 59:       parameter (DS_MAT_U         =  9)
 60:       parameter (DS_MAT_VT        = 10)
 61:       parameter (DS_MAT_W         = 11)
 62:       parameter (DS_NUM_MAT       = 12)

 64: !
 65: !  End of Fortran include file for the DS package in SLEPc
 66: !