add_scalar_to_diagonal Interface

public interface add_scalar_to_diagonal

Called by

interface~~add_scalar_to_diagonal~~CalledByGraph interface~add_scalar_to_diagonal add_scalar_to_diagonal proc~calculate_u_matrix calculate_u_matrix proc~calculate_u_matrix->interface~add_scalar_to_diagonal proc~calculate_log_der_matrix calculate_log_der_matrix proc~calculate_log_der_matrix->interface~add_scalar_to_diagonal proc~initial_setup initial_setup proc~initial_setup->proc~calculate_u_matrix proc~numerov numerov proc~numerov->proc~calculate_log_der_matrix proc~numerov->proc~initial_setup proc~general_propagation_step general_propagation_step proc~numerov->proc~general_propagation_step proc~handle_final_propagation_steps handle_final_propagation_steps proc~numerov->proc~handle_final_propagation_steps proc~general_propagation_step->proc~calculate_u_matrix program~scattering SCATTERING program~scattering->proc~numerov proc~handle_final_propagation_steps->proc~general_propagation_step

Contents

Subroutines


Subroutines

public module subroutine add_scalar_to_diagonal_dp(matrix_, scalar_)

! add a scalar value to the matrix diagonal (double precision version)

Arguments

Type IntentOptional Attributes Name
real(kind=dp), intent(inout) :: matrix_(:,:)
real(kind=dp), intent(in) :: scalar_

public module subroutine add_scalar_to_diagonal_int32(matrix_, scalar_)

add a scalar value to the matrix diagonal (integer version)

Arguments

Type IntentOptional Attributes Name
integer(kind=int32), intent(inout) :: matrix_(:,:)
integer(kind=int32), intent(in) :: scalar_

public module subroutine add_scalar_to_diagonal_sp(matrix_, scalar_)

add a scalar value to the matrix diagonal (single precision version)

Arguments

Type IntentOptional Attributes Name
real(kind=sp), intent(inout) :: matrix_(:,:)
real(kind=sp), intent(in) :: scalar_