print_matrix Interface

public interface print_matrix

Interface for matrix printing function

Calls

interface~~print_matrix~~CallsGraph interface~print_matrix print_matrix proc~d1_print_matrix d1_print_matrix interface~print_matrix->proc~d1_print_matrix proc~d2_print_matrix d2_print_matrix interface~print_matrix->proc~d2_print_matrix proc~d1_print_matrix->proc~d2_print_matrix

Called by

interface~~print_matrix~~CalledByGraph interface~print_matrix print_matrix proc~mmpol_ommp_print_summary mmpol_ommp_print_summary proc~mmpol_ommp_print_summary->interface~print_matrix proc~c_ommp_print_summary_to_file C_ommp_print_summary_to_file proc~c_ommp_print_summary_to_file->proc~mmpol_ommp_print_summary

Contents

Module Procedures


Module Procedures

private subroutine d1_print_matrix(trans, label, matrix, ofunit)

Output a 1D-matrix of real in a well formatted way

Arguments

Type IntentOptional Attributes Name
logical, intent(in) :: trans

It the matrix is transposed or not
character(len=*), intent(in) :: label

Label to be printed before the matrix
real(kind=rp), intent(in), dimension(:) :: matrix

Matrix to be printed
integer(kind=ip), intent(in), optional :: ofunit

Unit where the matrix should be printed, if not present iof_mmpol is used.

private subroutine d2_print_matrix(trans, label, matrix, ofunit)

Output a 2D-matrix of real in a well formatted way

Arguments

Type IntentOptional Attributes Name
logical, intent(in) :: trans

It the matrix is transposed or not
character(len=*), intent(in) :: label

Label to be printed before the matrix
real(kind=rp), intent(in), dimension(:, :) :: matrix

Matrix to be printed
integer(kind=ip), intent(in), optional :: ofunit

Unit where the matrix should be printed, if not present iof_mmpol is used.