Actual source code: slepcsvdmod.F90

slepc-3.23.0 2025-03-29
Report Typos and Errors
  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:         module slepcsvddef
 11:         use slepcsysdef
 12: #include <../ftn/svd/slepcall.h>
 13:         end module slepcsvddef

 15:         module slepcsvd
 16:         use slepcsvddef
 17:         use slepceps
 18: #include <../ftn/svd/slepcall.h90>
 19: #include <../src/svd/ftn-mod/slepcsvd.h90>

 21:         contains

 23: #include <../ftn/svd/slepcall.hf90>
 24:         end module slepcsvd