1: ! 2: ! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 3: ! SLEPc - Scalable Library for Eigenvalue Problem Computations 4: ! Copyright (c) 2002-2019, 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: ! Include file for Fortran use of the BV object in SLEPc 11: ! 12: #include "slepc/finclude/slepcbv.h" 14: type tBV 15: PetscFortranAddr:: v PETSC_FORTRAN_TYPE_INITIALIZE 16: end type tBV 18: BV, parameter :: SLEPC_NULL_BV = tBV(0) 20: PetscEnum BV_ORTHOG_CGS 21: PetscEnum BV_ORTHOG_MGS 23: parameter (BV_ORTHOG_CGS = 0) 24: parameter (BV_ORTHOG_MGS = 1) 26: PetscEnum BV_ORTHOG_REFINE_IFNEEDED 27: PetscEnum BV_ORTHOG_REFINE_NEVER 28: PetscEnum BV_ORTHOG_REFINE_ALWAYS 30: parameter (BV_ORTHOG_REFINE_IFNEEDED = 0) 31: parameter (BV_ORTHOG_REFINE_NEVER = 1) 32: parameter (BV_ORTHOG_REFINE_ALWAYS = 2) 34: PetscEnum BV_ORTHOG_BLOCK_GS 35: PetscEnum BV_ORTHOG_BLOCK_CHOL 36: PetscEnum BV_ORTHOG_BLOCK_TSQR 37: PetscEnum BV_ORTHOG_BLOCK_TSQRCHOL 38: PetscEnum BV_ORTHOG_BLOCK_SVQB 40: parameter (BV_ORTHOG_BLOCK_GS = 0) 41: parameter (BV_ORTHOG_BLOCK_CHOL = 1) 42: parameter (BV_ORTHOG_BLOCK_TSQR = 2) 43: parameter (BV_ORTHOG_BLOCK_TSQRCHOL = 3) 44: parameter (BV_ORTHOG_BLOCK_SVQB = 4) 46: PetscEnum BV_MATMULT_VECS 47: PetscEnum BV_MATMULT_MAT 48: PetscEnum BV_MATMULT_MAT_SAVE 50: parameter (BV_MATMULT_VECS = 0) 51: parameter (BV_MATMULT_MAT = 1) 52: parameter (BV_MATMULT_MAT_SAVE = 2) 54: ! 55: ! End of Fortran include file for the BV package in SLEPc 56: !