直流电测深正演报告.docxVIP

  1. 1、本文档共9页,可阅读全部内容。
  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文档。上传文档
查看更多

直流电测深正演报告

一.原理

(1)电阻率测深法原理

电阻率测深法简称电测深,是用来探明水平层状(或近水平层状)岩石在地下分布情况的一组电阻率法变种。电测深法的装置特点是保持测量电极MN的位置固定,在不断增大供电电极距的同时,逐次进行观测。

通常要求满足以下条件:

每个测点的电测深观测结果,绘制成一条视电阻率ρs随极距AB/2变化的电测深曲线。通常将电测深曲线绘在双对数坐标纸上,其横坐标表示供电极距AB/2,纵坐标表示相应的视电阻率值。电测深曲线反映了测点下方垂直方向上电性层的变化情况。

(一)水平层状大地上对称四极测深

1.多层水平地层上的对称四极电测深视电阻率表示式

(1)多层水平地层地面点电流源的电场

如图6.1-39所示,水平地面下有n层水平地层,各层电阻率分别为ρ1、ρ2…ρn;各层厚度分别为h1、h2…hn-1;各层底面到地表的距离分别为H1、H2…Hn-1,Hn→∞。

设地面点电流源A的强度为I。为求各层中的电位表达式,将柱坐标系的原点设在A点,Z轴垂直向下。在所设条件下,电位与角无关,满足如下形式的拉普拉斯方程:

求解思路:

U,E,ρs,Ti(λr)

①用分离变量法求方程

②边界条件

③通解

④各层的电位表达式

⑤利用边界条件求待定系数

a2、a3,…,anb1、b2,…,bn-1

电测深只在地面工作,即z=0,故只需求出b1,

2、视电阻率的表达式

式中:J0(mr)为零阶第一类贝赛尔函数;B1(m)为积分变量m的函数

对于层数确定的水平地层,根据地层界面上电位和电流密度法向分量连续的边界条件,可具体求出B1(m)的表示式。例如,最简单的二层水平地层,利用ρ1和ρ2岩层分界面的相应边界条件可具体求出

(2)多层水平地层上电测深的ρs表示式和电阻率转换函数

若采用MN→0的装置测量,相应的ρs表达式为:

则多层水平地层上的电测深ρs公式简写成:

式中,T1(m)定义为电阻率转换函数又称核函数。

可见,电阻率转换函数与各层的层参数(厚度和电阻率)及积分量m有关。

电阻率转换函数的递推公式

对于二层水平地层情况,若将(6.1-58)式先后代入(6.1-59)式和(6.1-62)式,便得到二层水平地层的电阻率转换函数:

归纳每一层的电阻率转换函数,就可导出电阻率转换函数的递推公式:

电阻率转换函数递推公式(6.1-66)的导出,免去应用边界条件解方程组求系数B1(m)的计算,开辟了正演计算层状大地电测深曲线的新领域。

二.Matlab程序

二层G型曲线

clear

closeall

clc

formatshortg

nlayer=2;

res(1)=10;

res(2)=100;

thick(1)=10;

thick(2)=0;

rr=[

2

3

4.5

6

9

12

15

20

30

45

60

90

120

];

nab=length(rr);

foriab=1:nab

[rho]=sdcs1dford(rr(iab),nlayer,res,thick);

rhoa(iab)=rho;

end

%

%输出数据到文件gmod1obs.dat

%

fid=fopen(gmod1obs.dat,w);

foriab=1:length(rr)

fprintf(fid,%12.5g%12.6g\n,rr(iab),rhoa(iab));

end

fclose(fid)

%

%画图

%

loglog(rr,rhoa,r-o,...

LineWidth,2,...

MarkerEdgeColor,k,...

MarkerFaceColor,b,...

MarkerSize,10)

gridon;

axis([1100011000]);

xlabel(AB/2/m);ylabel(RHO/ohm);

function[rho]=sdcs1dford(ab2,nlayer,res,thick)

%sdcs1dford

%电测深一维正演程序

%输入参数:ab2

文档评论(0)

139****2118 + 关注
实名认证
文档贡献者

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

1亿VIP精品文档

相关文档