《过程参数检测及仪表》课程设计报告选编.doc

《过程参数检测及仪表》课程设计报告选编.doc

  1. 1、本文档共9页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
《过程参数检测及仪表》课程设计报告选编

课程设计报告 ( 2015 -- 2016 年度 第 一 学期 ) 名 称:《过程参数检测及仪表》课程设计 题 目: 标准节流装置的计算 院 系: 班 级: 学 号: 学生姓名: 指导教师: 设计周数: 成 绩: 日 期: 年 月 日 课程设计的目的与要求 本课程设计为自动化专业《过程参数检测及仪表》专业课的综合实践环节。通过本课程设计,使学生加深过程参数检测基本概念的理解,掌握仪表的基本设计方法和设计步骤。 二、设计正文 第一类命题 1. 已知:流体为水,工作压力(表压力),工作温度℃;管道,材料为20号钢旧无缝管;节流装置采用角接取压标准孔板,材料为1Cr18Ni9Ti,;差压,求给定差压值下的水流量。 解题过程: 辅助计算。 工作压力(绝对压力): 查表可得:水密度,其动力粘度, 管道线膨胀系数℃,节流件线膨胀系数℃, 将水视为不可压缩流体则其可膨胀性系数。 题目未对管道直管段长度做出要求,故无需考虑此项检查;由于没有查出20号钢旧无缝管的管壁等效绝对粗糙度,无法检查管道粗糙度是否满足要求。 迭代计算。 对角接取压标准孔板: 令,得初值。 在MATLAB中编写迭代程序: A=316681.1485; beta=0.50383; C(1)=0.60253; i=1; deta=1; while (deta0.000001) Re=A*C(i); i=i+1; C(i)=0.5959+0.0312*(beta^2.1)-0.184*(beta^8)+0.0029*(beta^2.5)*((1000000/Re)^0.75); deta=abs((C(i)-C(i-1))/C(i)); end 迭代的中间结果如下: 则最终可得 (4)最终结果。 第二类命题 9. 流体为过热蒸汽,最大流量,常用流量,最小流量;工作压力(表压力),工作温度℃;管道,材料为20号钢新无缝管,允许压力损失;管道阻力件:上游第一阻力件为球形阀全开,上游第二阻力件为渐扩管。要求: (1)确定标准节流件形式; (2)选定差压计; (3)计算; (4)确定最小直管段长度; (5)计算压力损失并进行核算; (6)计算基本误差。 解题过程: 由题目要求建立下表: 项目 符号 单位 数值 被测介质 过热蒸汽 流量测量范围:正常 最大 最小 kg/h kg/h kg/h 2500 3000 1500 介质工作表压力 MPa 1 工作温度 ℃ 310 管道内径 mm 76.2 管道材料 20号钢新无缝管 正常流量下允许压力损失 kPa 30 阻力件:上游第一 上游第二 球形阀全开 渐扩管 确定标准节流件形式。 考虑到对压力损失的要求较为严格,选取的节流件为标准喷嘴(ISA1932喷嘴). 考虑到角接取压的沿程压力损失变化对差压测量影响较小,采用角接取压方式;由于管道直径不大,故采用环室取压方式。 选择材料为1Cr18Ni9Ti。 选定差压计。 满刻度流量值确定。 规定的流量计满刻度系列值为?? 最大流量,选取最近的流量系列值。 对应的确定。 (a)从对压力损失的要求出发,标准喷嘴差压上限,但实际上若取,选择最近的差压系列值,最终验算出的压力损失,远不满足题目要求。 (b)为减小压力损失,选择较小的差压上限,选取最为靠近的差压系列值。 (c)工作压力(绝对压力): 验算,符合规定。 验算,查表得所有值对应的最小雷诺数推荐值,保证了流出系数变化的要求。 (d)常用流量对应的差压。 3)型号选定。 可选用1151DP电容式差压变送器,其量程范围,仪表基本误差,再根据调整量程为。 计算。 辅助计算。 查表可得:过热蒸汽密度,其动力粘度, 管道线膨胀系数℃,节流装置线膨胀系数℃,过热蒸汽等熵指数。 迭代计算。 假设。 根据以下公式进行迭代: 从n=3起用快速弦截法公式: 精度判别公式:?? 假设判别条件:? 在MATLAB中编写迭代程序: A=0.255323; Re=560000; k=1.3; tau=0.999958; j=1; C(1)=1; epsilon(1)=1; e(1)=1; while (e(j)5*10^(-10)) j=j+1; if j=3; X(j)=A/(C(j-1)*epsilon

文档评论(0)

jiayou10 + 关注
实名认证
内容提供者

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

版权声明书
用户编号:8133070117000003

1亿VIP精品文档

相关文档