func (t HermitianBand) From(a HermitianBandCols) {
	if t.N != a.N {
		panic("cblas64: mismatched dimension")
	}
	if t.K != a.K {
		panic("cblas64: mismatched bandwidth")
	}
	if a.Stride < a.K+1 {
		panic("cblas64: short stride for source")
	}
	if t.Stride < t.K+1 {
		panic("cblas64: short stride for destination")
	}
	if t.Uplo != a.Uplo {
		panic("cblas64: mismatched BLAS uplo")
	}
	dst := Band{
		Rows: t.N, Cols: t.N,
		Stride: t.Stride,
		Data:   t.Data,
	}
	src := BandCols{
		Rows: a.N, Cols: a.N,
		Stride: a.Stride,
		Data:   a.Data,
	}
	switch a.Uplo {
	default:
		panic("cblas64: bad BLAS uplo")
	case blas.Upper:
		dst.KU = t.K
		src.KU = a.K
	case blas.Lower:
		dst.KL = t.K
		src.KL = a.K
	}
	dst.From(src)
}
From fills the receiver with elements from a. The receiver
must have the same dimensions, bandwidth and uplo as a and
have adequate backing data storage.
package cblas64
import "gonum.org/v1/gonum/blas"
type HermitianCols Hermitian
func (t HermitianCols) From(a Hermitian) {
	if t.N != a.N {
		panic("cblas64: mismatched dimension")
	}
	if t.Uplo != a.Uplo {
		panic("cblas64: mismatched BLAS uplo")
	}
	switch a.Uplo {
	default:
		panic("cblas64: bad BLAS uplo")
	case blas.Upper:
		for i := 0; i < a.N; i++ {
			for j := i; j < a.N; j++ {
				t.Data[i+j*t.Stride] = a.Data[i*a.Stride+j]
			}
		}
	case blas.Lower:
		for i := 0; i < a.N; i++ {
			for j := 0; j <= i; j++ {
				t.Data[i+j*t.Stride] = a.Data[i*a.Stride+j]
			}
		}
	}
}
func (t Hermitian) From(a HermitianCols) {
	if t.N != a.N {
		panic("cblas64: mismatched dimension")
	}
	if t.Uplo != a.Uplo {
		panic("cblas64: mismatched BLAS uplo")
	}
	switch a.Uplo {
	default:
		panic("cblas64: bad BLAS uplo")
	case blas.Upper:
		for i := 0; i < a.N; i++ {
			for j := i; j < a.N; j++ {
				t.Data[i*t.Stride+j] = a.Data[i+j*a.Stride]
			}
		}
	case blas.Lower:
		for i := 0; i < a.N; i++ {
			for j := 0; j <= i; j++ {
				t.Data[i*t.Stride+j] = a.Data[i+j*a.Stride]
			}
		}
	}
}
type HermitianBandCols HermitianBand
func (t HermitianBandCols) From(a HermitianBand) {
	if t.N != a.N {
		panic("cblas64: mismatched dimension")
	}
	if t.K != a.K {
		panic("cblas64: mismatched bandwidth")
	}
	if a.Stride < a.K+1 {
		panic("cblas64: short stride for source")
	}
	if t.Stride < t.K+1 {
		panic("cblas64: short stride for destination")
	}
	if t.Uplo != a.Uplo {
		panic("cblas64: mismatched BLAS uplo")
	}
	dst := BandCols{
		Rows: t.N, Cols: t.N,
		Stride: t.Stride,
		Data:   t.Data,
	}
	src := Band{
		Rows: a.N, Cols: a.N,
		Stride: a.Stride,
		Data:   a.Data,
	}
	switch a.Uplo {
	default:
		panic("cblas64: bad BLAS uplo")
	case blas.Upper:
		dst.KU = t.K
		src.KU = a.K
	case blas.Lower:
		dst.KL = t.K
		src.KL = a.K
	}
	dst.From(src)
}