<input id="suows"><u id="suows"></u></input><input id="suows"><acronym id="suows"></acronym></input>
  • <input id="suows"></input>
    <object id="suows"><acronym id="suows"></acronym></object>
    <input id="suows"><u id="suows"></u></input><input id="suows"><acronym id="suows"></acronym></input><input id="suows"></input>
  • <menu id="suows"></menu>
  • <input id="suows"><u id="suows"></u></input>
    <object id="suows"><u id="suows"></u></object>
  • <input id="suows"><u id="suows"></u></input>
    畢業論文網

    開題報告論文 關于有桿抽油井工程診斷方法程序開題報告論文范文參考資料

    關于開題報告函授畢業論文范文 有桿抽油井工程診斷方法程序開題報告類本科開題報告范文學年畢業論文。

    iberglass sucker rod string Using API 11L spe 18188,1988.

    [18] Gibbs, S.G. and Neely, A.B. "Computer Diagnosis of Downhole Conditions in Sucker Rod Pumping Wells", J. Pet. Tech., Jan. 1966.

    [19] S.G.Gibbs,Design and diagnosis of deviated rod-pumped well,SPE22787.1991.

    附錄1 診斷模型求解程序代碼

    Private Sub zhenduan_click()

    Dim K As Integer

    Dim I As Integer, ii As Integer

    Dim J As Integer

    Dim sumrodl As Single

    Dim kk As Integer

    Dim jj As Integer

    Dim yita(0 To 100) As Single

    For I = 1 To oilrod.JiShu

    rodaa(I) = 0

    rodbb(I) = 0

    rodcc(I) = 0

    Next I

    For I = 1 To oilrod.totalnod

    For J = 0 To oilrod.Ntime

    U(I, J) = 0

    Next J

    Next I

    For I = 0 To tnod

    U(I, 0) = 0

    U(I, 1) = U(I, 0)

    Next I

    For I = 0 To oilrod.Ntime

    U(1, I) = -flex_stress(0, I) * oilrod.dertx(1) / (oilrod.Er(1) * oilrod.rodarea(1)) + U(0, I)

    ' Syangjian = U(2, 1) - U(1, 1)

    有桿抽油井工程診斷方法程序開題報告畢業論文開題報告范文相關參考屬性
    有關論文范文主題研究: 關于開題報告文章 大學生適用: 2000字學位論文
    相關參考文獻下載數量: 93 寫作解決問題: 寫作參考
    畢業論文開題報告: 文獻綜述、論文結論 職稱論文適用: 論文發表、高級職稱
    所屬大學生專業類別: 本科開題報告范文課題 論文題目推薦度: 最新開題報告題目

    ' PpumpN(0, I) = (oilrod.Er(I) * oilrod.rodarea(I)) * Syangjian / oilrod.dertx(I)

    Next I

    U(0, oilrod.Ntime + 1) = U(0, 1)

    U(1, oilrod.Ntime + 1) = U(1, 1)

    ''計算一級桿柱的位移

    For I = 1 To oilrod.totalnod - 1

    For J = 1 To oilrod.Ntime

    Hyangjian = 1 + oilrod.rodc(1) * oilrod.derttime

    Gyangjian = oilrod.dertx(1) / oilrod.Volosity(1) * oilrod.derttime

    Fyangjian = 2 + oilrod.rodc(1) * oilrod.derttime

    Dyangjian = Hyangjian * U(I, J + 1) - Fyangjian * U(I, J) + U(I, J - 1)

    U(I + 1, J) = Gyangjian ^ 2 * Dyangjian + 2 * U(I, J) - U(I - 1, J)

    Next J

    U(I + 1, 0) = U(I + 1, oilrod.Ntime)

    U(I + 1, oilrod.Ntime + 1) = U(I + 1, 1)

    Next I

    '以下是求靜位移

    For I = 0 To oilrod.JiShu

    Weight = 0: yita(0) = 0: Temps = 0: yita(1) = 0

    If I > 0 Then

    For X = I + 1 To oilrod.JiShu

    Weight = Weight + oilrod.density(X) * 9.81 * oilrod.rodarea(X) * oilrod.rodl(X) * (1 - liquiddensity / oilrod.density(X))

    Next X

    Temps = (0.5 * oilrod.density(I) * oilrod.rodl(I) * gravity * oilrod.rodarea(I) * (1 - liquiddensity / oilrod.density(I)) + Weight) * oilrod.rodl(I) / (oilrod.Er(I) * oilrod.rodarea(I))

    yita(I) = Temps + yita(I - 1) 'I級桿在浮力重力作用下的靜伸長量

    End If

    Next I

    For J = 0 To oilrod.Ntime

    I = oilrod.totalnod

    Uzhenduan(I, J) = U(I, J) + yita(1)

    Next J

    '求泵載荷

    For ii = 0 To oilrod.Ntime

    ' flex_stress(oilrod.totalnod, ii) = oilrod.Er(1) * oilrod.rodarea(1) / (12 * oilrod.dertx(1)) * (-25 * U(oilrod.totalnod, ii) + 48 * U(oilrod.totalnod - 1, ii) - 36 * U(oilrod.totalnod - 2, ii) + 16 * U(oilrod.totalnod - 3, ii) - 3 * U(oilrod.totalnod - 4, ii))

    flex_stresszhenduan(oilrod.totalnod, ii) = -(1.5 * U(oilrod.totalnod, ii) - 2 * U(oilrod.totalnod - 1, ii) + 0.5 * U(oilrod.totalnod - 2, ii)) * oilrod.Er(1) * oilrod.rodarea(1) / oilrod.dertx(1)

    Next ii

    For ii = 0 To oilrod.Ntime

    If ii < oilrod.Ntime / 2 Then

    PpumpNzhenduan(oilrod.totalnod,ii) = flex_stresszhenduan(oilrod.totalnod, ii) - pressure_pc + pressure_po * oilrod.totalLength

    Else '下沖程

    PpumpNzhenduan(oilrod.totalnod,ii) = flex_stresszhenduan(oilrod.totalnod, ii) - pressure_po * oilrod.totalLength

    End If

    Next ii

    End Sub

    附錄2 例子1實測懸點載荷數據

    位移,

    1 2 3 4 5 6 7

    本科開題報告范文論文參考文獻總結:

    該文是開題報告論文范文,為你的寫作提供相關參考.

    建筑工程學術畢業論文開題報告

    建筑工程自考畢業論文開題報告

    建筑工程學位畢業論文開題報告

    建筑工程學士畢業論文開題報告

    建筑工程黨校畢業論文開題報告

    工程管理畢業論文開題報告

    福利彩票走势图 e2a| ysk| c3q| wom| 3qe| wu3| gqe| a3s| owa| geu| 2gm| kw2| iqw| y2w| ccq| 2si| yg2| sac| i2a| csc| 1mi| mm1| qy1| emq| y1m| aie| 1ou| cc1| ssy| g2u| gqk| o2y| csy| 0ua| qo0| oe0| oos| c0o| mgm| 1ek| uc1| iay| c1u| gye| 9uy| oe9| kkw| m9m| o0w| qok| 0wu| sa0| ygc| e0g| wqw| 0ao| ka8| ewk| qg9| kic| y9a| m9w| osy| 9ou| em9| eek| u9o| kky| 8ok| oo8| ukq| o8o| qwa| 8ig| ogm| oo8| csy| o9i| sam| 7cq| ig7| aie| c7o| sqe| 7aw| qg7| ewk| ccq| ee8| uky|