z_bplus_compress Module Reference

Functions/Subroutines
subroutine	z_bf_compress_nlogn (blocks, boundary_map, Nboundall, Ninadmissible, groupm_start, option, Memory, stats, msh, ker, ptree, statflag)
subroutine	z_bf_compress_nlogn_oneblock_r_sample (submats, blocks, boundary_map, Nboundall, Ninadmissible, groupm_start, option, stats, msh, ker, ptree, index_i, index_j, index_ij, level, nnz_loc, flops)
subroutine	z_bf_md_compress_n_oneblock_r_sample (Ndim, dim_MD, subtensors, blocks, boundary_map, Nboundall, Ninadmissible, groupm_start, option, stats, msh, ker, ptree, index_ij, bb_m, level, flops)
subroutine	z_bf_compress_nlogn_oneblock_r_rankreveal (submats, blocks, option, stats, msh, ker, ptree, index_i, index_j, index_ij, level, rank_new, flops)
subroutine	z_bf_md_compress_n_oneblock_r_rankreveal (Ndim, dim_MD, subtensors, blocks, option, stats, msh, ker, ptree, index_ij, bb_m, level, rank_new, flops)
subroutine	z_bf_md_compress_n_oneblock_c_sample (Ndim, dim_MD, subtensors, blocks, boundary_map, Nboundall, Ninadmissible, groupm_start, option, stats, msh, ker, ptree, index_ij, bb_m, level, flops)
subroutine	z_bf_md_compress_n_oneblock_c_rankreveal (Ndim, dim_MD, subtensors, blocks, option, stats, msh, ker, ptree, index_ij, bb_m, level, rank_new, flops)
subroutine	z_bf_exchange_skel (blocks, skels, option, stats, msh, ptree, level, mode, collect)
subroutine	z_bf_all2all_skel (blocks, skels, option, stats, msh, ptree, level, mode, mode_new)
	*********** all to all communication of skeletons of one butterfly level from row-wise ordering to column-wise ordering or the reverse More...
subroutine	z_bf_md_all2all_skel (Ndim, blocks, ButterflySkel_R_transposed, option, stats, msh, ptree)
	*********** all to all communication of skeletons at the middle butterfly level from row-wise ordering to column-wise ordering More...
subroutine	z_bf_compress_nlogn_oneblock_c_sample (submats, blocks, boundary_map, Nboundall, Ninadmissible, groupm_start, option, stats, msh, ker, ptree, index_i, index_j, index_ij, level, level_final, nnz_loc)
subroutine	z_bf_compress_nlogn_oneblock_c_rankreveal (submats, blocks, boundary_map, Nboundall, Ninadmissible, groupm_start, option, stats, msh, ker, ptree, index_i, index_j, index_ij, level, level_final, rank_new, flops)
subroutine	z_bf_md_delete_subtensors (Ndim, dims, subtensors, stats)
subroutine	z_bf_md_compress_n (Ndim, blocks, boundary_map, Nboundall, Ninadmissible, groupm_start, option, Memory, stats, msh, ker, ptree, statflag, bplus_flag)
subroutine	z_bf_compress_n15_seq (blocks, boundary_map, Nboundall, Ninadmissible, groupm_start, option, Memory, stats, msh, ker, ptree, statflag)
subroutine	z_bf_compress_n15 (blocks, boundary_map, Nboundall, Ninadmissible, groupm_start, option, Memory, stats, msh, ker, ptree, statflag)
subroutine	z_bf_compress_test (blocks, msh, ker, element_Zmn, ptree, option, stats)
subroutine	z_lr_hbaca (blocks, leafsize, rank, option, msh, ker, stats, ptree, pgno, cridx)
recursive subroutine	z_lr_hmerge (blocks, rank, option, msh, stats, ptree, pgno, cridx, hbacaflag)
recursive subroutine	z_lr_hbaca_leaflevel (blocks, leafsize, rank, option, msh, ker, stats, ptree, pgno, cridx)
subroutine	z_lr_aca (SVD_Q, header_m, header_n, rankmax_r, rankmax_c, frow, rank, tolerance, SVD_tolerance, msh, ker, stats, ptree, option, error)
subroutine	z_lr_aca_parallel (blocks, header_m, header_n, M, N, frow, rank, tolerance, SVD_tolerance, msh, ker, stats, ptree, option, error, ctxt, pgno)
subroutine	z_lr_baca (SVD_Q, header_m, header_n, M, N, rank, tolerance, SVD_tolerance, bsize, msh, ker, stats, ptree, option, error)
subroutine	z_lr_baca_nooverlap (SVD_Q, header_m, header_n, M, N, rank, tolerance, SVD_tolerance, bsize, msh, ker, stats, ptree, option, error)
subroutine	z_lr_baca_nooverlap_oneiteration (header_m, header_n, M, N, acaquants, submatc, submatr, tolerance, SVD_tolerance, bsize, msh, ker, stats, ptree, option, rcflag, flops)
subroutine	z_lr_seudoskeleton (blocks, header_m, header_n, M, N, rmaxc, rmaxr, rank, tolerance, SVD_tolerance, msh, ker, stats, ptree, option, ctxt, pgno)
subroutine	z_bplus_checkerror_full (bplus, option, msh, ker, stats, ptree)
subroutine	z_butterflysvd_left (index_i, index_j, level, level_butterfly, levelm, blocks, option, msh, ButterflyP_old, ButterflyP, ButterflyMiddle, rank, flops)
subroutine	z_localbutterflysvd_left (index_i_loc, index_j_loc, level_loc, level_butterflyL, level, index_i_m, blocks, option, msh, ButterflyP_old, ButterflyP)
subroutine	z_butterflysvd_right (index_i, index_j, level, level_butterfly, blocks, option, msh, ButterflyP_old, ButterflyP, rank, flops)
subroutine	z_localbutterflysvd_right (index_i_loc, index_j_loc, level_loc, level_butterflyR, level, level_butterfly, index_j_m, blocks, option, msh, ButterflyP_old, ButterflyP)
subroutine	z_full_construction (blocks, msh, ker, stats, option, ptree, memory)
subroutine	z_full_construction_md (Ndim, blocks, msh, ker, stats, option, ptree)

