外国人开发的地磁数据处理全套程序

外国人开发的地磁数据处理全套程序。

function apply

global mag2data

%%
% apply gives the chosen susceptibility value to chosen prisms.
%
% Written by Stefano Stocco on September 2007
% Modified by Stefano Stocco on December 2008

% Copyright （C） 2007 Stefano Stocco
% 
% This file is part of MAG2DATA.
% 
% MAG2DATA is free software; you can redistribute it and/or modify it
% under the terms of the GNU General Public License as published by the
% Free Software Foundation; either version 3 of the License or （at your
% option） any later version.
% 
% This program is distributed in the hope that it will be useful but
% WITHOUT ANY WARRANTY; without even the implied warranty of
% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General
% Public License for more details.
% 
% You should have received a copy of the GNU General Public License along
% with this program; if not see .


%% Input
sus_celle=mag2data.model.sus_celle;
ind_cella=mag2data.model.ind_cella;
sus=mag2data.model.sus;
CX=mag2data.model.CX;
CZ=mag2data.model.CZ;
x_centrocella=mag2data.model.x_centrocella;
z_centrocella=mag2data.model.z_centrocella;
xspace=mag2data.model.xspace;
zspace=mag2data.model.zspace;

mag2data.controls.model.immagine=1;  % if the mask already exists I
% mustn‘t do it again!

%% Application of values
%%
% sus is a vector which length is CTOT （= number of pixels = unknown 
% parametres）
sus（ind_cella）=sus_celle;
% ---------- Plot the mask ---------- %
matrix_celle=reshape（susCXCZ）;
imagesc（x_centrocella（1:）z_centrocella（:1）matrix_celle‘） shading flat grid on
set（gca ‘XAxisLocation‘‘top‘ ‘XTick‘xspace ‘YTick‘zspace ‘Position‘[0.05 0.1 0.87 0.44]）;
h=colorbar;
set（h ‘Position‘[0.93 0.1 0.03 0.45]）;
xlabel（‘Distance （m）‘‘VerticalAlignment‘‘baseline‘）
ylabel（‘Depth （m）‘‘VerticalAlignment‘‘middle‘）
axis（‘ij‘）
% ---------- Delete variable ---------- %
mag2data.model.ind_cella=[];

mag2data.model.sus=sus;
mag2data.model.matrix_celle=matrix_celle;

set（findobj（‘Tag‘‘selectprismsmodelbutton‘）‘Enable‘‘on‘）
set（findobj（‘Tag‘‘selectareamodelbutton‘）‘Enable‘‘on‘）
set（findobj（‘Tag‘‘deselectmodelbutton‘）‘Enable‘‘on‘）
set（findobj（‘Tag‘‘savemodelbutton‘）‘Enable‘‘on‘）
set（findobj（‘Tag‘‘okmodelbutton‘）‘Enable‘‘on‘）

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     目录           0  2013-05-25 19:10  MAG2DATA\
     文件        2334  2012-04-09 20:39  MAG2DATA\apply.m
     文件        1562  2012-04-09 20:39  MAG2DATA\butterworthfilter.m
     文件         848  2012-04-09 20:39  MAG2DATA\ccc.m
     文件        1026  2012-04-09 20:39  MAG2DATA\Dataset1.txt
     文件         994  2012-04-09 20:39  MAG2DATA\Dataset2.txt
     文件        2354  2012-04-09 20:39  MAG2DATA\deselect.m
     文件        1680  2012-04-09 20:39  MAG2DATA\dist.m
     文件        1933  2012-04-09 20:39  MAG2DATA\filtering.m
     文件        3190  2012-04-09 20:39  MAG2DATA\finestra.m
     文件        2341  2012-04-09 20:39  MAG2DATA\forward.m
     文件        1827  2012-04-09 20:39  MAG2DATA\griglia.m
     文件        2070  2012-04-09 20:39  MAG2DATA\grigliassi.m
     文件       73167  2012-04-10 19:34  MAG2DATA\Help.pdf
     文件        3353  2012-04-09 20:39  MAG2DATA\inv2d.m
     文件       13215  2012-04-09 20:39  MAG2DATA\inversion.m
     文件        3874  2012-04-09 20:39  MAG2DATA\invofsyn.m
     文件       14558  2012-04-09 20:39  MAG2DATA\kernelF2D.m
     文件       16863  2012-04-09 20:39  MAG2DATA\kernelFpseudo3D.m
     文件       14288  2012-04-09 20:39  MAG2DATA\kernelZ2D.m
     文件       35147  2012-04-09 20:39  MAG2DATA\LICENSE.txt
     文件        1490  2012-04-09 20:39  MAG2DATA\loadfile.m
     文件        1156  2012-04-09 20:39  MAG2DATA\loadpam.m
     文件        1350  2012-04-09 20:39  MAG2DATA\lunghezza_profilo.m
     文件        1696  2012-04-10 20:45  MAG2DATA\MAG2D.asv
     文件        1695  2012-04-09 20:39  MAG2DATA\MAG2D.m
     文件       14301  2012-04-09 20:39  MAG2DATA\menu_filtering.m
     文件       13519  2012-04-09 20:39  MAG2DATA\menu_forward.m
     文件       15110  2012-04-09 20:39  MAG2DATA\menu_inv2d.m
     文件        4149  2012-04-09 20:39  MAG2DATA\menu_kernel.m
     文件        3781  2012-04-09 20:39  MAG2DATA\menu_main.m
............此处省略37个文件信息