Changeset 546 for trunk/src/calc_tps.m
- Timestamp:
- Sep 17, 2012, 10:47:38 PM (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/src/calc_tps.m
r530 r546 1 %'calc_tps': calculate the thin plate spline (tps) coefficients for interpolation 2 %--------------------------------------------------------------------- 3 % DataOut=calc_tps(DataIn,checkall) 4 % 5 % OUTPUT: 6 % DataOut: output field structure 7 % 8 % INPUT: 9 % DataIn: intput field structure 10 % checkall:=1 if tps is needed for all fields (a filter projection is needed), =0 otherwise 11 1 12 function DataOut=calc_tps(DataIn,checkall) 2 13 DataOut=DataIn;%default … … 5 16 SubDomain=DataIn.SubDomain;% 6 17 end 7 %[CellVarIndex,NbDimVec,VarTypeCell,errormsg]=find_field_cells(DataIn);8 18 [CellInfo,NbDimArray,errormsg]=find_field_cells(DataIn); 9 19 nbtps=0; 10 20 for icell=1:numel(CellInfo); 11 %VarType=VarTypeCell{icell};12 21 if NbDimArray(icell)>=2 && strcmp(CellInfo{icell}.CoordType,'scattered')%'&& ~isempty(VarType.coord_x) 13 22 nbtps=nbtps+1;
Note: See TracChangeset
for help on using the changeset viewer.