Function/Subroutine Documentation

z_bf_all2all_skel()

subroutine z_bplus_compress::z_bf_all2all_skel	(	type(z_matrixblock)	blocks,
		type(z_butterfly_skel)	skels,
		type(z_hoption)	option,
		type(z_hstat)	stats,
		type(z_mesh)	msh,
		type(z_proctree)	ptree,
		integer	level,
		character	mode,
		character	mode_new
	)

*********** all to all communication of skeletons of one butterfly level from row-wise ordering to column-wise ordering or the reverse

Here is the call graph for this function:

z_bf_compress_n15()

subroutine z_bplus_compress::z_bf_compress_n15	(	type(z_matrixblock)	blocks,
		integer, dimension(:,:)	boundary_map,
		integer	Nboundall,
		integer	Ninadmissible,
		integer	groupm_start,
		type(z_hoption)	option,
		real(kind=8)	Memory,
		type(z_hstat)	stats,
		type(z_mesh)	msh,
		type(z_kernelquant)	ker,
		type(z_proctree)	ptree,
		integer	statflag
	)

**** Find column pivots for the next iteration

*** needs to copy ButterflyP_old1 to ButterflyP_old2 with rows possibly doubled, before calling z_BF_exchange_matvec

*** Caution!! the left half is row-wise, the right half is column-wise

**** need converting ButterflyP_old to column-wise layout before copy into ButterflyU

*** Caution!! the left half is row-wise, the right half is column-wise

**** need converting ButterflyP_old2 to row-wise layout before copy into ButterflyV

Here is the call graph for this function:

z_bf_compress_n15_seq()

subroutine z_bplus_compress::z_bf_compress_n15_seq	(	type(z_matrixblock)	blocks,
		integer, dimension(:,:)	boundary_map,
		integer	Nboundall,
		integer	Ninadmissible,
		integer	groupm_start,
		type(z_hoption)	option,
		real(kind=8)	Memory,
		type(z_hstat)	stats,
		type(z_mesh)	msh,
		type(z_kernelquant)	ker,
		type(z_proctree)	ptree,
		integer	statflag
	)

Here is the call graph for this function:

z_bf_compress_nlogn()

subroutine z_bplus_compress::z_bf_compress_nlogn	(	type(z_matrixblock)	blocks,
		integer, dimension(:,:)	boundary_map,
		integer	Nboundall,
		integer	Ninadmissible,
		integer	groupm_start,
		type(z_hoption)	option,
		real(kind=8)	Memory,
		type(z_hstat)	stats,
		type(z_mesh)	msh,
		type(z_kernelquant)	ker,
		type(z_proctree)	ptree,
		integer	statflag
	)

