实验2--磁性体磁场正演程序要点分析.docVIP

实验2--磁性体磁场正演程序要点分析.doc

  1. 1、本文档共15页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  5. 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  6. 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  7. 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  8. 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
《应用地磁学》实验报告 姓 名: 张嘉琪 学 号: 1010112225 指导教师: 李淑玲 实验地点: 实验室319 实验日期: 2014-05-24 实验二:磁性体磁场正演 一、实验目的: 1、通过球体、水平圆柱体磁场的正演计算,掌握简单规则磁性体正演磁场的计算方法; 2、通过计算认识球体与水平圆柱体磁场的一般分布规律,了解影响磁性体磁场的主要因素(如磁性体的形体、物性参数、走向或计算剖面的选择等),培养学生实际动手能力与分析问题的能力。 二、实验内容 用Matlab语言或C语言编程实现球体和水平圆柱体的磁场(包括Za、Ha、Δt)的正演计算。 三、实验要求 假设地磁场方向与磁性体磁化强度方向一致且均匀磁化的情况下,当地磁场T=50000nT,磁倾角I=60°,球体与水平圆柱体中心埋深R=30m,半径r=10m,磁化率k=0.2(SI)ΔT),画出对应的平面等值线图、曲面图及主剖面异常图; 2、正演计算水平圆柱体的磁场(Za、Ha、ΔT),画出主剖面异常结果图; 3、通过改变球体与水平圆柱体的几何参数、磁化强度方向(I)ΔT)的计算公式是以磁化强度倾角I、有效磁化倾角is和剖面与磁化强度水平投影夹角A′来表达。 1、球体磁场的正演公式: 2、水平圆柱体磁场的正演公式: 3、有效磁化强度Ms与有效磁化倾角is: 五、计算程序代码: 1、球体matlab代码: clc; clear; % % 测点分布范围 dx=5; % X方向测点间距 dy=5; % Y方向测点间距 nx=81; % X方向测点数 ny=81; % Y方向测点数 xmin=-200; % X方向起点 ymin=-200; % Y方向起点 x=xmin:dx:(xmin+(nx-1)*dx); % X方向范围 y=ymin:dy:(ymin+(ny-1)*dy); % Y方向范围 [X,Y]=meshgrid(x,y); % 转化为排列 % 球体参数 i=pi/3; %磁化倾角i a=0; %剖面磁方位角 R=10; % 球体半径 m v=4/3*pi*R^3 u=4*pi*10^(-7);%磁导率 T=0.5*10^(-4);%地磁场强度 k=0.2;%磁化率 M=k*T/u; %磁化强度 A/m m=M*v; %磁矩 D=30; % 球体埋深 m % 球体Za理论磁异常 Za=(u*m*((2*D.^2-X.^2-Y.^2)*sin(i)-3*D*X.*cos(i)*cos(a)-3*D*Y.*cos(i)*sin(a)))./(4*pi*(X.^2+Y.^2+D.^2).^(5/2)); % 球体Hax理论磁异常 Hax=(u*m*((2*X.^2-Y.^2-D.^2)*cos(i)*cos(a)-3*D*X.*sin(i)+3*X.*Y.*cos(i)*sin(a)))./(4*pi*(X.^2+Y.^2+D.^2).^(5/2)); %球体Hay理论磁异常 Hay=(u*m*((2*Y.^2-X.^2-D.^2)*cos(i)*sin(a)-3*D*Y.*sin(i)+3*X.*Y.*cos(i)*cos(a)))./(4*pi*(X.^2+Y.^2+D.^2).^(5/2)); %球体ΔT理论异常 T=Hax*cos(i)*cos(a)+Hay*cos(i)*sin(a)+Za*sin(i); %绘平面异常等值线图(二维) figure(1),clf, subplot(221), contourf(X,Y,Hax);xlabel(X(m)),ylabel(Y(m)),title(理论球体Hax异常); axis equal,axis([-50 50 -50 50]),colorbar; subplot(222), contourf(X,Y,Hay);xlabel(X(m)),ylabel(Y(m)),title(理论球体Hay异常); axis equal,axis([-50 50 -50 50]),colorbar; subplot(223), contourf(X,Y,Za);xlabel(X(m)),ylabel(Y(m)),title(理论球体Za异常); axis equal,axis([-50 50 -50 50]),colorbar; subplot(224), contourf(X,Y,T);xlabel(X(m)),ylabel(Y(m)),title(理论球体ΔT异常); axis equal,axis([-50 50 -50 50]

文档评论(0)

高考学子 + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档