浅谈渗流力学实验.docVIP

  1. 1、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  4. 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  5. 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  6. 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  7. 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
渗流力学上机实验报告 实验三 实验名称:理想系统不稳定渗流井壁压力计算 实验目的:了解渗流力学中最有代表性的三种渗流方式:平面线性渗流、平面径向渗流、空间球形渗流的求解方法、井壁压力及其导数的变化规律。 实验原理:1、渗流力学中常用的无量纲量(SI 单位制)举例: 2、按此无量纲定义,以径向渗流为例,其无量纲控制方程组为: 初始条件: 内边界条件: 外边界条件: 3、压力导数 渗流力学常用的压力导数定义为: 对于不稳定渗流过程,压力导数比压力更敏感,能够比较清晰地反映流体渗流的方式。 实验内容: 1、平面线性渗流压力分布 井壁压力及其压力导数 , 2、平面径向渗流压力及压力导数为 3、球形空间渗流 附图如下 实验四: 实验名称:一维单向饱和度场数学模拟 实验目的:理解油水两相渗流的物理意义,以及在水驱油过程中相对渗透率变化规律、含水率的变化规律以及饱和度的分布规律。 原理公式: 附图如下 附: 实验三代码 Option Explicit Public Function VBPwt2(td As Double) As Double VBPwt2 = 0.5 * VBEix(0.25 / td) End Function Public Function VBEix(x As Double) As Double Dim o As Double, u As Double If (x = 1) Then o = -0+ 0* x - 0* x ^ 2 + 0* x ^ 3 - 0* x ^ 4 + 0* x ^ 5 o = o - Log(x) Else o = 0.2677737343 + x * (8.6347608925 + x * (18.059016973 + x * (8.5733287401 + x))) u = 3.9584969228 + x * (21.0996530827 + x * (25.6329561486 + x * (9.5733223454 * x))) o = (o / u) * Exp(-x) / x End If VBEix = o End Function Public Function dppei(td As Double) As Double dppei = 0.5 * Exp(-0.25 / td) End Function Public Function pderf(x As Double) As Double pderf = 1 - Exp(-x ^ 2) * ((0.254829592 / (1 + 0.327951 * x)) + (-0.284496736 / (1 + 0.327951 * x) ^ 2) + (1.421413741 / (1 + 0.327951 * x) ^ 3) + (-1.453152027 / (1 + 0.327951 * x) ^ 4) + (1.061405429 / (1 + 0.327951 * x) ^ 5)) + 1.5 * 10 ^ (-7) End Function Public Function pdcir(td As Double) As Double pdcir = 1 - pderf(1 / 2 / Sqr(td)) End Function Public Function dpcir(td As Double) As Double dpcir = td ^ (-0.5) / Sqr(2 * 3.141592653) * Exp(-1 / (4 * td)) End Function Public Function Pd(td As Double) As Double Pd = 2 * Sqr(td / 3.141592653) End Function Public Function dPd(td As Double) As Double dPd = Sqr(td / 3.141592653) End Function

文档评论(0)

00625 + 关注
实名认证
文档贡献者

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

1亿VIP精品文档

相关文档