Here is the call graph for this function:

z_bf_compress_nlogn_oneblock_c_rankreveal()

subroutine z_bplus_compress::z_bf_compress_nlogn_oneblock_c_rankreveal	(	type(z_intersect), dimension(:)	submats,
		type(z_matrixblock)	blocks,
		integer, dimension(:,:)	boundary_map,
		integer	Nboundall,
		integer	Ninadmissible,
		integer	groupm_start,
		type(z_hoption)	option,
		type(z_hstat)	stats,
		type(z_mesh)	msh,
		type(z_kernelquant)	ker,
		type(z_proctree)	ptree,
		integer	index_i,
		integer	index_j,
		integer	index_ij,
		integer	level,
		integer	level_final,
		integer	rank_new,
		real(kind=8)	flops
	)

Here is the call graph for this function:

z_bf_compress_nlogn_oneblock_c_sample()

subroutine z_bplus_compress::z_bf_compress_nlogn_oneblock_c_sample	(	type(z_intersect), dimension(:)	submats,
		type(z_matrixblock)	blocks,
		integer, dimension(:,:)	boundary_map,
		integer	Nboundall,
		integer	Ninadmissible,
		integer	groupm_start,
		type(z_hoption)	option,
		type(z_hstat)	stats,
		type(z_mesh)	msh,
		type(z_kernelquant)	ker,
		type(z_proctree)	ptree,
		integer	index_i,
		integer	index_j,
		integer	index_ij,
		integer	level,
		integer	level_final,
		integer*8	nnz_loc
	)

Here is the call graph for this function:

z_bf_compress_nlogn_oneblock_r_rankreveal()

subroutine z_bplus_compress::z_bf_compress_nlogn_oneblock_r_rankreveal	(	type(z_intersect), dimension(:)	submats,
		type(z_matrixblock)	blocks,
		type(z_hoption)	option,
		type(z_hstat)	stats,
		type(z_mesh)	msh,
		type(z_kernelquant)	ker,
		type(z_proctree)	ptree,
		integer	index_i,
		integer	index_j,
		integer	index_ij,
		integer	level,
		integer	rank_new,
		real(kind=8)	flops
	)

Here is the call graph for this function:

z_bf_compress_nlogn_oneblock_r_sample()

subroutine z_bplus_compress::z_bf_compress_nlogn_oneblock_r_sample	(	type(z_intersect), dimension(:)	submats,
		type(z_matrixblock)	blocks,
		integer, dimension(:,:)	boundary_map,
		integer	Nboundall,
		integer	Ninadmissible,
		integer	groupm_start,
		type(z_hoption)	option,
		type(z_hstat)	stats,
		type(z_mesh)	msh,
		type(z_kernelquant)	ker,
		type(z_proctree)	ptree,
		integer	index_i,
		integer	index_j,
		integer	index_ij,
		integer	level,
		integer*8	nnz_loc,
		real(kind=8)	flops
	)

Here is the call graph for this function:

z_bf_compress_test()

subroutine z_bplus_compress::z_bf_compress_test	(	type(z_matrixblock)	blocks,
		type(z_mesh)	msh,
		type(z_kernelquant)	ker,
		procedure(z_zelem)	element_Zmn,
		type(z_proctree)	ptree,
		type(z_hoption)	option,
		type(z_hstat)	stats
	)

Here is the call graph for this function:

z_bf_exchange_skel()

subroutine z_bplus_compress::z_bf_exchange_skel	(	type(z_matrixblock)	blocks,
		type(z_butterfly_skel)	skels,
		type(z_hoption)	option,
		type(z_hstat)	stats,
		type(z_mesh)	msh,
		type(z_proctree)	ptree,
		integer	level,
		character	mode,
		character	collect
	)

Here is the call graph for this function:

z_bf_md_all2all_skel()

subroutine z_bplus_compress::z_bf_md_all2all_skel	(	integer	Ndim,
		type(z_matrixblock_md)	blocks,
		type(z_butterfly_skel_md), dimension(:)	ButterflySkel_R_transposed,
		type(z_hoption)	option,
		type(z_hstat)	stats,
		type(z_mesh), dimension(ndim)	msh,
		type(z_proctree)	ptree
	)

*********** all to all communication of skeletons at the middle butterfly level from row-wise ordering to column-wise ordering

Here is the call graph for this function:

z_bf_md_compress_n()

