黄平书-线接触热弹流润滑 Fortran+Matlab转译代码

原Fortran代码有错误,进行了修改,数值上差别不大。根据Fortran代码转的Matlab,可以完美运行,但是因为精度问题有差异,只能说趋势是一致的。

bd50667048fa4bd2bb6eac4f374e43e2.png

24549805c48e4c7dacc8519d614074f1.png

 

需要私我-资源里只是Fortran运行结果

 

 

多重网格方法是一种用于高效求解偏微分方程的数值方法,而弹润滑是一种在机械接触面上存在弹性形变和润滑润滑的现象。 在多重网格方法中,网格被分为多个层次,每个层次的网格粒度不同,几何形状也不同。初始时,问题在较粗的网格上求解,然后通过插值和限制运算将问题从粗网格传递到精细网格。在精细网格上求解后,再通过限制和插值将解传递回粗网格,并进行迭代,直到达到所需的精度。 对于弹润滑问题,可以将其建模为一个非线性偏微分方程,如雷诺方程。使用多重网格方法可以在不增加计算量的情况下,提高求解效率和精度。 具体来说,可以将场分为速度和压力两个变量进行求解。在多重网格方法中,速度场和压力场分别用于粗网格和细网格的网格进行求解。在求解过程中,通过限制和插值来将速度和压力传递到不同层次的网格上,从而在不同粒度的网格上得到适当的精度。 多重网格方法的优点是能够充分利用不同层次的网格,加快求解速度,同时保证求解的精度。对于弹润滑问题,多重网格方法可以减少计算资源的消耗,从而提高求解效率,并且可以得到更为准确的结果。 总之,多重网格方法在解决弹润滑问题中具有重要的应用价值,可以提高求解效率和精度,是一种值得推广和应用的数值方法。
评论 13
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包

打赏作者

空花缱绻三分

你的鼓励将是我创作的最大动力

¥1 ¥2 ¥4 ¥6 ¥10 ¥20
扫码支付:¥1
获取中
扫码支付

您的余额不足,请更换扫码支付或充值

打赏作者

实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值