write_mat Subroutine

public subroutine write_mat(mat)

Arguments

Type IntentOptional Attributes Name
real(kind=dp) :: mat(:,:)

Contents