|
|
EDA365欢迎您登录!
您需要 登录 才可以下载或查看,没有帐号?注册
x
clc;%总润滑方程求解
: n' l/ K7 X1 v3 u: \) x) Yclear;% k- \1 j' X! d* z
close all, ]- e( t) w/ K
syms a b c d e x L O P U t o p9 C' }! I H! Y8 K
K=5;%常量
3 U/ R, e4 M5 m- Gh=2;%常量 多孔储液介质厚度
- ^3 M' B ~5 g7 f0 Z# G+ C SD=0.012;%半径
* r2 w) H8 t" U9 ]- I5 V/ QH=0.2;%压缩后的高度( g* u9 I* m, R! f0 o3 _( l
L=@(x)0.2.*x;/ ^- s& F1 n1 e! b- G9 D0 Y
% % % % 计算与孔隙率相关的brinkman数/ l1 `5 v9 r7 A5 c4 R$ h
c=@(t)((t.^3.*D.^2)./(36.*(1-t).^2.*K)).^2;%渗透率求解
; Q9 O- B* ^0 Gt1=0.0033;%孔隙率
$ {4 O1 J0 G: |" N6 {4 M3 B9 s3 A' L& ha=L./c(t1);%a为brinkman数
5 \% u5 P* @! Y) w# L6 Vb=H./c(t1);4 y1 i: i" ~' `' S' [, Y F
% % % % 计算方程中的f,控制此处f不与x一起变化) ]+ i/ B% S3 S/ i
f=(cos(h.*b.*H)-1)/(b.*sin(h.*b.*H));& ^6 ]: B% G2 B( f
% % % % 计算方程中常数余项C,此处x只与a有关0 k+ h: E( H2 q H
o=@(x)(a(x).^2.*(H-f)./(2.*f-H));
; ?# F8 M+ t$ o Pp=@(x)(a(x).^2./(2.*f-H));2 _* w) ]7 T& H: V7 k% t7 m
O=int(o(x),0,1);& z5 N- ~& ~) b% k
P=int(p,0,1);8 R z3 F9 u: O! Z
c=O./P;
: K+ K" n5 u0 d4 B& p%%%%计算润滑升力
; T# l9 U; O% G% h3 z" |1 g. Zd=@(x)(1-x).*L./c(t1).^2.*(H-f+c)./(2.*f-H);# P* A9 G# v( T5 G2 R, \
U=int(d,0,1);
1 J8 L8 S: a+ n+ Q) T5 B8 P$ K( v我的代码一直在报错,请求高手帮忙看看哪里出了问题。% W2 g; c3 U5 \8 q) ]
错误提示:未定义与 'function_handle' 类型的输入参数相对应的函数 'rdivide'。$ W8 l; L7 D5 H Q# E% [6 q
S+ \0 m% Q* B% c: @8 Z出错 runhuashengli (line 13), q7 v- N6 R. {/ Y2 L* J
a=L./c(t1);%a为brinkman数$ F% U$ |/ F9 y6 q c5 J. b$ T* z, t
|
|