Method |
Description |
TDataSet | |
Returns interpolated value of additional attributes. | |
Just constructor | |
Frees all the memory. | |
Returns non-interpolated geographical information. | |
unused | |
Initializes the geographical structure, normalizes it. | |
Reads the data set. | |
Determines the max values of attributes... | |
Reads *.gri file's header | |
Returns non-interpolated velocity | |
Returns non-interpolated baricentirc velocity | |
Returns interpolated value baricentric velocity | |
function TDataSet.VelGeo(x, y, z: single): TVector3f; var v00,v10,v01,v11,w0,w1:TVector3f; d,px,py:single; ix,iy,start,stop:integer; begin if (x>=1)or(y>=1)then Result:=AffineVectorMake(0,0,0) else begin if (geox[ceil(x*(geoaddr-1))]=geox[floor(x*(geoaddr-1))])then begin ix:=geox[floor(x*(geoaddr-1))]; d:=(Geo(ix+1,0,0)[0]-Geo(ix,0,0)[0])/geo(dimx-1,0,0)[0]; px:=(x-(Geo(ix,0,0)[0]/geo(dimx-1,0,0)[0]))/d; //!!!da sa predpocitat end else begin start:=geox[floor(x*(geoaddr-1))]; stop:=geox[ceil(x*(geoaddr-1))]; while (start | |
Returns interpolated velocity. | |
Returns interpolated velocity with input as vector. |