资源描述：
《船舶核动力装置故障识别实验报告》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。
1、船舶核动力装置故障识别实验报告一、实验目的及内容1、实验目的：理解和掌握状态空间搜索的策略2、实验内容要求：已知船舶核动力装置中蒸汽发生器常见的故障有：G1为蒸汽出口阀卡死；G2为汽轮给水泵进汽调节阀故障；G3为汽轮给水泵叶轮、口环等损坏；G4为汽轮给水泵轴承烧毁；G5为给水加热器泄漏；G6为主给水调节阀自控失调；G7为U型蒸汽发生器传热管破损。标准故障发生时各特征参数值Z为参数集：Z1为主冷却剂平均温度；Z2为主冷却剂系统压力；Z3为蒸汽发生器二次侧水位；Z4为蒸汽发生器二次侧顶端温度；Z5为蒸汽发生器给水量；Z6为蒸汽发生器给水温
2、度；Z7为蒸汽发生器蒸汽量；Z8为汽轮给水泵转速；Z9为汽轮给水泵出口压力；Z10为汽轮给水泵流量；Z11为稳压器水位；Z12为蒸汽发生器排污口放射性检测指标；Z13为冷凝器排气口放射性检测指标。0.5为正常运行值,1.0为上限关机值,0.0为下限关机值,0.75与———————————————————————————————————————————————0.25则是上下报警值对应的状态。某一时刻SG运行过程中表现出的征兆为:0.75,0.55,0.42,0.75,0.5,0.5,0.75,0.5,0.5,0.5,0.5,0.5,0
3、.5.试分析故障的原因。二、实验原理。1、灰色关联分析及理论对于两系统之间的因素，其随时间或不同对象而变化的关联性的大小的量度，称为关联度。在系统发展过程中，若两个因素变化的趋势具有一致性，即变化程度较高，即可谓二者的关联度较高；反之，则较低。因此，灰色关联度分析方法，是根据因素之间发展趋势的相似或相异程度，即“灰色关联度”作为衡量因素之间关联程度的一种方法。灰色系统理论提出了对各子系统进行灰色关联度分析的概念，意图透过一定方法，去寻求系统各子系统（或因素）之间数值的关系。因此，灰色关联度分析对于一个系统的发展变化态势提供了量化的度量
4、，非常适合动态历程分析。2、灰色关联度分析方法模型灰色综合评价主要是依据以下模型：R=Y×W式中，R为M个被评价对象的综合评价结果向量；W为N个评价指标的权重向量；E为各指标的评判矩阵，（矩阵略）?i(k)为第i个被评价对象的第K个指标与第K个最优指标的关联系数。根据R的数值，进行排序。（1）确定最优指标集****F?[j,j,?j]j12nk设,式中为第k个指标的最优值。此最优序列的———————————————————————————————————————————————每个指标值可以是诸评价对象的最优值，也可以是评估者公认的最
5、优值。选定最优指标集后，可构造矩阵D（矩阵略）i式中jk为第i个期货公司第k个指标的原始数值。（2）指标的规范化处理由于评判指标间通常是有不同的量纲和数量级，故不能直接进行比较，为了保证结果的可靠性，因此需要对原始指标进行规范处理。设第k个指标的变化区间为[jk1,jk2],jk1为第k个指标在所有被评价对象中的最小值，jk2为第k个指标在所有被评价对象中的最大值，则可以用下式将上式中的原始数值变成无量纲值iCk?(0,1)。ijk?jk1，i?1,2,?m，k?1,2,?,n（矩阵略）C?ijk2?jkik（3）计算综合评判结果**
6、根据灰色系统理论，将{C*}?[C1*,C2,?,Cn]作为参考数列，将ii{C}?[C1i,C2,?,Cn]作为被比较数列，则用关联分析法分别求得第i个被评价对象的第k个指标与第k个指标最优指标的关联系数，即?（ik)?**minminCk?Cki??maxCk?CkiiC?C??maxC?Cikk*kiikk*kik式中??(0,1)，一般取??0.5。这样综合评价结果为：R=ExW*{C}最接近，即第i个被评价对象优{C}若关联度ri最大，说明与最优指标——————————————————————————————————————
7、—————————于其他被评价对象，据此可以排出各被评价对象的优劣次序。三、实验源程序根据实验原理，采用VB语言编写程序如下：PrivateSubCommand1_Click()IfText1.Text=""OrText2.Text=""OrText3.Text=""OrText4.Text=""OrText5.Text=""OrText6.Text=""OrText7.Text=""OrText8.Text=""OrText9.Text=""OrText10.Text=""OrText11.Text=""OrText12.Text=
8、""OrText13.Text=""ThenMsgBox"请将信息输入完全！",vbInformation+vbOKOnly,"提示"ExitSubEndIfDimZ(12)AsVariantZ(0)=Text1.Tex
