Actual source code: fnregis.c

slepc-3.11.2 2019-07-30
Report Typos and Errors
  1: /*
  2:    - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
  3:    SLEPc - Scalable Library for Eigenvalue Problem Computations
  4:    Copyright (c) 2002-2019, Universitat Politecnica de Valencia, Spain

  6:    This file is part of SLEPc.
  7:    SLEPc is distributed under a 2-clause BSD license (see LICENSE).
  8:    - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
  9: */

 11: #include <slepc/private/fnimpl.h>      /*I "slepcfn.h" I*/

 13: SLEPC_EXTERN PetscErrorCode FNCreate_Combine(FN);
 14: SLEPC_EXTERN PetscErrorCode FNCreate_Rational(FN);
 15: SLEPC_EXTERN PetscErrorCode FNCreate_Exp(FN);
 16: SLEPC_EXTERN PetscErrorCode FNCreate_Log(FN);
 17: SLEPC_EXTERN PetscErrorCode FNCreate_Phi(FN);
 18: SLEPC_EXTERN PetscErrorCode FNCreate_Sqrt(FN);
 19: SLEPC_EXTERN PetscErrorCode FNCreate_Invsqrt(FN);

 21: /*@C
 22:    FNRegisterAll - Registers all of the math functions in the FN package.

 24:    Not Collective

 26:    Level: advanced
 27: @*/
 28: PetscErrorCode FNRegisterAll(void)
 29: {

 33:   if (FNRegisterAllCalled) return(0);
 34:   FNRegisterAllCalled = PETSC_TRUE;
 35:   FNRegister(FNCOMBINE,FNCreate_Combine);
 36:   FNRegister(FNRATIONAL,FNCreate_Rational);
 37:   FNRegister(FNEXP,FNCreate_Exp);
 38:   FNRegister(FNLOG,FNCreate_Log);
 39:   FNRegister(FNPHI,FNCreate_Phi);
 40:   FNRegister(FNSQRT,FNCreate_Sqrt);
 41:   FNRegister(FNINVSQRT,FNCreate_Invsqrt);
 42:   return(0);
 43: }