1: !
  2: !  - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
  3: !  SLEPc - Scalable Library for Eigenvalue Problem Computations
  4: !  Copyright (c) 2002-, Universitat Politecnica de Valencia, Spain
  5: !
  6: !  This file is part of SLEPc.
  7: !  SLEPc is distributed under a 2-clause BSD license (see LICENSE).
  8: !  - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
  9: !
 10: !  Used by slepcdsmod.F90 to create Fortran module file
 11: !
 12: #include "slepc/finclude/slepcds.h"

 14:       type tDS
 15:         PetscFortranAddr:: v PETSC_FORTRAN_TYPE_INITIALIZE
 16:       end type tDS

 18:       DS, parameter :: SLEPC_NULL_DS = tDS(0)

 20:       PetscEnum, parameter :: DS_STATE_RAW             =  0
 21:       PetscEnum, parameter :: DS_STATE_INTERMEDIATE    =  1
 22:       PetscEnum, parameter :: DS_STATE_CONDENSED       =  2
 23:       PetscEnum, parameter :: DS_STATE_TRUNCATED       =  3

 25:       PetscEnum, parameter :: DS_MAT_A         =  0
 26:       PetscEnum, parameter :: DS_MAT_B         =  1
 27:       PetscEnum, parameter :: DS_MAT_C         =  2
 28:       PetscEnum, parameter :: DS_MAT_T         =  3
 29:       PetscEnum, parameter :: DS_MAT_D         =  4
 30:       PetscEnum, parameter :: DS_MAT_F         =  5
 31:       PetscEnum, parameter :: DS_MAT_Q         =  6
 32:       PetscEnum, parameter :: DS_MAT_Z         =  7
 33:       PetscEnum, parameter :: DS_MAT_X         =  8
 34:       PetscEnum, parameter :: DS_MAT_Y         =  9
 35:       PetscEnum, parameter :: DS_MAT_U         = 10
 36:       PetscEnum, parameter :: DS_MAT_V         = 11
 37:       PetscEnum, parameter :: DS_MAT_W         = 12
 38:       PetscEnum, parameter :: DS_MAT_E0        = 13
 39:       PetscEnum, parameter :: DS_MAT_E1        = 14
 40:       PetscEnum, parameter :: DS_MAT_E2        = 15
 41:       PetscEnum, parameter :: DS_MAT_E3        = 16
 42:       PetscEnum, parameter :: DS_MAT_E4        = 17
 43:       PetscEnum, parameter :: DS_MAT_E5        = 18
 44:       PetscEnum, parameter :: DS_MAT_E6        = 19
 45:       PetscEnum, parameter :: DS_MAT_E7        = 20
 46:       PetscEnum, parameter :: DS_MAT_E8        = 21
 47:       PetscEnum, parameter :: DS_MAT_E9        = 22
 48:       PetscEnum, parameter :: DS_NUM_MAT       = 23

 50:       PetscEnum, parameter :: DS_PARALLEL_REDUNDANT    = 0
 51:       PetscEnum, parameter :: DS_PARALLEL_SYNCHRONIZED = 1
 52:       PetscEnum, parameter :: DS_PARALLEL_DISTRIBUTED  = 2

 54: #if defined(_WIN32) && defined(PETSC_USE_SHARED_LIBRARIES)
 55: !DEC$ ATTRIBUTES DLLEXPORT::SLEPC_NULL_DS
 56: #endif