/usr/include/zmumps_root.h is in libmumps-dev 5.1.2-4.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 | !
! This file is part of MUMPS 5.1.2, released
! on Mon Oct 2 07:37:01 UTC 2017
!
!
! Copyright 1991-2017 CERFACS, CNRS, ENS Lyon, INP Toulouse, Inria,
! University of Bordeaux.
!
! This version of MUMPS is provided to you free of charge. It is
! released under the CeCILL-C license:
! http://www.cecill.info/licences/Licence_CeCILL-C_V1-en.html
!
TYPE ZMUMPS_ROOT_STRUC
SEQUENCE
INTEGER :: MBLOCK, NBLOCK, NPROW, NPCOL
INTEGER :: MYROW, MYCOL
INTEGER :: SCHUR_MLOC, SCHUR_NLOC, SCHUR_LLD
INTEGER :: RHS_NLOC
INTEGER :: ROOT_SIZE, TOT_ROOT_SIZE
! descriptor for scalapack
INTEGER, DIMENSION( 9 ) :: DESCRIPTOR
INTEGER :: CNTXT_BLACS, LPIV, rootpad0
INTEGER, DIMENSION(:), POINTER :: RG2L_ROW
INTEGER, DIMENSION(:), POINTER :: RG2L_COL
INTEGER , DIMENSION(:), POINTER :: IPIV, rootpad1
! Centralized master of root
COMPLEX(kind=8), DIMENSION(:), POINTER :: RHS_CNTR_MASTER_ROOT
! Used to access Schur easily from root structure
COMPLEX(kind=8), DIMENSION(:), POINTER :: SCHUR_POINTER
! for try_null_space preprocessing constant only:
COMPLEX(kind=8), DIMENSION(:), POINTER :: QR_TAU, rootpad2
! Fwd in facto:
! case of scalapack root: to store RHS in 2D block cyclic
! format compatible with root distribution
COMPLEX(kind=8), DIMENSION(:,:), POINTER :: RHS_ROOT, rootpad
! for try_nullspace preprocessing constant only:
DOUBLE PRECISION :: QR_RCOND, rootpad3
LOGICAL :: yes, gridinit_done
! for SVD on root (#define try_null_space)
COMPLEX(kind=8), DIMENSION(:,:), POINTER :: SVD_U, SVD_VT
! for RR on root (#define try_null_space)
DOUBLE PRECISION, DIMENSION(:), POINTER :: SINGULAR_VALUES
INTEGER :: NB_SINGULAR_VALUES,rootpad4
!
END TYPE ZMUMPS_ROOT_STRUC
|