Tentwt - Tent weight for patching

Tentwt dim=2 n= w= windwt= >wallwt.H

Computes the tent weight for patching.

from par	integer	dim =2	number of dimensions
	integer array	n	data size (n1, n2, etc)
	integer array	w	window size
	integer array	k (optional)	number of windows in different directions
	integer array	a (optional)	window offset
	integer array	center (optional)	window centering

Modules: tent.r90 , wallwt.r90