ply_split_legendre_test Subroutine

public subroutine ply_split_legendre_test(success)

A small testing routine to check the functions of this module.

Arguments

TypeIntentOptionalAttributesName
logical, intent(out) :: success

Indication whether the tests were completed successfully.


Calls

proc~~ply_split_legendre_test~~CallsGraph proc~ply_split_legendre_test ply_split_legendre_test proc~beta beta proc~ply_split_legendre_test->proc~beta proc~alpha alpha proc~ply_split_legendre_test->proc~alpha proc~ply_split_legendre_matrix ply_split_legendre_matrix proc~ply_split_legendre_test->proc~ply_split_legendre_matrix proc~alpha_frac alpha_frac proc~ply_split_legendre_test->proc~alpha_frac proc~alpha_beta alpha_beta proc~ply_split_legendre_test->proc~alpha_beta proc~ply_split_legendre_matrix->proc~beta proc~ply_split_legendre_matrix->proc~alpha proc~ply_split_legendre_matrix->proc~alpha_frac proc~ply_split_legendre_matrix->proc~alpha_beta

Contents


Variables

TypeVisibilityAttributesNameInitial
real(kind=rk), private, allocatable:: large_mat(:,:)
real(kind=rk), private, allocatable:: small_mat(:,:)
real(kind=rk), private :: res
integer, private :: iiter
integer, private :: jiter