subroutine z_bplus_compress::z_bf_md_compress_n	(	integer	Ndim,
		type(z_matrixblock_md)	blocks,
		integer, dimension(:,:,:)	boundary_map,
		integer	Nboundall,
		integer	Ninadmissible,
		integer, dimension(ndim)	groupm_start,
		type(z_hoption)	option,
		real(kind=8)	Memory,
		type(z_hstat)	stats,
		type(z_mesh), dimension(ndim)	msh,
		type(z_kernelquant)	ker,
		type(z_proctree)	ptree,
		integer	statflag,
		integer	bplus_flag
	)

Here is the call graph for this function:

z_bf_md_compress_n_oneblock_c_rankreveal()

subroutine z_bplus_compress::z_bf_md_compress_n_oneblock_c_rankreveal	(	integer	Ndim,
		integer, dimension(ndim+2)	dim_MD,
		type(z_intersect_md), dimension(:)	subtensors,
		type(z_matrixblock_md)	blocks,
		type(z_hoption)	option,
		type(z_hstat)	stats,
		type(z_mesh), dimension(ndim)	msh,
		type(z_kernelquant)	ker,
		type(z_proctree)	ptree,
		integer	index_ij,
		integer	bb_m,
		integer	level,
		integer	rank_new,
		real(kind=8)	flops
	)

Here is the call graph for this function:

z_bf_md_compress_n_oneblock_c_sample()

subroutine z_bplus_compress::z_bf_md_compress_n_oneblock_c_sample	(	integer	Ndim,
		integer, dimension(ndim+2)	dim_MD,
		type(z_intersect_md), dimension(:)	subtensors,
		type(z_matrixblock_md)	blocks,
		integer, dimension(:,:,:)	boundary_map,
		integer	Nboundall,
		integer	Ninadmissible,
		integer, dimension(ndim)	groupm_start,
		type(z_hoption)	option,
		type(z_hstat)	stats,
		type(z_mesh), dimension(ndim)	msh,
		type(z_kernelquant)	ker,
		type(z_proctree)	ptree,
		integer	index_ij,
		integer	bb_m,
		integer	level,
		real(kind=8)	flops
	)

Here is the call graph for this function:

z_bf_md_compress_n_oneblock_r_rankreveal()

subroutine z_bplus_compress::z_bf_md_compress_n_oneblock_r_rankreveal	(	integer	Ndim,
		integer, dimension(ndim+2)	dim_MD,
		type(z_intersect_md), dimension(:)	subtensors,
		type(z_matrixblock_md)	blocks,
		type(z_hoption)	option,
		type(z_hstat)	stats,
		type(z_mesh), dimension(ndim)	msh,
		type(z_kernelquant)	ker,
		type(z_proctree)	ptree,
		integer	index_ij,
		integer	bb_m,
		integer	level,
		integer	rank_new,
		real(kind=8)	flops
	)

Here is the call graph for this function:

z_bf_md_compress_n_oneblock_r_sample()

subroutine z_bplus_compress::z_bf_md_compress_n_oneblock_r_sample	(	integer	Ndim,
		integer, dimension(ndim+2)	dim_MD,
		type(z_intersect_md), dimension(:)	subtensors,
		type(z_matrixblock_md)	blocks,
		integer, dimension(:,:,:)	boundary_map,
		integer	Nboundall,
		integer	Ninadmissible,
		integer, dimension(ndim)	groupm_start,
		type(z_hoption)	option,
		type(z_hstat)	stats,
		type(z_mesh), dimension(ndim)	msh,
		type(z_kernelquant)	ker,
		type(z_proctree)	ptree,
		integer	index_ij,
		integer	bb_m,
		integer	level,
		real(kind=8)	flops
	)

Here is the call graph for this function:

z_bf_md_delete_subtensors()

subroutine z_bplus_compress::z_bf_md_delete_subtensors	(	integer	Ndim,
		integer, dimension(:)	dims,
		type(z_intersect_md), dimension(:)	subtensors,
		type(z_hstat)	stats
	)

Here is the call graph for this function:

z_bplus_checkerror_full()

subroutine z_bplus_compress::z_bplus_checkerror_full	(	type(z_blockplus)	bplus,
		type(z_hoption)	option,
		type(z_mesh)	msh,
		type(z_kernelquant)	ker,
		type(z_hstat)	stats,
		type(z_proctree)	ptree
	)

Here is the call graph for this function:

z_butterflysvd_left()

