Date: 2013-09-02T10:10:30+00:00

Actual source code: slepcsvd.h

      1: !
      2: !  Include file for Fortran use of the SVD object in SLEPc
      3: !
      4: !
      5: !  - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
      6: !  SLEPc - Scalable Library for Eigenvalue Problem Computations
      7: !  Copyright (c) 2002-2013, 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/slepcsvddef.h

     26: !  Convergence flags.
     27: !  They sould match the flags in $SLEPC_DIR/include/slepcsvd.h

     29:       PetscEnum SVD_CONVERGED_TOL
     30:       PetscEnum SVD_DIVERGED_ITS
     31:       PetscEnum SVD_DIVERGED_BREAKDOWN
     32:       PetscEnum SVD_CONVERGED_ITERATING

     34:       parameter (SVD_CONVERGED_TOL          =  2)
     35:       parameter (SVD_DIVERGED_ITS           = -3)
     36:       parameter (SVD_DIVERGED_BREAKDOWN     = -4)
     37:       parameter (SVD_CONVERGED_ITERATING    =  0)

     39:       PetscEnum SVD_TRANSPOSE_EXPLICIT
     40:       PetscEnum SVD_TRANSPOSE_IMPLICIT

     42:       parameter (SVD_TRANSPOSE_EXPLICIT     =  0)
     43:       parameter (SVD_TRANSPOSE_IMPLICIT     =  1)

     45:       integer SVD_LARGEST
     46:       integer SVD_SMALLEST

     48:       parameter (SVD_LARGEST                =  0)
     49:       parameter (SVD_SMALLEST               =  1)

     51: !
     52: !   Possible arguments to SVDMonitorSet()
     53: !
     54:       external SVDMONITORALL
     55:       external SVDMONITORLG
     56:       external SVDMONITORLGALL
     57:       external SVDMONITORCONVERGED
     58:       external SVDMONITORFIRST

     60: !
     61: !  End of Fortran include file for the SVD package in SLEPc
     62: !