test_spartacus_math Program

Uses

  • program~~test_spartacus_math~~UsesGraph program~test_spartacus_math test_spartacus_math module~radiation_matrix radiation_matrix program~test_spartacus_math->module~radiation_matrix module~parkind1~2 PARKIND1 program~test_spartacus_math->module~parkind1~2 module~radiation_matrix->module~parkind1~2

Calls

program~~test_spartacus_math~~CallsGraph program~test_spartacus_math test_spartacus_math proc~solve_vec solve_vec program~test_spartacus_math->proc~solve_vec proc~solve_mat solve_mat program~test_spartacus_math->proc~solve_mat proc~mat_x_vec mat_x_vec program~test_spartacus_math->proc~mat_x_vec proc~mat_x_mat mat_x_mat program~test_spartacus_math->proc~mat_x_mat proc~expm expm program~test_spartacus_math->proc~expm interface~fast_expm_exchange fast_expm_exchange program~test_spartacus_math->interface~fast_expm_exchange proc~dr_hook dr_hook proc~solve_vec->proc~dr_hook proc~solve_mat->proc~dr_hook proc~mat_x_vec->proc~dr_hook proc~mat_x_mat->proc~dr_hook proc~expm->proc~solve_mat proc~expm->proc~mat_x_mat proc~expm->proc~dr_hook proc~repeated_square repeated_square proc~expm->proc~repeated_square proc~fast_expm_exchange_2 fast_expm_exchange_2 interface~fast_expm_exchange->proc~fast_expm_exchange_2 proc~fast_expm_exchange_3 fast_expm_exchange_3 interface~fast_expm_exchange->proc~fast_expm_exchange_3 proc~fast_expm_exchange_2->proc~dr_hook proc~fast_expm_exchange_3->proc~dr_hook

Contents


Variables

Type Attributes Name Initial
integer, parameter :: n = 10
integer, parameter :: m = 3
real(kind=jprb), dimension(n,m,m) :: A
real(kind=jprb), dimension(n,m,m) :: B
real(kind=jprb), dimension(n,m,m) :: C
real(kind=jprb), dimension(n,m) :: v
real(kind=jprb), dimension(n,m) :: w
real(kind=jprb), dimension(n) :: aa
real(kind=jprb), dimension(n) :: bb
real(kind=jprb), dimension(n) :: cc
real(kind=jprb), dimension(n) :: dd
integer :: j