samer@4: function z=vlinterp(k,z0,z)
samer@4: % vlinterp - vectorial linear interpolation between points
samer@4: %
samer@4: % vlinterp :: 
samer@4: %    real   ~'fraction of distance to travel from from initial to final point',
samer@4: %    [Size] ~'initial point',
samer@4: %    [Size] ~'final point'
samer@4: % -> [Size] ~'interpolated point'.
samer@4: %
samer@4: % This returns a point (vector,array etc) on the straight line 
samer@4: % between the given points.
samer@4: %
samer@4: % See also: LINTERP which treats each component independently.
samer@4: 
samer@4: z = z0+k*(z-z0);