subroutine z_bplus_compress::z_butterflysvd_left	(	integer	index_i,
		integer	index_j,
		integer	level,
		integer	level_butterfly,
		integer	levelm,
		type(z_matrixblock)	blocks,
		type(z_hoption)	option,
		type(z_mesh)	msh,
		type(z_butterfly_kerl)	ButterflyP_old,
		type(z_butterfly_kerl)	ButterflyP,
		type(z_butterfly_kerl)	ButterflyMiddle,
		integer	rank,
		real(kind=8)	flops
	)

Here is the call graph for this function:

z_butterflysvd_right()

subroutine z_bplus_compress::z_butterflysvd_right	(	integer	index_i,
		integer	index_j,
		integer	level,
		integer	level_butterfly,
		type(z_matrixblock)	blocks,
		type(z_hoption)	option,
		type(z_mesh)	msh,
		type(z_butterfly_kerl)	ButterflyP_old,
		type(z_butterfly_kerl)	ButterflyP,
		integer	rank,
		real(kind=8)	flops
	)

Here is the call graph for this function:

z_full_construction()

subroutine z_bplus_compress::z_full_construction	(	type(z_matrixblock)	blocks,
		type(z_mesh)	msh,
		type(z_kernelquant)	ker,
		type(z_hstat)	stats,
		type(z_hoption)	option,
		type(z_proctree)	ptree,
		real(kind=8)	memory
	)

z_full_construction_md()

subroutine z_bplus_compress::z_full_construction_md	(	integer	Ndim,
		type(z_matrixblock_md)	blocks,
		type(z_mesh), dimension(ndim)	msh,
		type(z_kernelquant)	ker,
		type(z_hstat)	stats,
		type(z_hoption)	option,
		type(z_proctree)	ptree
	)

Here is the call graph for this function:

z_localbutterflysvd_left()

subroutine z_bplus_compress::z_localbutterflysvd_left	(	integer	index_i_loc,
		integer	index_j_loc,
		integer	level_loc,
		integer	level_butterflyL,
		integer	level,
		integer	index_i_m,
		type(z_matrixblock)	blocks,
		type(z_hoption)	option,
		type(z_mesh)	msh,
		type(z_butterfly_kerl)	ButterflyP_old,
		type(z_butterfly_kerl)	ButterflyP
	)

Here is the call graph for this function:

z_localbutterflysvd_right()

subroutine z_bplus_compress::z_localbutterflysvd_right	(	integer	index_i_loc,
		integer	index_j_loc,
		integer	level_loc,
		integer	level_butterflyR,
		integer	level,
		integer	level_butterfly,
		integer	index_j_m,
		type(z_matrixblock)	blocks,
		type(z_hoption)	option,
		type(z_mesh)	msh,
		type(z_butterfly_kerl)	ButterflyP_old,
		type(z_butterfly_kerl)	ButterflyP
	)

Here is the call graph for this function:

z_lr_aca()

subroutine z_bplus_compress::z_lr_aca	(	type(z_svd_quant)	SVD_Q,
		integer	header_m,
		integer	header_n,
		integer	rankmax_r,
		integer	rankmax_c,
		integer	frow,
		integer	rank,
		real(kind=8)	tolerance,
		real(kind=8)	SVD_tolerance,
		type(z_mesh)	msh,
		type(z_kernelquant)	ker,
		type(z_hstat)	stats,
		type(z_proctree)	ptree,
		type(z_hoption)	option,
		real(kind=8)	error
	)

Here is the call graph for this function:

z_lr_aca_parallel()

subroutine z_bplus_compress::z_lr_aca_parallel	(	type(z_matrixblock)	blocks,
		integer	header_m,
		integer	header_n,
		integer	M,
		integer	N,
		integer	frow,
		integer	rank,
		real(kind=8)	tolerance,
		real(kind=8)	SVD_tolerance,
		type(z_mesh)	msh,
		type(z_kernelquant)	ker,
		type(z_hstat)	stats,
		type(z_proctree)	ptree,
		type(z_hoption)	option,
		real(kind=8)	error,
		integer	ctxt,
		integer	pgno
	)

Here is the call graph for this function:

z_lr_baca()

subroutine z_bplus_compress::z_lr_baca	(	type(z_svd_quant)	SVD_Q,
		integer	header_m,
		integer	header_n,
		integer	M,
		integer	N,
		integer	rank,
		real(kind=8)	tolerance,
		real(kind=8)	SVD_tolerance,
		integer	bsize,
		type(z_mesh)	msh,
		type(z_kernelquant)	ker,
		type(z_hstat)	stats,
		type(z_proctree)	ptree,
		type(z_hoption)	option,
		real(kind=8)	error
	)

