Предупреждение гидратообразования в системах сбора и промысловой подготовки скважинной продукции на примере Ямбургского месторождения
Дипломная работа - Геодезия и Геология
Другие дипломы по предмету Геодезия и Геология
ние напрямую связано с понижением температуры газа вследствие теплопередачи окружающей среде. Также можно сделать вывод, что с увеличением дебита газа удельный расход ингибитора уменьшается. Это связано с тем, что увеличивается скорость газа и он находится меньшее время в контакте с окружающей средой через стенки труб. Уменьшение времени контакта приводит к уменьшению перепада температуры по длине трубопровода, что подтверждается раiетными данными.
Список использованных источников
1.Актуальные проблемы и новые технологии освоения месторождений природных газов в ХХI веке. - ОАО Газпром, Москва, 2003. - 252 с.
2.Бекиров Т.М., Шаталов А.Т. Сбор и подготовка к транспорту природных газов. - М.: Недра, 1986.-262 с.
.Бухгалтер Э.Б. Метанол и его использование в газовой промышленности. - М.: Недра, 1986. - 283 с.
.Гриценко А.И., Истомин В.А., Кульков А.Н., Сулейманов Р.С. Сбор и промысловая подготовка газа на северных месторождениях России. - М.: Недра, 1999. - 473 с.
.Истомин В.А. Предупреждение и ликвидация газовых гидратов в системах сбора и промысловой обработки газа и нефти.- М.:РАО ГАЗПРОМ. ВНИИГАЗ. 1990.- 213 с.
.Коротаев Ю.П., Кулиев А.М., Мусаев Р.М. Борьба с гидратами при транспорте природных газов. М.: Недра, 1973. - 136 с.
.Методические указания по раiету фазовых равновесий газовых гидратов и предупреждению гидратообразования в системах добычи газа. - М.ВНИИГаз, 1895. - 128 с.
.Отчет по геологии и разработке месторождений предприятия Ямбурггаздобыча за 1999 г. - РАО Газпром. ДП Ямбурггаздобыча.
.Технологические раiёты систем абсорбционной осушки газа.- Тюменниигипрогаз, 2002.-142 с.
.Технологический регламент на эксплуатацию объектов ГП-5 Ямбургского ГКМ РАО Газпром. ДП Ямбурггаздобыча. 2004 г.
.Чеботарев В.В. Раiеты основных технологических процессов при сборе и подготовке скважинной продукции. - УФА: УГНТУ, 2001. - 331 с.
Приложение А
Раiёт распределения температуры и давления в работающей скважине
Private Pz As Currency, Tz As Currency, Tg As CurrencySub выход_Click()SubSub вычисление_Click()
вычисление.Enabled = False= Val(Text1(4).Text)= Val(Text1(0).Text)= Val(Text1(1).Text)= Val(Text1(2).Text)= Val(Text1(3).Text)
Г = Val(Text1(5).Text)= Val(Text1(6).Text)= Val(Text1(7).Text)Error GoTo 111= (19.9 * (1 + 0.434 * Log(Pu)) - 26.5) + 273.15Построение таблицы.AddItem "H, м".AddItem "***************".AddItem "0".AddItem "***************".AddItem "Pz, МПа".AddItem "***************".AddItem Pu.AddItem "***************"
List3.AddItem "Tz, К"
Продолжение приложения А.
List3.AddItem "***************".AddItem Tu.AddItem "***************".AddItem "Tg, К".AddItem "***************".AddItem Tg.AddItem "***************"
Rem Задаём шаг алгоритма в зависимости от глубины скважины.
If H > 5000 Then= 500H > 3450 Then= 300H > 1800 Then= 200H > 900 Then= 100= 50
End IfВычисление давления и температуры по длине скважины.
For j = 50 To H Step w= Tu + Г * j= (Tz - Tu) / Log(Tz / Tu)= 1= PuWhile c > 0.05= Pz= (Px + Pu) / 2= 4.82 * (10 ^ (-4)) * (Pc ^ 2) - 1.658 * (10 ^ (-2)) * Pc + 1.01= (0.0683 * R * j) / (2 * Zc * Tc)= 1.325 * (10 ^ (-12)) * L * (Zc ^ 2) * (Tc ^ 2) * ((Exp(2 * S)) - 1) / (d ^ 5)= Sqr((Pu ^ 2) * Exp(2 * S) + ku * (q ^ 2))= Abs(Px - Pz)= (19.9 * (1 + 0.434 * Log(Pz)) - 26.5) + 273.15.AddItem j.AddItem "***************".AddItem Pz.AddItem "***************".AddItem Tz.AddItem "***************".AddItem Tg.AddItem "***************"
Next jОпределение давления на забое скважины.= H= Tu + Г * j= (Tz - Tu) / Log(Tz / Tu)
c = 1= PuWhile c > 0.05= Pz= (Px + Pu) / 2= 4.82 * (10 ^ (-4)) * (Pc ^ 2) - 1.658 * (10 ^ (-2)) * Pc + 1.01= (0.0683 * R * j) / (2 * Zc * Tc)= 1.325 * (10 ^ (-12)) * L * (Zc ^ 2) * (Tc ^ 2) * ((Exp(2 * S)) - 1) / (d ^ 5)= Sqr((Pu ^ 2) * Exp(2 * S) + ku * (q ^ 2))= Abs(Px - Pz).Caption = Pz.AddItem j.AddItem "***************".AddItem Pz.AddItem "***************".AddItem Tz.AddItem "***************".AddItem Tg.AddItem "***************"
Rem Определение максимальной глубины гидратообразования.
For j = H To 0.01 Step -1= Tu + Г * j= (Tz - Tu) / Log(Tz / Tu)= 1= PuWhile c > 0.05= Pz= (Px + Pu) / 2= 4.82 * (10 ^ (-4)) * (Pc ^ 2) - 1.658 * (10 ^ (-2)) * Pc + 1.01= (0.0683 * R * j) / (2 * Zc * Tc)= 1.325 * (10 ^ (-12)) * L * (Zc ^ 2) * (Tc ^ 2) * ((Exp(2 * S)) - 1) / (d ^ 5)= Sqr((Pu ^ 2) * Exp(2 * S) + ku * (q ^ 2))= Abs(Px - Pz)= (19.9 * (1 + 0.434 * Log(Pz)) - 26.5) + 273.15Tz <= Tg Then.Caption = jSub.Caption = "гидратов нет"IfjSub
111:"Ведены некорретные данные!"
вычисление.Enabled = True
End SubSub очистка_Click()
Rem Стирание всех данных.
вычисление.Enabled = True
Label2.Caption = "".Caption = "".Clear.Clear.Clear.ClearSubРаспечатывание данныхSub печать_Click()
Form1.PrintFormSub
Раiёт распределения температуры и давления в остановленной скважине
Private Pz As Currency, Tz As Currency, Tg As CurrencySub выход_Click()SubSub вычисление_Click()
вычисление.Enabled = False= Val(Text1(2).Text)= Val(Text1(0).Text)= Val(Text1(4).Text)
Г = Val(Text1(3).Text)= Val(Text1(1).Text)Error GoTo 111
Tg = (19.9 * (1 + 0.434 * Log(Pu)) - 26.5) + 273.15Построение таблицы
List1.AddItem "H, м".AddItem "***************".AddItem "0".AddItem "***************".AddItem "Pz, МПа".AddItem "***************".AddItem Pu.AddItem "***************".AddItem "Tz, К".AddItem "***************".AddItem Tu.AddItem "***************"
List4.AddItem "Tg, К"
Продолжение приложения А.
List4.AddItem "***************".AddItem Tg.AddItem "***************"
Rem Задаём шаг алгоритма в зависимости от глубины скважины.
If H > 5150 Then= 500H > 3450 Then= 300H > 1800 Then= 200H > 900 Then= 100= 50
End IfRem Вычисление давления и температуры по длине скважины.
For j = 50 To H Step w= Tu + Г * j= (Tz - Tu) / Log(Tz / Tu)= 1= PuWhile c > 0.05= Pz= (Px + Pu) / 2= 4.82 * (10 ^ (-4)) * (Pc ^ 2) - 1.658 * (10 ^ (-2)) * Pc + 1.01= (0.03415 * R * j) / (Zc * Tc)= Pu * Exp(S)= Abs(Px - Pz)= (19.9 * (1 + 0.434 * Log(Pz)) - 26.5) + 273.15.AddItem j.AddItem "***************".AddItem Pz.AddItem "***************".AddItem Tz.AddItem "***************".AddItem Tg.AddItem "***************"
Next jОпределение давления на забое скважины.= H= Tu + Г * j= (Tz - Tu) / Log(Tz / Tu)
c = 1= PuWhile c > 0.05= Pz= (Px + Pu) / 2= 4.82 * (10 ^ (-4)) * (Pc ^ 2) - 1.658 * (10 ^ (-2)) * Pc + 1.01= (0.03415 * R * j) / (Zc * Tc)= Pu * Exp(S)= Abs(Px - Pz).Caption = Pz.AddItem j.AddItem "***************".AddItem Pz.AddItem "***************"
Продолжение приложения А..AddItem Tz
List3.AddItem "***************".AddItem Tg.AddItem "***************"
Rem Определение максимальной глубины гидратообразования.
For j = H To 0.01 Step -1= Tu + Г * j= (Tz - Tu) / Log(Tz / Tu)= 1= PuWhile c > 0.05= Pz= (Px + Pu) / 2= 4.82 * (10 ^ (-4)) * (Pc ^ 2) - 1.658 * (10 ^ (-2)) * Pc + 1.01= (0.03415 * R * j) / (Zc * Tc)= Pu *