getucyclematrixfromtable Subroutine

public pure subroutine getucyclematrixfromtable(ut, n, mu, nu, u)

returns the coupling matrix for translocation mu-<nu using the previously prepared table UT

Arguments

Type IntentOptional Attributes Name
type(umatrixtable), intent(in) :: ut
integer, intent(in) :: n
integer, intent(in) :: mu
integer, intent(in) :: nu
real(kind=long), intent(out) :: u(:,:)