**** create random column index for the first iteration

**** Compute columns column_R to find a new set of rows and columns

**** Find row pivots from the columns column_R

**** Compute rows row_R in CUR

**** Find column pivots from the rows row_R

**** Compute columns column_R in CUR

**** Compute the skeleton matrix in CUR

**** generate column indices for the next iteration

**** form the LR update by CUR

**** update z_fnorm of UV and matUmatV

Here is the call graph for this function:

z_lr_baca_nooverlap()

subroutine z_bplus_compress::z_lr_baca_nooverlap	(	type(z_svd_quant)	SVD_Q,
		integer	header_m,
		integer	header_n,
		integer	M,
		integer	N,
		integer	rank,
		real(kind=8)	tolerance,
		real(kind=8)	SVD_tolerance,
		integer	bsize,
		type(z_mesh)	msh,
		type(z_kernelquant)	ker,
		type(z_hstat)	stats,
		type(z_proctree)	ptree,
		type(z_hoption)	option,
		real(kind=8)	error
	)

**** if nearest neighbour is available, select them first

**** Compute the skeleton matrix in CUR

**** Find column pivots for the next iteration

**** create random column index for the first iteration

**** Compute columns column_R to find a new set of rows and columns

**** Find row pivots from the columns column_R

**** Compute rows row_R in CUR

**** Compute the skeleton matrix in CUR

**** update z_fnorm of UV and matUmatV

**** Find column pivots for the next iteration

Here is the call graph for this function:

z_lr_baca_nooverlap_oneiteration()

subroutine z_bplus_compress::z_lr_baca_nooverlap_oneiteration	(	integer	header_m,
		integer	header_n,
		integer	M,
		integer	N,
		type(z_acaquant)	acaquants,
		type(z_intersect)	submatc,
		type(z_intersect)	submatr,
		real(kind=8)	tolerance,
		real(kind=8)	SVD_tolerance,
		integer	bsize,
		type(z_mesh)	msh,
		type(z_kernelquant)	ker,
		type(z_hstat)	stats,
		type(z_proctree)	ptree,
		type(z_hoption)	option,
		integer	rcflag,
		real(kind=8)	flops
	)

**** Find row pivots from the columns column_R

**** Compute the skeleton matrix in CUR

**** update z_fnorm of UV and matUmatV

**** Find column pivots for the next iteration

Here is the call graph for this function:

z_lr_hbaca()

subroutine z_bplus_compress::z_lr_hbaca	(	type(z_matrixblock)	blocks,
		integer	leafsize,
		integer	rank,
		type(z_hoption)	option,
		type(z_mesh)	msh,
		type(z_kernelquant)	ker,
		type(z_hstat)	stats,
		type(z_proctree)	ptree,
		integer	pgno,
		integer	cridx
	)

Here is the call graph for this function:

z_lr_hbaca_leaflevel()

recursive subroutine z_bplus_compress::z_lr_hbaca_leaflevel	(	type(z_matrixblock)	blocks,
		integer	leafsize,
		integer	rank,
		type(z_hoption)	option,
		type(z_mesh)	msh,
		type(z_kernelquant)	ker,
		type(z_hstat)	stats,
		type(z_proctree)	ptree,
		integer	pgno,
		integer	cridx
	)

Here is the call graph for this function:

z_lr_hmerge()

recursive subroutine z_bplus_compress::z_lr_hmerge	(	type(z_matrixblock)	blocks,
		integer	rank,
		type(z_hoption)	option,
		type(z_mesh)	msh,
		type(z_hstat)	stats,
		type(z_proctree)	ptree,
		integer	pgno,
		integer	cridx,
		integer	hbacaflag
	)

Here is the call graph for this function:

z_lr_seudoskeleton()

subroutine z_bplus_compress::z_lr_seudoskeleton	(	type(z_matrixblock)	blocks,
		integer	header_m,
		integer	header_n,
		integer	M,
		integer	N,
		integer	rmaxc,
		integer	rmaxr,
		integer	rank,
		real(kind=8)	tolerance,
		real(kind=8)	SVD_tolerance,
		type(z_mesh)	msh,
		type(z_kernelquant)	ker,
		type(z_hstat)	stats,
		type(z_proctree)	ptree,
		type(z_hoption)	option,
		integer	ctxt,
		integer, optional	pgno
	)

Here is the call graph for this function: