output_kp_matrices_wrapper Subroutine

public subroutine output_kp_matrices_wrapper(config_label, overlap_mats, hamil_mats)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: config_label
real(kind=dp), intent(in) :: overlap_mats(:,:,:)
real(kind=dp), intent(in) :: hamil_mats(:,:,:)

Contents


Source Code

    subroutine output_kp_matrices_wrapper(config_label, overlap_mats, hamil_mats)

        integer, intent(in) :: config_label
        real(dp), intent(in) :: overlap_mats(:, :, :)
        real(dp), intent(in) :: hamil_mats(:, :, :)

        call output_kp_matrices(config_label, 'overlap', overlap_mats)
        call output_kp_matrices(config_label, 'hamil  ', hamil_mats)

    end subroutine output_kp_matrices_wrapper