T Espe 030226 PDF
T Espe 030226 PDF
T Espe 030226 PDF
i
CERTIFICACIN DE LA ELABORACIN DEL PROYECTO
_____________________ ____________________
DIRECTOR CODIRECTOR
Sangolqu, 09-11-2010
ii
LEGALIZACIN DEL PROYECTO
ELABORADO POR:
_________________________ ___________________________
_______________________
DIRECTOR
Sangolqu, 09-11-2010
iii
DEDICATORIA
Para mis padres Edgar Nez y Myriam Enrquez, por su comprensin y ayuda
en todos los momentos. Me han enseado a encarar las adversidades sin
perder nunca la dignidad ni desfallecer en el intento. Me han dado todo lo que
soy como persona, mis valores, mis principios, mi perseverancia y mi empeo,
y todo ello con una gran dosis de amor y sin pedir nunca nada a cambio.
iv
AGRADECIMIENTO
A Dios, por darme la salud y permitir que pueda culminar esta etapa de mi vida
cumpliendo mis metas y sueos, dndome perseverancia y humildad. A mis
padres, hermanos y amigos de la Carrera de Ingeniera Mecnica por
brindarme todo su apoyo durante este tiempo.
v
INDICE DE CONTENIDOS
vi
2.2.2.1. Tanques Verticales 24
2.2.2.1.1. Techo Fijo.- 25
2.2.2.1.2. Techo Flotante.- 26
2.2.2.1.3. Tanques sin Techo.- 26
2.2.2.2. Tanques Horizontales 28
2.2.2.2.1. Cabezas Planas.- 29
2.2.2.2.2. Toriesfrica: 29
2.2.2.2.3. Semielptica.- 29
2.2.2.2.4. Semiesfrica: 29
2.2.2.3. Tanques Esfricos 30
CAPTULO 3 32
MEDICIONES Y TOMA DE DATOS 32
3.1. MEDICIONES 32
3.1.1. DEFINICIN 32
3.1.2. ASPECTOS GENERALES 32
3.1.3. SEGURIDAD 33
3.1.4. TOLERANCIAS 34
3.1.5. EQUIPOS DE MEDICIN 35
3.1.5.1. Plomada 35
3.1.5.2. Cinta de acero 35
3.1.5.3. Cinta de fibra de vidrio 36
3.1.5.4. Flexmetro.- 36
3.1.5.5. Regla de Ingeniero.- 37
3.1.5.6. Medidor de espesores.- 37
3.1.5.7. Estacin total.- 38
3.1.5.8. Nivel de burbuja.- 39
3.1.5.9. Otras Herramientas.- 39
3.1.6. MEDICIONES EN TANQUES VERTICALES 40
3.1.6.1. Condiciones de Medida 40
3.1.6.2. Medicin de Espesores 41
3.1.6.3. Medicin de las Longitudes Verticales 42
3.1.6.4. Medicin de las Circunferencias 51
3.1.6.5. Medicin de Volmenes Muertos 52
3.1.7. MEDICIONES EN TANQUES HORIZONTALES 54
vii
3.1.7.1. Condiciones de Medida 54
3.1.7.2. Medicin de Espesores 54
3.1.7.3. Medicin de la Longitud 55
3.1.7.4. Medicin de las Circunferencias 55
3.1.7.5. Medicin de las Cabezas 58
3.1.8. MEDICIONES PARA TANQUES ESFRICOS 58
3.1.8.1. Mediciones de Campo 59
3.2. TOMA DE DATOS 60
CAPTULO 4 62
CALIBRACIN DE TANQUES DE ALMACENAMIENTO 62
4.1. DEFINICIN 62
4.2. IMPORTANCIA 62
4.3. MTODOS DE CALIBRACIN 63
4.3.1. MTODO VOLUMTRICO 65
4.3.2. MTODO GEOMTRICO 66
4.3.2.1. Mtodo Geomtrico Externo por Cinta Mtrica 67
4.3.2.2. Mtodo Geomtrico Externo por Lnea de Referencia ptica 68
4.3.2.3. Mtodo Geomtrico Externo por Triangulacin 69
4.3.2.4. Mtodo Geomtrico Interno por Triangulacin 70
4.3.3. MTODO GRAVIMTRICO 70
4.4. CALIBRACIN DE TANQUES VERTICALES 70
4.4.1. PROCEDIMIENTO NORMA API MPMS 2-A 70
4.4.1.1. Correccin de cinta a temperatura base 71
4.4.1.2. Correccin de circunferencia a tanque vaco 71
4.4.1.3. Correccin por elevacin de cinta 72
4.4.1.3.1. Para Juntas Soldadas a Tope 72
4.4.1.3.2. Juntas Traslapadas 72
4.4.1.4. Correccin de circunferencia por espesor de placa 73
4.4.1.5. Incremento de volumen por anillo o referencia definida 73
4.4.1.5.1. Correccin por cabezal liquido 73
4.4.1.5.2. Incremento por cabezal liquido arriba de cada anillo 73
4.4.1.6. Correccin por inclinacin 74
4.4.1.7. Correccin de volumen por temperatura 74
4.4.1.8. Reducciones e Incrementos del volumen muerto 75
viii
4.4.1.8.1. Volumen muerto por accesorios 75
4.4.1.8.2. Volumen muerto por fondo 75
4.4.1.8.3. Volumen muerto por techo flotante 76
4.5. CALIBRACIN DE TANQUES HORIZONTALES 77
4.5.1. PROCEDIMIENTO NORMA API 2551 77
4.5.1.1. Permetro del cilindro principal 78
4.5.1.1.1. Para Juntas Soldadas a Tope 78
4.5.1.1.2. Para Juntas Traslapadas 78
4.5.1.2. Factor de Correccin por Presin de Trabajo 79
4.5.1.3. Funciones para el incremento del permetro del cilindro debido a
la presin de trabajo 79
4.5.1.4. Correccin por elevacin de cinta 81
4.5.1.4.1. Para Juntas Soldadas a Tope 81
4.5.1.4.2. Juntas Traslapadas 81
4.5.1.4.3. Circunferencia corregida por elevacin de cinta 82
4.5.1.5. Permetro del cilindro principal corregido 82
4.5.1.6. Dimetro interno del cilindro principal 82
4.5.1.7. Dimetro interno de la parte cilndrica de las cabezas 83
4.5.1.7.1. Para Juntas Soldadas a Tope 83
4.5.1.7.2. Para Juntas Traslapadas 83
4.5.1.8. Longitud del cilindro principal 83
4.5.1.9. Volumen total del cilindro 85
4.5.1.10. Volumen de las cabezas 85
4.5.1.10.1. Cabeza esfrica 85
4.5.1.10.2. Cabeza semielptica 2:1 85
4.5.1.10.3. Cabeza torriesfrica 85
4.5.1.11. Volumen del tanque horizontal 87
4.5.1.12. Correccin del volumen por inclinacin 87
4.5.1.13. Correccin de volumen por temperatura 88
4.5.2. VOLUMENES PARCIALES PROCEDIMIENTO NORMA
API 2551 90
4.5.3. DETERMINACIN DE UN ALGORITMO MATEMTICO PARA
VOLUMENES PARCIALES 92
4.5.3.1. Volumen del cilindro en funcin de un incremento y 92
ix
4.5.3.1.1. Variacin del rea de la circunferencia en funcin del
incremento y 92
4.5.3.1.2. Volumen del cilindro principal incluida la parte cilndrica de las
cabezas 93
4.5.3.2. Volumen de las cabezas en funcin de un incremento y 94
4.5.3.2.1. Cabezas esfricas 94
4.5.1.2.1. Cabezas semielpticas 95
4.5.1.2.2. Cabezas torriesfricas 96
4.5.3.3. Volumen terico total del tanque en funcin del incremento y 96
4.5.3.4. Factor de correccin del volumen 97
4.5.4. VALIDACIN DEL ALGORITMO MATEMTICO 97
4.6. CALIBRACIN DE TANQUES ESFRICOS 99
4.6.1. PROCEDIMIENTO NORMA API 2552 99
4.6.1.1. Correccin de la circunferencia Horizontal C1 99
4.6.1.2. Clculo de las circunferencias internas 99
4.6.1.3. Clculo del volumen total del tanque 100
4.6.1.4. Clculo del dimetro interno 100
4.6.1.5. Correccin del volumen por la temperatura de trabajo 100
4.6.2. VOLMENES PARCIALES PROCEDIMIENTO NORMA API 2552
102
4.6.3. DETERMINACIN DE UN ALGORITMO MATEMTICO PARA
VOLUMENES PARCIALES 103
4.6.3.1. Volumen del tanque en funcin de un incremento y.- 103
4.6.3.2. Factor de correccin del volumen 104
4.6.4. VALIDACIN DEL ALGORITMO MATEMTICO 105
CAPTULO 5 107
DISEO DEL SOFTWARE 107
5.1 INTRODUCCION 107
5.2 DEFINICION DE ELEMENTOS DE ENTRADA 108
5.2.1 PANTALLA PRINCIPAL 108
5.2.2 TANQUES VERTICALES 109
5.2.3 TANQUES HORIZONTALES 111
5.2.4 TANQUES ESFERICOS 113
5.3 DEFINICION DE ELEMENTOS DE SALIDA 114
x
5.3.1 TANQUES VERTICALES 114
5.3.2 TANQUES HORIZONTALES 116
5.3.3 TANQUES ESFRICOS 118
5.4 FLUJOGRAMAS PARA EL DISEO DEL SOFTWARE 119
5.4.1 PANTALLA PRINCIPAL 119
5.4.2 TANQUES VERTICALES 120
5.4.3 TANQUES HORIZONTALES 121
5.4.4 TANQUES ESFRICOS 122
5.5 PROGRAMACIN VISUAL 122
5.5.1 PANTALLA PRINCIPAL 123
5.5.2 TANQUES VERTICALES 124
5.5.3 TANQUES HORIZONTALES 126
5.5.4 TANQUES ESFRICOS 129
5.6 CODIFICACIN DEL PROGRAMA 130
5.6.1 PANTALLA PRINCIPAL 130
5.6.2 TANQUES VERTICALES 133
5.6.3 TANQUES HORIZONTALES 156
5.6.4 TANQUES ESFRICOS 180
CAPTULO 6 187
EVALUACIN DEL SOFTWARE 187
6.1. EVALUACIN DE RESULTADOS PARA TANQUES VERTICALES 187
6.1.1. CORRECCIONES PROCEDIMIENTO API MPMS 2-A 187
6.1.2. VOLUMEN MUERTO 190
6.1.3. TABLA DE CALIBRACIN 194
6.2. EVALUACIN DE RESULTADOS PARA TANQUES HORIZONTALES
197
6.2.1. CORRECCIONES PROCEDIMIENTO API 2551 197
6.2.2. VOLUMEN MUERTO 198
6.2.3. TABLA DE CALIBRACIN 199
6.3. EVALUACIN DE RESULTADOS PARA TANQUES ESFRICOS 201
6.3.1. CORRECCIONES PROCEDIMIENTO API 2555 201
6.3.2. Tabla de calibracin 202
CAPITULO 7 205
ANALISIS ECONMICO FINANCIERO 205
xi
7.1. CONCEPTOS GENERALES 205
7.1.1. FLUJO DE CAJA 205
7.1.2. VALOR ACTUAL NETO (VAN) 205
7.1.3. TASA INTERNA DE RETORNO (TIR) 206
7.1.4. COSTO-BENEFICIO (B/C) 207
7.2. ANLISIS DE INVERSIN Y GASTOS OPERATIVOS 208
7.2.1. INVERSIN DEL PROYECTO 208
7.2.2. GASTOS OPERATIVOS 209
7.3. ANALISIS DE INGRESOS Y EGRESOS DE LA EMPRESA 209
7.3.1. INGRESOS Y EGRESOS DE LA EMPRESA SIN LA
IMPLEMENTACIN DEL SOFTWARE 209
7.3.2. INGRESOS Y EGRESOS DE LA EMPRESA CON LA
IMPLEMENTACIN DEL SOFTWARE 212
7.3.3. FLUJO DE CAJA DIFERENCIAL 215
7.4. ANALISIS DE INDICADORES FINANCIEROS 216
7.4.1. RESULTADOS 217
CAPITULO 8 218
CONCLUSIONES Y RECOMENDACIONES 218
8.1. CONCLUSIONES 218
8.2. RECOMENDACIONES 220
BIBLIOGRAFA 221
INDICE DE TABLAS
xii
Tabla 3.5. Caractersticas del Flexmetro 37
Tabla 3.6. Caractersticas de la Regla de Ingeniero 37
Tabla 3.7. Caractersticas del Medidor de Espesores 38
Tabla 3.8. Caractersticas de la Estacin Total 39
Tabla 3.9. Caractersticas del Nivel de Burbuja 39
Tabla 4.1. Nmero de mnimo de estaciones 69
Tabla 4.2. Coeficiente de expansin lineal 88
Tabla 4.3. Calibracin procedimiento API 2551 97
Tabla 4.4. Calibracin mediante el algoritmo matemtico 98
Tabla 4.5. Comparacin de las tablas de calibracin 98
Tabla 4.6. Comparacin de las tablas de calibracin Error! Marcador no
definido.
Tabla 5.1. Elementos de entrada Pantalla Principal 108
Tabla 5.2. Elementos de entrada Tanques Verticales 109
Tabla 5.3. Elementos de entrada Tanques Horizontales 111
Tabla 5.4. Elementos de entrada Tanques Esfricos 113
Tabla 5.5. Elementos de salida Tanques Verticales 115
Tabla 5.6. Elementos de salida Tanques Horizontales 116
Tabla 5.7. Elementos de salida Tanques Esfricos 118
Tabla 6.1. Comparacin Correcciones T. Verticales 187
Tabla 6.2. Comparacin Accesorios S.I. T. Verticales 190
Tabla 6.3. Comparacin Accesorios S.A. T. Verticales 192
Tabla 6.4. Comparacin V. Fondo - S.I. 193
Tabla 6.5. Comparacin V. Fondo - S.A. 193
Tabla 6.6. Comparacin V. Techo - S.I. 193
Tabla 6.7. Comparacin V. Techo - S.A. 194
Tabla 6.8 Comparacin Volumen Total S.I. T. Verticales 195
Tabla 6.9 Comparacin Volumen Total S.A. T. Verticales 196
Tabla 6.10 Comparacin Correcciones T. Horizontales 197
Tabla 6.11 Comparacin Incrementos Volumen Accesorios- SI 198
Tabla 6.12 Comparacin Incrementos Volumen Accesorios- SA 199
Tabla 6.13 Comparacin Volumen Total S.I. T. Horizontales 200
Tabla 6.14 Comparacin Volumen Total S.A. T. Horizontales 200
Tabla 6.15 Comparacin Correcciones T. Esfricos 202
xiii
Tabla 6.16 Comparacin Volumen Total S.I. T. Esfricos 202
Tabla 6.17 Comparacin Volumen Total S.A. T. Esfricos 203
Tabla 7.1 Interpretacin del Valor actual neto 206
Tabla 7.2 Interpretacin de la Taza interna de retorno 207
Tabla 7.3 Interpretacin del Costo-Beneficio 207
Tabla 7.3 Interpretacin del Costo-Beneficio (continuacin) 208
Tabla 7.4 Inversin Total 208
Tabla 7.5 Gastos de Operacin 209
Tabla 7.6 Ingreso Anual 210
Tabla 7.7 Egreso Anual 211
Tabla 7.8 Ingreso Anual 213
Tabla 7.9 Egreso Anual 214
Tabla 7.10 Flujo de Caja (Caso Actual) 215
Tabla 7.11Flujo de Caja (Caso Propuesto) 215
Tabla 7.12 Flujo de Caja Diferencial 216
Tabla 7.13 Flujo neto de fondos 217
Tabla 7.14 Rentabilidad 217
INDICE DE FIGURAS
xiv
Figura 3.5. Localizacin de las Medidas para Tanques Verticales Soldados 48
Figura 3.6. Localizacin de las Medidas para Tanques Verticales Remachados
49
Figura 3.7. Localizacin de las Medidas para Tanques Verticales Atornillados 50
Figura 3.8. Forma de Registro de Accesorios 53
Figura 3.9. Tanques soldados a Tope 56
Figura 3.10. Tanques traslapados y soldados 56
Figura 3.11. Tanques traslapados y remachados 57
Figura 3.12. Lminas longitudinales 57
Figura 3.13. Principales Medidas de las Cabezas. 58
Figura 3.14. Circunferencias Tanques Esfricos 59
Figura 4.1. Mtodos de aforo para tanques de almacenamiento 64
Figura 4.2. Mtodo geomtrico externo por lnea de referencia ptica 68
Figura 4.3. Aforo por triangulacin externa 69
Figura 4.4. Medidas requeridas para la calibracin del tanque 77
Figura 4.5. Medidas requeridas para la calibracin del tanque 77
Figura 4.6. Incremento del permetro del cilindro por la presin de trabajo 81
Figura 4.7. Medidas principales de las cabezas 84
Figura 4.8. Medidas del cilindro principal 84
Figura 4.9. Medidas principales de la cabeza torriesfrica 86
Figura 4.10. Correccin porcentual del Volumen por inclinacin 88
Figura 4.11. Factor de correccin del volumen por temperatura 90
Figura 4.12. Grfica de la tabla del Anexo 2 91
Figura 4.13. Volumen de un cilindro en funcin de y 94
Figura 4.14. Volumen para cabezas esfricas en funcin de y 95
Figura 4.15. Volumen para cabezas semielpticas en funcin de y 96
Figura 4.14. Medidas de circunferencia C1 99
Figura 4.15. Factor de correccin del volumen 102
Figura 4.16. Volumen de la esfera en funcin de y 104
Figura 5.1. Flujo grama Pantalla principal 120
Figura 5.2. Flujo grama Tanques Verticales 121
Figura 5.3. Flujo grama Tanques Horizontales 122
Figura 5.4. Flujo grama Tanques Esfricos 122
Figura 5.5. Pantalla Principal del software 124
xv
Figura 5.6. Mdulo Tanques Verticales Datos Generales 125
Figura 5.7. Mdulo Tanques Verticales Volumen Muerto 125
Figura 5.8. Mdulo Tanques Verticales Clculos 126
Figura 5.9. Mdulo Tanques Horizontales Tipo de tanque 127
Figura 5.10. Mdulo Tanques Horizontales Datos Generales 127
Figura 5.11. Mdulo Tanques Horizontales Clculos y Correcciones 128
Figura 5.12. Mdulo Tanques Horizontales Tabla de calibracin SI 128
Figura 5.13. Mdulo Tanques Esfricos Datos generales 129
Figura 5.14. Mdulo Tanques Esfricos Correcciones 130
INDICE DE ANEXOS
xvi
NOMENCLATURA TANQUES VERTICALES
xvii
NOMENCLATURA TANQUES HORIZONTALES
xviii
R relacin entre el nivel del liquido en el tanque con el dimetro del tanque
t espesor o proyeccin del cordn de soldadura o junta a traslape (in)
Ta temperatura del ambiente (F).
Tl temperatura del liquido de servicio (F).
Ts temperatura de la placa del tanque (F).
U factor de comparacin de los volmenes
V(M) volumen del tanque para cada incremento (gal)
Vc volumen del cilindro principal (ft3)
Vci Volumen corregido por inclinacin en cada incremento (ft3)
Vct volumen del tanque corregido por temperatura en cada incremento (ft3)
Vh volumen de la cabeza (ft3)
Vi Volumen del tanque en cada incrmento (ft3)
VT volumen obtenido mediante la norma API 2551 (ft3)
VT1 volumen obtenido mediante modelos matemticos (ft3)
w ancho del cordn de soldadura (in)
y incremento (ft)
incremento en el permetro del cilindro (ft)
xix
e2 espesor del cuerpo del tanque medido en el primer punto (in)
e3 espesor del cuerpo del tanque medido en el primer punto (in)
G incremento procedimiento API 2552 (in)
H altura desde el ecuador hasta la circunferencia C1 (in)
Ko factor de correccin del volumen (%)
m distancia desde la lnea central de la esfera (ft)
R relacin entre el nivel del liquido y el dimetro tanque
Ta temperatura del ambiente (F).
Tl temperatura del liquido de servicio (F).
Ts temperatura de la placa del tanque (F).
U factor de correccin
V volumen total de la esfera (ft3)
Vct volumen del tanque corregido por temperatura en cada incremento (ft3)
VT volumen obtenido mediante la norma API 2552
VT1 volumen obtenido mediante procedimientos matemticos
Coeficiente de expansin lineal
xx
RESUMEN
xxi
para determinar las diferentes correcciones que se realizan a los tanques,
adems de la utilizacin de las hojas de Excel en donde se detalla las
afectaciones causadas por los diferentes tipos de obras muertas en el volumen
total de tanque y sus respectivas tablas de calibracin.
Una vez desarrolladas las memorias de clculo y las hojas de Excel basadas
en los cdigos que corresponden a cada tipo de tanque se procedi a realizar
el diseo para el desarrollo del software de calibracin lo que conlleva a la
utilizacin de un software de programacin denominado C# de Visual que nos
facilite el proceso del diseo visual y la estructura lgica mediante el lenguaje
de programacin. Para su diseo se tomo en cuenta los siguientes aspectos:
xxii
VAN: El valor del proyecto en cinco aos y con una tasa de descuento del 10%,
y llevados en valor presente nos da como resultado veinte seis mil novecientos
veinte cinco dlares americanos, indicando que el proyecto es viable.
xxiii
CAPTULO 1
GENERALIDADES
1.1. INTRODUCCION
1
(Tanques esfricos), que utilizndolas de forma adecuada permite obtener
excelentes resultados.
1.2. ANTECEDENTES
2
comercializacin de combustibles, medio ambiente, diseo y construccin que
durante todos sus aos de servicio a realizado un sin nmero de trabajos para
diversas empresas nacionales siendo sus principales clientes empresas como:
Ministerio de Energa y Minas del Ecuador, Comercializadora PETROLRIOS,
Comercializadora de combustibles MASGAS, Plantas envasadoras de GLP,
AGIP, MENDOGAS, LOJAGAS, AUSTROGAS, CONGAS, EDC DEL
ECUADOR, PETROANDINO, PETROCONDOR, REPSOL YPF, TEXA, entre
otras.
3
estudiantes que desarrollan el presente proyecto formaron parte del grupo de
trabajo y realizaron todas las actividades requeridas para la toma de datos.
2009 PINDO
Capacidad: 24700 BBL
Propietario: CONSORCIO
PETROSUD PETRORIVA
Tanque: TK-SKIMMER-SPT 01
Ubicacin: CAMPAMENTO
03 Marzo PUCUNA
2010
Capacidad: 500 BBL
Propietario: SUELOPETROL
ECUADOR
Tanque: TK-SKIMMER-SPT 01
Ubicacin: CAMPAMENTO
04 Marzo PUCUNA
2010 Capacidad: 500 BBL
Propietario: SUELOPETROL
ECUADOR
4
Gracias a la oportunidad brindada por la empresa PETROAFIN S.A, los
estudiantes egresados de la carrera de ingeniera mecnica, tuvieron la
oportunidad de realizar la calibracin de estos tanques utilizando los equipos
necesarios para la obtencin de los datos, para luego mediante la utilizacin de
las hojas de clculo y los procedimientos indicados en las normas realizar el
anlisis de todos los datos y posteriormente la obtencin de las tablas de
calibracin que sern revisadas por los ingenieros de la empresa para su
respectiva aprobacin.
Las hojas de clculo son usadas para casos independientes, es decir que para
realizar el aforo de un tanque se debe crear una nueva hoja de clculo,
repitiendo el proceso y realizando cambios en partes especficas dependiendo
de las caractersticas del tanque al que se realizara el aforo. Es por esta razn
que se ha decido realizar un software en el cual se pueda ingresar las
caractersticas del tanque y los parmetros de afectacin como presin y
5
temperatura que dificultan el proceso de aforo generando una tabla de
calibracin volumtrica de alta precisin y confiabilidad, disminuyendo de esta
forma el tiempo establecido para la realizacin de esta actividad y las
posibilidades de presentar una tabla de calibracin errnea, adems de ampliar
el alcance de sus servicios para tanques verticales, horizontales y esfricos de
gran capacidad.
Una medicin incorrecta dar como resultado una tabla de aforo errnea, la
misma que permanecer en uso hasta que requiera una nueva re-calibracin,
como resultado a estas medidas con error, se tendr problemas de contabilidad
en el volumen y descontento en las partes que intervienen. Los problemas que
se originan de estos errores son muy difciles, a veces, imposibles de resolver
sin que pierda una de las partes involucradas.
6
volumtrica de tanques, y adems de buscar soluciones para casos muy
comunes que se presentan en el campo. Por lo cual el control de estos
procesos es un tema que requiere de toda nuestra atencin ya que realizando
bajo las normas establecidas y los conocimientos adquiridos a lo largo de la
carrera se obtendrn excelentes beneficios tanto para la empresa como para
sus clientes.
1.6. OBJETIVOS
1.6.1. GENERAL
1.6.2. ESPECIFICO
7
Presentar tablas de calibracin volumtrica de tanques verticales,
horizontales o esfricos detalladas y estandarizadas.
Desarrollar un Manual de Usuario para el manejo del Software.
Realizar un anlisis econmico financiero para determinar la relacin del
costo/beneficio que genera la realizacin del proyecto.
1.7. ALCANCE
8
CAPTULO 2
MARCO CONTEXTUAL
2.1. HIDROCARBUROS
2.1.1. INTRODUCCION
2.1.2. CLASIFICACIN
1
http://es.wikipedia.org/wiki/Hidrocarburo
9
2.1.2.1.1. Hidrocarburos saturados.-
Son los alcanos o parafinas, que no tienen enlaces dobles, triples, ni
aromticos, slo mltiples enlaces individuales, y de cadena.
2.1.2.2.1. Cicloalcnicos.-
Tienen cadenas cerradas de 3, 4, 5, 6, 7 y 8 molculas de carbono saturados o
no saturados.
>40 Condensado
30 39.9 Liviano
22 29.9 Mediano
10 21.9 Pesado
10
La ecuacin para calcular el Grado API es la siguiente:
.
API
131.5
SG
Ecuacin 2.1
f
SG
Ecuacin 2.2
2.1.3. PROPIEDADES
Tensin de vapor
Propiedades criticas
Densidad
Propiedades trmicas
Viscosidad
Punto de congelamiento
Solubilidad
Acidez
Punto de Inflamacin
Nmero de Octano y Cetano
2
http://energia3.mecon.gov.ar/contenidos/verpagina.php?idpagina=446
11
2.1.3.1. Tensin de vapor
2.1.3.3. Densidad
Los americanos para medir la densidad utilizan el grado A.P.I., definido como
una funcin hiperblica de la densidad.
12
Al agua (en donde se inicia la escala de valores de la densidad expresada en
grados API), le pertenece un valor de 10 API.
13
los gases perfectos, esto se expresa como en la ecuacin 2.3, si el proceso es
reversible.
PV Cte. Ecuacin 2.3
C$
C%
Ecuacin 2.4
14
los humos a 15C, se alcanza la potencia calorfica superior P. La diferencia
entre estos valores significa el calor de condensacin del agua a 15C, que es:
588Kcal por Kg de agua, o bien 473 Kcal por m3de vapor de agua a 0C, o447
Kcal/m3de vapor de agua a 15C. Usualmente se considera el estado de
referencia a 15C (60F) con preferencia a 0C, por concordar sensiblemente
con la temperatura ambiente.
Las fracciones que se obtienen en el procesamiento del crudo estn dadas por
el rango de ebullicin y la presin de vapor del producto. Fracciones con
temperaturas de ebullicin por debajo de los 200C, se usan como
combustibles de motores a ignicin por bujas y se encuentran agrupadas en
las denominadas naftas.
15
motivos de seguridad; los de peso molecular superior producen llamas
humeantes, mientras que los hidrocarburos de altas viscosidades imposibilitan
un flujo regular a travs de las mechas de los artefactos.
2.1.3.5. Viscosidad
16
La magnitud de la viscosidad depende de la conformacin qumica del crudo,
de manera que a mayor proporcin de fracciones ligeras, menor es la
viscosidad. Este valor depende adems de la temperatura ambiente, de forma
que cuanto menor resulta sta, ms viscoso es un crudo.
V/0120/343 A6027894
Viscosidad Cinematica
D;<0/343
Ecuacin 2.5
17
En los parafnicos; se cumple en las cadenas normales mientras las cadenas
isomeradas poseen puntos de congelamiento ms bajos. Por otro lado, los
parafnicos isomerados de alta simetra tienen puntos de congelamiento
superiores para el mismo nmero de tomos de carbono en la molcula. De
manera similar ocurre con los aromticos.
2.1.3.7. Solubilidad
Por otro lado, los hidrocarburos de elevado peso molecular con los de inferior
peso molecular son miscibles en cierto grado; determinando que la solucin se
sature provocando la precipitacin del componente de mayor peso.
2.1.3.8. Acidez
Este parmetro clasifica los crudos en agrios y dulces en funcin del contenido
de azufre.
Los crudos que poseen contenidos de azufre superiores al 1%, son llamados
agrios (son corrosivos), mientras que los que se encuentran por debajo de
dicho valor, dulces.
18
El azufre debe ser eliminado de los productos destilados no slo por los
problemas de contaminacin atmosfrica que genera, sino porque el azufre es
un veneno de los catalizadores utilizados en la refinacin, disminuye la calidad
de las naftas y se transforma en anhdrido sulfuroso por combustin, que en
presencia de agua produce cido sulfrico muy diluido corroe fuertemente los
tubos de escape y las chimeneas.
19
Tabla 2.2 Limites de explosividad y temperatura de auto inflamacin
Fuente: http://energia3.mecon.gov.ar
20
2.1.3.10. Nmero de octano
21
2.2. TANQUES DE ALMACENAMIENTO DE HIDROCARBUROS
2.2.1. INTRODUCCION
Transporte
Tratamiento Refinacin
TANQUES
Reservas Distribucin
Inventarios
3
www.monografias.com/trabajos37/almacenamiento-hidrocarburos/almacenamiento-
hidrocarburos.shtml
22
El almacenamiento constituye un elemento de sumo valor en la explotacin de
los servicios de hidrocarburos ya que:
Por su construccin:
Vertical: Sin techo, techo fijo y techo flotante.
Horizontal: a presin atmosfrica y a presin mayor a la atmosfrica
(recipientes).
Esferas
Por su uso:
Produccin (refinera)
Yacimiento
Terminal de despacho
Reserva.
Producto:
Crudo
Naftas
LPG, etc.
23
2.2.2.1. Tanques Verticales
24
almacenaje. Pueden ser clasificados de acuerdo al tipo de techo y tipo de fondo
en:
Venteo
Techo fijo cnico
Espacio de vapor
Lquido
25
2.2.2.1.2. Techo Flotante.-
Se emplea para almacenar productos con alto contenido de voltiles como son:
alcohol, gasolinas y combustibles en general.
Este tipo de techo fue desarrollado para reducir o anular la cmara de aire, o
espacio libre entre el espejo del lquido y el techo, adems de proporcionar un
medio aislante para la superficie del lquido, reducir la velocidad de
transferencia de calor al producto almacenado durante los periodos en que la
temperatura ambiental es alta, evitando as la formacin de gases (su
evaporacin), y consecuentemente, la contaminacin del ambiente y, al mismo
tiempo se reducen los riesgos al almacenar productos inflamables.
Cubierta interna
Boya
Lquido
26
Tabla 2.3 Tipos de Fondo
TIPOS DE FONDO
Fondo plano
Fondo esfrico
Fondo hemisfrico
Fondo semielptico
Fondo cnico
27
2.2.2.2. Tanques Horizontales
4
www.scribd.com/doc/17247549/diseno
www.scribd.com/doc/17247549/diseno-y-calculo-de-recipientes-a-presion
28
2.2.2.2.1. Cabezas Planas.-
Se utilizan para tanques sujetos a presin atmosfrica, generalmente, aunque
en algunos casos se usan tambin en recipientes a presin. Su costo entre las
cabezas de los tanques es el ms bajo.
2.2.2.2.2. Toriesfrica:
Son las de mayor aceptacin en la industria, debido a su bajo costo y a que
soportan grandes presiones manomtricas, su caracterstica principal es que el
radio (R) del abombado es aproximadamente igual al dimetro interno (D) y el
radio interno del nudillo (r) no debe ser menor a una decima del dimetro
interno (D).
2.2.2.2.3. Semielptica.-
Son empleadas cuando el espesor calculado de una tapa toriesfrica es
relativamente alto, ya que las tapas semielpticas soportan mayores presiones
que las toriesfricas. Su silueta describe una elipse relacin 2:1. Su costo es
alto.
2.2.2.2.4. Semiesfrica:
Utilizada exclusivamente para soportar presiones crticas, como su nombre lo
indica, si silueta describe una media circunferencia perfecta, su costo es alto y
no hay lmite dimensional para su fabricacin.
TIPOS DE CABEZAS
PLANA SEMIELIPTICA
29
TIPOS DE CABEZAS (continuacin)
SEMIESFERICA TORIESFERICA
Se usan para almacenar lquidos bajo cierta presin como fertilizantes, gas
licuado natural en estado lquido o criognico, nitrgeno lquido, etc.
30
Figura 2.8 Fotografa de un Tanque Esfrico
31
CAPTULO 3
3.1. MEDICIONES
3.1.1. DEFINICIN
El proceso de medir se lo debe hacer con mucho cuidado para evitar alterar el
sistema con el que se est trabajando adems de que se debe tomar en cuenta
las imperfecciones del instrumental o limitaciones del equipo y los errores que
estos generan a fin de obtener excelentes resultados.
Todas las mediciones y los datos tomados en el sitio del tanque deben ser
verificados y de inmediato, de forma legible registrados en los formularios de
preferencia que sea realizado por un solo individuo.
32
Todas las medidas deben ser tomadas sin interrupcin y, preferentemente, en
el mismo da de la calibracin con el nivel de lquido residual esttico. Si los
trabajos de medicin son interrumpidos por circunstancias tales como mal
tiempo y suspensin de trabajo por alguna emergencia ocurrida en la planta los
trabajos pueden continuar en una fecha posterior, sin repetir el trabajo anterior.
Para el caso en el cual el tanque a ser calibrado tenga una variacin del lquido
se debe repetir el proceso de medicin.
3.1.3. SEGURIDAD
Adems, otra persona debe estar de guardia en la entrada del tanque el tiempo
que dure la toma de datos, y sonar una alarma si se produce una emergencia.
Se debe usar ropa de proteccin y equipo adecuado tales como: Overol, casco,
guantes, gafas, zapatos de seguridad y arns.
33
Durante el aforo deben observarse todas las reglas de seguridad y de riesgo
contra incendios indicados en cada planta en donde se realiza el trabajo de
medicin, necesarios para la prevencin de accidentes de cualquier tipo.
3.1.4. TOLERANCIAS
34
3.1.5. EQUIPOS DE MEDICIN
3.1.5.1. Plomada
Longitud 6 in.
Ancho 1 in.
Graduada en
Otra descripcin
mm y cm
Elaboracin: Alberto Nez, Santiago Hidalgo
35
Tabla 3.3. Caractersticas de la Cinta de Acero
Caractersticas de la cinta de acero
Ancho cinta 10 mm.
Longitud cinta 30 m
Graduada en mm,
Otra descripcin
cm y m.
Longitud cinta 50 m
Graduada en
Otra descripcin
mm, cm y m.
3.1.5.4. Flexmetro.-
36
Tabla 3.5. Caractersticas del Flexmetro
Longitud 8m
Graduada en cm
Otra descripcin
y en pulgadas.
Las reglas de ingeniero se las utiliza para medir en espacios muy reducidos y
accesorios pequeos.
Material Aluminio
Ancho 32 mm.
Longitud 1 m.
37
Tabla 3.7. Caractersticas del Medidor de Espesores
38
Tabla 3.8. Caractersticas de la Estacin Total
Precisin 0.001 mm
Este instrumento nos ayuda a determinar si la base del tanque presenta una
inclinacin bastante pronunciada que pueda afectar el proceso de aforo.
Longitud 9 pulgadas
39
Instrumentos de limpieza tales como esptulas, cepillo de cerdas duras,
franelas que ayuden a la eliminacin del xido y la suciedad en los lugres
donde se realizan las mediciones.
Antes de realizar las mediciones, el tanque debi haber sido llenado al menos
una vez en su ubicacin actual y haber realizado la prueba hidrosttica por un
periodo de 24 horas aproximadamente.
40
al momento de realizar la medicin los mismos que deben ser revisados y
registrados.
41
3.1.6.3. Medicin de las Longitudes Verticales
La altura del tanque es la distancia vertical entre la parte inferior del ngulo
inferior (o la parte superior de la placa de piso) y la parte superior del ngulo
superior del ltimo anillo, y debe ser medida en un punto cercano al punto de
referencia de aforo (boca de aforo).
La altura de la escotilla se mide desde la parte superior del ngulo superior del
ltimo anillo del tanque hasta el punto de referencia de aforo.
Luego de medir esas tres alturas se debe realizar una comparacin entre la
altura referencial de aforo con la suma de la altura del tanque ms la altura de
la escotilla, con el fin de investigar la posible existencia de un fondo falso. Las
mediciones y clculos correspondientes se adjuntarn a, y formar parte de, el
registro de la medicin.
42
con las mediciones de las alturas del tanque utilizando un teodolito, una
plomada ptica, o una plomada.
43
Figura 3.2. Medidas de Tanques Verticales - Atornillado
44
Figura 3.3. Medidas de Tanques Verticales - Remachado
La altura interna efectiva del tanque es la altura mxima de llenado del tanque
(ver Figura 3.4.). Esto es de inters primordial para los clculos de las tablas de
capacidad, estableciendo los lmites superior e inferior de las variables de
calibracin que se proporcionan en la tabla de capacidad.
45
El lmite superior mximo de la tabla de la capacidad puede ser uno de los dos
puntos siguientes:
46
elevacin de la conexin citando su presencia y que establece las condiciones
en que esa parte de la tabla de capacidad se puede utilizar.
Se mide y registran las alturas de cada anillo (ver Figura 3.5., 3.6. y 3.7.).
47
Cuando los anillos son traslapados horizontalmente, el traslape ser tomado en
cuenta de modo que la altura interior del anillo puede ser desarrollado por los
clculos.
48
Figura 3.6. Localizacin de las Medidas para Tanques Verticales
Remachados
49
Figura 3.7. Localizacin de las Medidas para Tanques Verticales
Atornillados
50
3.1.6.4. Medicin de las Circunferencias
Todos los puntos en los que las mediciones de circunferencia se leen deben
estar ubicados al menos 2 pies (o 600 milmetros) de una junta vertical.
Despus de que se realice una medicin de la circunferencia, se reduce la
tensin lo suficiente para permitir que la cinta se desplace. Antes de la
siguiente lectura, la posicin de la cinta debe ser verificada. A continuacin,
debe ser devuelto a la posicin y la tensin necesaria; las dos lecturas
sucesivas deben tomarse dentro de las tolerancias especificadas segn la tabla
3.1. El promedio de las dos lecturas, deben registrarse como la medicin de
circunferencia en ese punto.
51
El tipo y las caractersticas de las juntas verticales deben ser determinados por
un examen minucioso a fin de establecer el procedimiento de medicin y
equipos necesarios en el caso de juntas a tope o traslapados.
Los volmenes muertos deben medirse, si es posible, dentro del tanque. Las
dimensiones indicadas en los planos de construccin o las dimensiones,
52
proporcionado por el propietario del tanque pueden ser aceptadas si es
imposible realizar las medidas reales.
Las mediciones de los volmenes muertos deben mostrar los niveles ms bajos
y ms altos, medidas desde el fondo del tanque junto a la pared del tanque, en
los cuales los accesorios afectan la capacidad del tanque (ver figura 3.8.).
53
3.1.7. MEDICIONES EN TANQUES HORIZONTALES
Las medidas deben ser tomadas solo despus de que el tanque haya llegado a
la mxima presin de trabajo o nivel de lquido.
Se debe hacer como mnimo una medicin por cada anillo y todas las
mediciones de espesores deben ser debidamente identificadas y registradas en
una hoja de datos que forma parte del registro de mediciones.
54
Se debe tener cuidado para evitar medidas de espesor de la chapa en los
lugares donde los bordes han sido distorsionados por la soldadura o masilla.
Para determinar la longitud total del cilindro se debe sumar la longitud medida
del cilindro principal ms la longitud de la parte cilndrica de las cabezas.
55
equivale a la fuerza que normalmente una persona aplica al momento de
realizar la medicin.
56
Figura 3.11. Tanques traslapados y remachados
57
3.1.7.5. Medicin de las Cabezas
Identificar el tipo de cabeza del tanque en la que sus contornos pueden ser
curvas, elipses y segmentos esfricos.
Las dificultades prcticas que presentan las cintas al momento de medir las
grandes circunferencias sobre la esfera son los deslizamientos de la misma. Es
por eso que para facilitar la medicin del crculo horizontal ms largo, el
constructor debe soldar varillas cortas perpendiculares al tanque de
almacenamiento en el punto donde el depsito es tangente a una lnea vertical,
y separadas a no ms de 10 pies de distancia para el apoyo de la cinta en ese
lugar.
58
Tres grandes crculos representativos son escogidos para la medicin, uno en
el ecuador horizontal y dos pasando verticalmente a travs de los polos en
ngulos rectos unos con otros (ver figura 3.14.). El volumen total se calcula
sobre la base de estas tres mediciones. Los volmenes parciales estn
distribuidos sobre la medida de la altura interna por una formula o en una tabla
basada en el volumen parcial en funcin de la profundidad de una verdadera
esfera.
59
se registre la circunferencia medida, C, y la altura, H, por encima del ecuador
en la que se midi C.
Una vez conocido todos los parmetros que deben ser medidos, se deber
completar los datos descriptivos que deben figurar en el Acta de Registro de
Medidas del Tanque que se utiliza. Las Actas de registro propuestos por
PETROAFIN S.A. se vern en el Anexo 1.
60
Cualquier boceto o anotacin suplementaria debe estar completamente
identificada, con fecha y firmados, tambin se debe adjuntar en el acta un
detalle los siguientes puntos:
61
CAPTULO 4
4.1. DEFINICIN
4.2. IMPORTANCIA
62
Como resulta tan importante el mtodo y el grado de exactitud empleados al
tomar las dimensiones de un tanque, deben ser presenciadas por todas las
partes interesadas ya que un pequeo error en las mediciones conlleva a
serias discrepancias en el registro de calibracin.
5
www.ecopetrol.com.co/documentos/41020_CAPITULO_2_CALIBRACION_TANQUES.pdf
63
Las tablas de aforo o de calibracin pueden ser elaboradas aplicando varios
mtodos. Para decidir cual se aplicar se tomar en cuenta el tipo y tamao del
tanque, el tiempo, personal y equipo disponible. Entre los principales mtodos
tradicionales para realizar el aforo de tanques de almacenamiento se tienen los
siguientes Figura 4.1.:
Mtodo Volumtrico
Mtodo Geomtrico:
o Cinta Mtrica
o Lnea de Referencia
o Triangulacin Externa e Interna
Mtodo Gravimtrico
METODOS DE
CALIBRACION
Cinta Mtrica
Lnea de Mtodo de
Referencia Triangulacin
Optica
Mtodo Externo de
Triangulacin
64
4.3.1. MTODO VOLUMTRICO
6
www.sencamer.gob.ve/sencamer/documents/Lab_GV_Tanques.ppt
65
El mtodo de calibracin volumtrico puede hacerse mediante dos
procedimientos:
Por llenado
Por vaciado
Consiste en llenar (o vaciar) por etapas el tanque a calibrar y emplear una cinta
con plomada para medir los niveles de llenado, conformndose una tabla de
volumen contra nivel (Tabla de Aforo). Estas etapas estn en correspondencia
con la capacidad y forma del tanque.
El tanque patrn o serafn deber tener una capacidad de volumen menor que
el del tanque a calibrar con el objetivo de obtener una buena precisin en las
mediciones. Por ejemplo, para calibrar un tanque de 10000 galones se
recomienda utilizar un tanque patrn o serafn de 50 galones. En el caso
especfico de tanques de prueba estacionarios estos debern ser calibrados
mediante mediciones crticas o a travs de un caudalmetro master.
66
Para la calibracin geomtrica se emplean los siguientes mtodos:
Los mtodos geomtricos pueden ser usados en tanques con una capacidad
nominal de alrededor de 50 m3 y ms, que posean forma geomtrica regular y
que no presenten deformaciones.7
7
www.sencamer.gob.ve/sencamer/documents/Lab_GV_Tanques.ppt
67
4.3.2.2. Mtodo Geomtrico Externo por Lnea de Referencia ptica
Este mtodo determina el permetro de las diferentes alturas en las paredes del
tanque. La envoltura del tanque es medida con la ayuda de una regla graduada
guiada por un carrito imantado, con el cual se recorren las paredes del tanque,
y un teodolito fijado hacia el cenit, ubicado a cierta distancia del rango de
medicin, como se muestra en la Figura 4.2.
68
Tabla 4.1. Nmero de mnimo de estaciones
Hasta 50 4
Sobre 300 18
69
4.3.2.4. Mtodo Geomtrico Interno por Triangulacin
8
www.sencamer.gob.ve/sencamer/documents/Lab_GV_Tanques.ppt
70
una serie de correcciones, las cuales intervienen en el mencionado clculo.
Estas correcciones son parte fundamental de la confiabilidad de la medicin. A
continuacin se describen las correcciones que intervienen en el clculo
volumtrico de un tanque medido externamente.
La carga hidrosttica ejerce sobre las paredes del tanque una presin y por lo
tanto la expansin de la circunferencia.
HDCI
cv
k
9
Ecuacin 4.2
W
k 0,00000002849239
K..E
Ecuacin 4.3
71
h = distancia desde la circunferencia de referencia hasta el nivel
mximo de llenado (ft).
C = circunferencia medida correccin de cinta a 60F (ft).
t = espesor de la placa (in).
E = modulo de elasticidad del acero (29,000000 psi)
W = 62.3 lbs/ft3
En el caso de que la cinta no pueda estar en contacto con el cuerpo del tanque
en todos los puntos a lo largo de su trayectoria por las proyecciones de la
pared del tanque, tales como cordones de soldadura o juntas a traslape que
originan una elevacin en la cinta, se debe realizar las correcciones necesarias
con las ecuaciones siguientes:
KDND9DT UDND9 9
cc ? W
3DK VDK 3
Ecuacin 4.4
DND9 9
cc W
VDK KD3
Ecuacin 4.5
72
4.4.1.4. Correccin de circunferencia por espesor de placa.
ct
D9
X
Ecuacin 4.6
GDHDCI
cs k
9
Ecuacin 4.7
73
ZDWDGD3[ DH
v
DED9
Ecuacin 4.8
Segn la norma API 650 Standard, Seccin 7.5.2. la desviacin vertical mxima
considerada desde el fondo hasta la ltima lamina no exceder de 1/200 de la
altura total del tanque.
74
Ts Ts
60F Ecuacin 4.11
AnDT7pT4C
Ts
U
Ecuacin 4.12
Para sacar el incremento de estos accesorios solo hay que dividir el volumen
que ocupa o tiene el accesorio para la altura en la que afecta, y ese incremento
o decremento se le suma o resta al volumen en toda la altura que se encuentra
el accesorio. (Ver Anexo3)
Sin importar el tipo de fondo que tenga el tanque, se debe calcular el volumen
que se encuentra bajo la altura de la platina de aforo (altura 0 en las tablas de
calibracin). Ese volumen corresponde al volumen en la altura 0. (Ver Anexo3)
75
4.4.1.8.3. Volumen muerto por techo flotante.-
Altura critica inferior: altura desde el techo hasta el fondo cuando los
soportes del techo estn en contacto con el fondo.
Altura critica superior: altura que el techo se hunde cuando esta flotando
mas 2 pulgadas.
Peso del techo
Densidad del producto
W9
Vd
qf7DK
Ecuacin 4.13
Una vez obtenido el volumen desplazado por el techo, que ser la cantidad de
fluido que se restara al volumen del tanque; se debe calcular el decremento
que es el volumen que se disminuir a cada centmetro, medio centmetro,
pulgada, media pulgada, etc. segn como se vaya a presentar la tabla de
calibracin.
76
4.5. CALIBRACIN DE TANQUES HORIZONTALES
77
4.5.1.1. Permetro del cilindro principal.-
LD1pLKD1KpLVD1VpspL<D1<
C
LpLKpLVpspL<
Ecuacin 4.14
P4</7720
C
L4</7720
Ecuacin 4.15
2x
uvbaee^1 u1
12
2x
uvbaee^2 u2 ?
12
2x
uvbaee^3 u3
12
v1 ? z1
yvbaee^1 D uvbaee^1
2
v2 ? z2
yvbaee^2 D uvbaee^2
2
78
v3 ? z3
yvbaee^3 D uvbaee^3
2
C KD;1
d
Z K
Ecuacin 4.16
XDP9D3
F
;1
Ecuacin 4.17
Dimetro interno 6 ft (5.5 ft < d < 6.5 ft) F < 20000 psi
Fjk
}}
}}}}}}
Ecuacin 4.18
79
Donde: = incremento en el permetro del cilindro (ft)
Dimetro interno 7 ft (6.5 ft < d < 7.5 ft) F < 18500 psi
FjU}}}
U}}}}}
Ecuacin 4.19
Dimetro interno 8 ft (7.5 ft < d < 8.5 ft) F < 18500 psi
FjU}}}
? 0.0057
Vk
VU
Ecuacin 4.20
Dimetro interno 9 ft (8.5 ft < d < 9.5 ft) F < 19000 psi
FjU}}}
? 0.0065
VVVVVV
Ecuacin 4.21
Dimetro interno 10 ft (9.5 ft < d < 10.5 ft) F < 17000 psi
FjU}}}
? 0.0073
XUUV
Ecuacin 4.22
Dimetro interno 11 ft (10.5 ft < d < 11.5 ft) F < 15000 psi
FjU}}}
? 0.0088
Kk}VK
Ecuacin 4.23
Dimetro interno 12 ft (11.5 ft < d < 12.5 ft) F < 14000 psi
FjU}}}
? 0.0085
kXnnK
Ecuacin 4.24
80
Figura 4.6. Incremento del permetro del cilindro por la presin de trabajo
En el caso de que la cinta no pueda estar en contacto con el cuerpo del tanque
en todos los puntos a lo largo de su trayectoria por las proyecciones de la
pared del tanque, tales como cordones de soldadura o juntas a traslape que
originan una elevacin en la cinta, se debe realizar las correcciones necesarias
con las ecuaciones siguientes:
KDND9DT UDND9 9
cc ? W
3DK VDK 3
Ecuacin 4.25
DND9 9
cc W
VDK KD3
Ecuacin 4.26
81
4.5.1.4.3. Circunferencia corregida por elevacin de cinta.-
Cm C ]] Ecuacin 4.27
P1 Cm Ecuacin 4.28
P2 Cm ? Ecuacin 4.29
PpPK
P
K
Ecuacin 4.30
P KD;1
D
Z K
Ecuacin 4.31
82
Donde: D = dimetro interno del cilindro principal (ft)
P = permetro del cilindro principal corregido (ft)
ec = espesor del cilindro (in)
4p6< KD;H
D1
KZ K
Ecuacin 4.32
p KApC
1
K K
Ecuacin 4.33
B ;H D
Lc LT
2 D A ? ? C
K K
Ecuacin 4.34
83
eh = espesor de las cabezas (in)
D1 = dimetro de la parte cilndrica de las cabezas (ft)
84
4.5.1.9. Volumen total del cilindro.-
ZDL1 KBDZ
Vc DK D ? D1K D
KD
Ecuacin 4.35
D 1V
X
Ecuacin 4.36
D 1V
K
Ecuacin 4.37
85
Figura 4.9. Medidas principales de la cabeza torriesfrica
Desarrollo:
_1 x _2 1
x x x x
x D
x
x x K
x K
x
K K
? vwab
x
V
x K D ? x K D
? x D x K
K ? x D x K D
3
86
w D A3K D K C
6
? w A V C Ecuacin 4.38
] ? A V C Ecuacin 4.39
H
Relacin 1
D
Ecuacin 4.40
E
Relacin 2
D
Ecuacin 4.41
Vci Vi ? D Vi
}}
Ecuacin 4.42
87
Figura 4.10. Correccin porcentual del Volumen por inclinacin
AnDT7pT4C
Ts
U
Ecuacin 4.43
88
178 a 227 0.0000065
228 a 276 0.0000066
277 a 326 0.0000067
327 a 376 0.0000068
377 a 425 0.0000069
H
R
D
Ecuacin 4.44
ko 0.0181R
0.0401R ? 0.0324RV
0.0111RK ? 0.0018R ? 0.0009
Ecuacin 4.45
k ko
}.}}}}}X
Ecuacin 4.46
89
Figura 4.11. Factor de correccin del volumen por temperatura
90
AC
`ev]ab
AC
Ecuacin 4.48
Para el caso en el cual el valor de M/D este dentro de los intervalos que
se encuentra en la tabla se procede a realizar una interpolacin para
obtener el valor de Kc.
91
z D AveC Ecuacin 4.50
K A CK
2 K A CK c
2 K cos ACK c
K A1 ? cosA2CC c
K @ ? w`bAC cosAC ? E
y
R A
C K
A
CK
K asin ? ?
R K
92
fvbc^: 2 K
2
jR AjC I jAjCI
K asin ? ? A K C
R I K
Ecuacin 4.52
K
Ecuacin 4.53
jR AjC I jAjCI K
] K asin ? ? D u] ? A V C
R I K K
Ecuacin 4.54
93
Figura 4.13. Volumen de un cilindro en funcin de y
K
gACi c
K
K
A
CK c
A K A CK C c
V
K
?
3
4 V
fvbc^: 2 0
3
94
[
K
A V C
V
Ecuacin 4.55
K
gACi c
K
K
A
CK
c
2
A K
A
CK C c
4
V
K
D 2
4 3
95
[
K
A V C
K V
Ecuacin 4.56
k [
K
A V C
} V
Ecuacin 4.57
1 ] ? A V C Ecuacin 4.58
96
Vh = volumen de las cabezas (ft3)
Ecuacin 4.59
Como se indica en el punto 4.5.2 los clculos de los volmenes parciales se los
determina mediante la utilizacin de los factores de incremento del volumen
(Kc, Kh) que se obtienen de las tablas del Anexo 2. Esto representa un
problema al momento de realizar la programacin debido a que sera
necesario crear una base de datos para que el software seleccione los factores
de incremento de volumen (Kc, Kh) y para los casos en que los valores no
estn dentro de esta tabla se proceder a realizar interpolaciones generando
valores errneos.
97
Tabla de Calibracin API 2551
M M/D Kc Ka=Vc*Kc Kh Kb=Vh*Kh V=Ka+kb
(in) (-) (-) (gal) (-) (gal) (gal)
0 0 0 0 0 0 0
1 0.00837 0.001298 15.482 0.00021 0.4043 15.8863
2 0.01673 0.003659 43.6429 0.000832 1.602 45.2449
3 0.0251 0.0067 79.9147 0.001859 3.5794 83.494
4 0.03347 0.010291 122.7465 0.003286 6.327 129.0735
5 0.04183 0.014346 171.1128 0.005106 9.8312 180.944
Fuente: Norma API 2551
98
4.6. CALIBRACIN DE TANQUES ESFRICOS
Luego que se han determinado las medidas requeridas por la norma para el
proceso de calibracin de los tanques esfricos se procede a realizar lo
siguiente:
K
^ W1K ?
K
K
Ecuacin 4.60
`1 D
1a ^
6
99
`2 D
2a 2
6
VD
3a 3
X
Ecuacin 4.61
DKDV
XI
Ecuacin 4.62
100
AnDT7pT4C
Ts
U
Ecuacin 4.64
H
R
D
Ecuacin 4.65
k ko
}.}}}}}X
Ecuacin 4.67
101
Figura 4.15. Factor de correccin del volumen
a) Datos de entrada:
102
b) Clculo de las constantes volumtricas
K
1 3
Ecuacin 4.69
V V
2
K
Ecuacin 4.70
j
Ecuacin 4.71
Ecuacin 4.72
I j
1
2
K
Ecuacin 4.73
p ? 2 Ecuacin 4.74
K
gACi c
K
K
A
CK c
A K A CK C c
103
V
K
?
3
4 V
fvbc^: 2 0
3
[
1 K
V
Ecuacin 4.75
Ecuacin 4.76
104
4.6.4. VALIDACIN DEL ALGORITMO MATEMTICO
105
Tabla 4.6. Comparacin de las tablas de calibracin (continuacin)
API 2552 API 2552 Algoritmo Error Error
Incremento
G=1 in G= 0,01 in Matemtico V1-V3 V2-V3
H V1 V2 V3 % %
(in) (gal) (gal) (gal) G=1 in G= 1in
14 593.697226 596.148477 595.519864 0.306 -0.106
15 680.504475 683.332998 682.612499 0.309 -0.106
16 773.086539 776.319291 775.500802 0.311 -0.106
17 871.416188 875.080126 874.157572 0.314 -0.106
18 975.466192 979.588274 978.555609 0.316 -0.106
19 1085.209321 1089.816504 1088.667714 0.318 -0.106
20 1200.618345 1205.737587 1204.466686 0.320 -0.106
106
CAPTULO 5
5.1 INTRODUCCION
9
http://msdn.microsoft.com/es-es/library/kx37x362(v=VS.90).aspx
107
interfaz, simplemente se puede agregar objetos prefabricados en su lugar
dentro de la pantalla.
108
5.2.2 TANQUES VERTICALES
DESCRIPCION DE LA
ITEM VARIABLE PROPIEDAD
VARIABLE
1 DiametroNominal int Ingreso del dimetro nominal
Ingreso de la altura del
double
2 AlturaLiquido lquido
Ingreso de la Temperatura
double
3 TemperaturaLiquido del lquido
Ingreso de la Temperatura
double
4 TemperaturaAmbiente ambiente
5 GradoAPI double Ingreso del Grado API
Ingreso de la altura de la
double
6 PlatinaAforo Platina de Aforo
7 Inclinacion double Ingreso de la Inclinacin
8 TipoJunta int Seleccin del Tipo de Juntas
9 TipoFondo int Seleccin del Tipo de Fondo
10 AlturaCono double Ingreso de la Altura del Cono
11 TipoTecho int Seleccin del Tipo de Techo
12 PesoTecho double Ingreso del Peso del Techo
Ingreso de la Altura Critica
double
13 AlturaCriticaInferior Inferior
Ingreso de la Altura Critica
double
14 AlturaCriticaSuperior Superior
Ingreso del Incremento Tabla
double
15 t.Incremento SI
Ingreso del Incremento Tabla
double
16 q. Incremento SA
109
Tabla 5.2. Elementos de entrada Tanques Verticales (Continuacin)
DESCRIPCION DE LA
ITEM VARIABLE PROPIEDAD
VARIABLE
Ingreso de Circunferencia al
17 circunferenciaA List<double>
20% o 25% de cada anillo
Ingreso de Circunferencia al
18 circunferenciaB List<double>
80% o 75% de cada anillo
Ingreso de Espesores al 20%
19 promedioEspesorT List<double>
o 25% de cada anillo
Ingreso de Espesores al 80%
20 promedioEspesorT List<double>
o 75% de cada anillo
Ingreso de las Alturas de los
21 altura List<double>
Anillos
Ingreso del Nmero de
22 numeroSoldadura List<double> soldaduras o traslapes
verticales por cada anillo
Ingreso del Ancho de la
23 anchoSoldadura List<double>
soldadura por cada anillo
Ingreso del Espesor de la
24 espesorSoldadura List<double> soldadura o traslape por cada
anillo
Ingreso del Nmero de
25 dgvAccesorios DataGridView
Accesorios
Ingreso del valor de donde
26 Desde List<double>
inicia el accesorio
Ingreso del valor de donde
27 Hasta List<double>
finaliza el accesorio
Ingreso del Volumen del
28 Volumen List<double> accesorio (positivo o
negativo)
110
5.2.3 TANQUES HORIZONTALES
111
Tabla 5.3. Elementos de entrada Tanques Horizontales (Continuacin)
DESCRIPCION DE LA
ITEM VARIABLE PROPIEDAD
VARIABLE
Ingreso del Espesor del
12 espesorCuerpo double
Cuerpo
Ingreso de la Presin de
13 presionTrabajo double
Trabajo
Ingreso del Dimetro
14 diametroNominal double
Nominal del tanque
Ingreso de la Temperatura
15 temperaturaLiquido double
del Lquido
Ingreso de la Temperatura
16 temperaturaAmbiente double
Ambiente
Ingreso del porcentaje de
17 inclinacion double
inclinacin
Ingreso del Radio del
18 radioSegmentoEsferico double
Segmento Esfrico
Ingreso del Radio del
19 radioChaflan double
Chafln
Ingreso del Traslape de las
20 traslape double
Juntas Verticales
21 incrementoSI double Ingreso Incremento Tabla SI
Ingreso de Circunferencia al
23 circunferenciasA List<double>
20% de cada anillo
Ingreso de Circunferencia al
24 circunferenciasB List<double>
80% de cada anillo
Ingreso de Longitudes de
25 longitudAnillos List<double>
cada anillo
Ingreso del Nmero de
26 dgvAcc DataGridView
Accesorios
112
Tabla 5.3. Elementos de entrada Tanques Horizontales (Continuacin)
DESCRIPCION DE LA
ITEM VARIABLE PROPIEDAD
VARIABLE
Ingreso del valor de donde
27 Desde List<double>
inicia el accesorio
Ingreso del valor de donde
28 Hasta List<double>
finaliza el accesorio
Ingreso Volumen accesorios
29 Volumen List<double>
(positivo o negativo)
113
Tabla 5.4. Elementos de entrada Tanques Esfricos (Continuacin)
ITEM VARIABLE PROPIEDAD DESCRIPCION DE LA VARIABLE
Ingreso de la Circunferencia Vertical
10 C3 double
a 90
Ingreso del Espesor medido en la
11 e1 double
Circunferencia Horizontal
Ingreso del Espesor medido en la
12 e2 double
Circunferencia Vertical
Ingreso del Espesor medido en la
13 e3 double
Circunferencia Vertical a 90
A continuacin se definen las variables de salida para cada tipo de tanque con
sus propiedades y descripciones de cada una de ellas que nos proporcionara el
software.
Las variables de los tanques verticales que contienen los resultados que se
quieren obtener por el software estn definidas en la tabla 5.5.
114
Tabla 5.5. Elementos de salida Tanques Verticales
115
Tabla 5.5. Elementos de salida Tanques Verticales (Continuacin)
ITEM VARIABLE PROPIEDAD DESCRIPCION DE LA VARIABLE
19 TS double Temperatura del tanque.
Factor de correccin por
20 Kt double
temperatura.
Incremento de Volumen Corregido
21 V(i)c List<double>
por temperatura de cada anillo.
alturaFrecuen Alturas parciales.
22 List<double>
cia
incrementoFre Incrementos de volumen
23 List<double>
cuencia
24 incrementoBV List<double> Volumen Acumulado
25 INCL List<double> Correccin por inclinacin
26 totalAcc List<double> Volumen Accesorios
27 VF double Volumen Fondo
incrementoTe Volumen Techo Flotante
28 List<double>
cho
29 TotalVM List<double> Volumen Muerto
30 VTOTAL List<double> Volumen Total
Las variables de los tanques horizontales que contienen los resultados que se
quieren obtener por el software estn definidas en la tabla 5.6.
Promedio de circunferencias
1 C double
medidas.
116
2 Delta double Correccin por presin de trabajo.
Tabla 5.6. Elementos de salida Tanques Horizontales (Continuacin)
ITEM VARIABLE PROPIEDAD DESCRIPCION DE LA VARIABLE
3 P double Correccin por aumento de cinta.
Dimetro interno del cilindro
4 D double
principal.
Dimetro interno de la seccin
5 Dl double
cilndrica de las cabezas.
6 Vc double Volumen parte cilndrica del tanque.
7 Vh double Volumen de las cabezas.
8 VT double Volumen Total.
9 U double Factor de correccin del volumen.
10 Ri double Radio interno del cilindro.
11 Lc double Longitud del cilindro principal.
Longitud de la parte cilndrica de las
12 B double
cabezas.
Diferencia entre dimetros del
13 Alfa double
cilindro y cabezas.
Volumen Total del tanque obtenido
14 Vy double
del algoritmo matemtico.
15 Alturas parciales.
16 V1 double Volumen por alturas parciales.
Relacin entre la altura parcial y el
17 R double
dimetro del tanque.
Factor de correccin por
18 Ko double
temperatura.
Porcentaje de correccin por
19 K double
temperatura.
20 Vt double Volumen corregido por temperatura
21 Vi double Volumen corregido por inclinacin
22 totalAcc List<double> Volumen Accesorios
23 V.TOTAL double Volumen Total
117
5.3.3 TANQUES ESFRICOS
Las variables de los tanques esfricos que contienen los resultados que se
quieren obtener por el software estn definidas en la tabla 5.7.
Correccin de la circunferencia
1 Co double
horizontal
Correccin a circunferencia interna
2 C1i double
horizontal.
Correccin a circunferencia interna
3 C2i double
vertical.
Correccin a circunferencia interna
4 C3i double
vertical a 90.
5 D double Dimetro vertical corregido.
6 VT double Volumen Total de la esfera.
7 U double Factor de correccin de volumen.
8 Ri double Radio interno de la esfera.
Volumen Total del tanque obtenido
9 Vy double
del algoritmo matemtico.
10 h double Alturas parciales.
11 V1 double Volumen por alturas parciales.
Relacin entre la altura parcial y el
12 R double
dimetro del tanque.
13 Ko double Factor de correccin por temperatura.
Porcentaje de correccin por
14 K double
temperatura.
15 Vt double Volumen corregido por temperatura
16 V.TOTAL double Volumen Total
118
5.4 FLUJOGRAMAS PARA EL DISEO DEL SOFTWARE
119
Figura 5.1. Flujo grama Pantalla principal
La figura 5.2 se describe como est estructurado el mdulo para los tanques
verticales.
120
Figura 5.2. Flujo grama Tanques Verticales
La figura 5.3 se describe como est estructurado el mdulo para los tanques
horizontales.
121
Figura 5.3. Flujo grama Tanques Horizontales
La figura 5.4 se describe como est estructurado el mdulo para los tanques
esfricos.
122
5.5.1 PANTALLA PRINCIPAL
Para el diseo del primer mdulo o pantalla principal se utilizaron los siguientes
objetos y controles.
123
Figura 5.5. Pantalla Principal del software
124
ListBox: es un componente dinmico (es decir no tiene tamao definido) que
permite procesar visualmente un conjunto de elementos.
125
Figura 5.8. Mdulo Tanques Verticales Clculos
126
Figura 5.9. Mdulo Tanques Horizontales Tipo de tanque
127
Los resultados de las correcciones y las tablas de calibracin lo podemos
observar en las figuras 5.11 y 5.12 respectivamente
128
5.5.4 TANQUES ESFRICOS
129
Figura 5.14. Mdulo Tanques Esfricos Correcciones
namespace TesisMecanica
{
public partial class Form1 : Form
{
int tipoTanque, numeroAnillos;
string tanque;
DialogResult dialogResult;
TanqueV t;
130
TanqueH t2;
TanqueE t3;
public Form1()
{
InitializeComponent();
dialogResult = new DialogResult();
t = new TanqueV();
t2 = new TanqueH();
t3 = new TanqueE();
numeroAnillos = 1;
}
numeroAnillos = Convert.ToInt32(cmbAnillos.SelectedItem.ToString());
switch (tipoTanque)
{
case 1:
t.NumeroAnillos = numeroAnillos;
t.TipoTanque = tipoTanque;
131
t.SistemaDeMeda = sistemaMedida;
Tanques_Verticales tv = new Tanques_Verticales();
tv.Show();
break;
case 2:
t2.NumeroAnillos = numeroAnillos;
t2.Sistemamedida = sistemaMedida;
Tanques_Horizontales th = new Tanques_Horizontales();
th.Show();
break;
case 3:
t3.SistemaMedida = sistemaMedida;
TanquesEsfericos te = new TanquesEsfericos();
te.Show();
break;
}
}
}
private void Form1_Load(object sender, EventArgs e)
{
rbtnVertical.Checked = true;
}
private void radioButton3_CheckedChanged(object sender, EventArgs e)
{
if (radioButton3.Checked == true)
{
groupBox2.Enabled = false;
pictureBox1.Image = Image.FromFile("ESFERICO.jpg");
}
else
{
groupBox2.Enabled = true;
}
}
private void rbtnVertical_CheckedChanged(object sender, EventArgs e)
{
if (rbtnVertical.Checked == true)
{
pictureBox1.Image = Image.FromFile("VERTICAL.jpg");
}
}
private void rbtnHorizontal_CheckedChanged(object sender, EventArgs e)
{
if (rbtnHorizontal.Checked == true)
{
pictureBox1.Image = Image.FromFile("HORIZONTAL.jpg");
}
}
}
}
132
5.6.2 TANQUES VERTICALES
133
y = Convert.ToDouble(texboxY[i].Text);
labelPromedio[i].Text = "t" + (i + 1) + " = " + ((x + y) / 2).ToString();
}
}
}
catch (Exception ex)
}
if (t.SistemaDeMeda == 1)
{
t.addEspesorPromedio(prom);
}
else
{
t.addEspesorPromedio(prom * 0.0393700787);
}
}
MessageBox.Show("Los valores se guardaron satisfactoriamente",
"Ingreso de Datos,", MessageBoxButtons.OK, MessageBoxIcon.Information);
// }
}
catch (Exception ex)
{
MessageBox.Show(ex.Message, "Warning",
MessageBoxButtons.OK, MessageBoxIcon.Warning);
}
134
try
{
if (t.SistemaDeMeda == 1)
{
t.PlatinaAforo = Convert.ToDouble(txtPlatinoAforo.Text);
q.PlatinaAforo = Convert.ToDouble(txtPlatinoAforo.Text)*2.54;
t.AlturaCriticaInferior =
Math.Round(Convert.ToDouble(txtCriticaInf.Text)-
t.PlatinaAforo,MidpointRounding.AwayFromZero);
t.AlturaCriticaSuperior =
Math.Round(Convert.ToDouble(txtCriticaSup.Text)-
t.PlatinaAforo,MidpointRounding.AwayFromZero);
q.AlturaCriticaInferior =
Math.Round((Convert.ToDouble(txtCriticaInf.Text) -
t.PlatinaAforo)*2.54,MidpointRounding.AwayFromZero);
q.AlturaCriticaSuperior =
Math.Round((Convert.ToDouble(txtCriticaSup.Text) -
t.PlatinaAforo)*2.54,MidpointRounding.AwayFromZero);
t.DiametroNominal = Convert.ToDouble(txtDiametroNominal.Text);
t.AlturaLiquido = Convert.ToDouble(txtAlturaLiquido.Text);
t.AlturaCono = Convert.ToDouble(txtAlturaCono.Text);
t.PesoTecho = Convert.ToDouble(txtPesoTecho.Text);
}
else
{
t.PlatinaAforo = Convert.ToDouble(txtPlatinoAforo.Text) *
0.0393700787;
q.PlatinaAforo = Convert.ToDouble(txtPlatinoAforo.Text) /10;
t.AlturaCriticaInferior =
Math.Round(Convert.ToDouble(txtCriticaInf.Text) * 0.393700787 -
t.PlatinaAforo,MidpointRounding.AwayFromZero);
t.AlturaCriticaSuperior =
Math.Round(Convert.ToDouble(txtCriticaSup.Text) * 0.393700787 -
t.PlatinaAforo,MidpointRounding.AwayFromZero);
q.AlturaCriticaInferior =
Math.Round((Convert.ToDouble(txtCriticaInf.Text) -
q.PlatinaAforo),MidpointRounding.AwayFromZero) ;
q.AlturaCriticaSuperior =
Math.Round((Convert.ToDouble(txtCriticaSup.Text) -
q.PlatinaAforo),MidpointRounding.AwayFromZero) ;
t.DiametroNominal = Convert.ToDouble(txtDiametroNominal.Text) *
39.3700787;
t.Inclinacion = Convert.ToDouble(txtInclinacion.Text) *
0.0393700787;
t.AlturaLiquido = Convert.ToDouble(txtAlturaLiquido.Text) *
3.2808398950;
t.AlturaCono = Convert.ToDouble(txtAlturaCono.Text) *
0.0393700787;
t.PesoTecho = Convert.ToDouble(txtPesoTecho.Text);
135
}
t.TemperaturaLiquido =
Convert.ToDouble(txtTemperaturaLiquido.Text);
t.TemperaturaAmbiente =
Convert.ToDouble(txtTemperaturaAmbiente.Text);
t.GradoAPI = Convert.ToDouble(txtAPI.Text);
t.TipoJunta = cmbTipoJuntas.SelectedIndex;
t.TipoTecho = cmbTipoTecho.SelectedIndex;
t.TipoFondo = cmbTipoFondo.SelectedIndex;
t.Incremento = Convert.ToDouble(txtIncremento.Text);
q.Incremento = Convert.ToDouble(txtIncremento2.Text);
}
catch (Exception ex)
{
MessageBox.Show(ex.Message, "Warning",
MessageBoxButtons.OK, MessageBoxIcon.Warning);
136
}
137
#region Calculos1_3
private void button2_Click(object sender, EventArgs e)
{
try
{
listResultados.Items.Clear();
double x;
Clculo 1.-
Clculo 2.-
Clculo 3.-
138
}
}
index = 1;
foreach (double i in cc)
{
listResultados.Items.Add("Clculo 03: cc" + index + "= " +
Math.Round(i, 6) + " pies");
index++;
}
listResultados.Items.Add("");
Clculo 4.-
139
listResultados.Items.Add("Clculo 04: cv" + index + "b= " +
Math.Round(j, 6) + " pies");
index++;
}
listResultados.Items.Add("");
Clculo 5.-
Clculo 6.-
140
Clculo 7.-
Clculo 8.-
141
Clculo 9.-
Clculo 10.-
double d = 0, K = 0, promAux = 0;
for (int i = 0; i < t.NumeroAnillos; i++)
{
promAux += r[i];
}
d = promAux / (t.NumeroAnillos * 6);
K = (Math.PI * Wa * SG * Math.Pow(d, 3)) / (4 * E);
List<double> Av = new List<double>();
for (int i = 0; i < t.NumeroAnillos; i++)
{
auxv = (K * t.GetAltura(i)) / (FC * t.GetEspesorPromedio(i));
Av.Add(auxv);
}
listResultados.Items.Add("Clculo 10: d= " + Math.Round(d, 6) + "
plg");
index = 1;
foreach (double i in Av)
{
listResultados.Items.Add("Clculo 10: Av" + index + "= " +
Math.Round(i, 6) + " bbl/plg");
index++;
}
listResultados.Items.Add("");
142
Clculo 10 continuacin.-
Clculo 11.-
Clculo 12.-
143
listResultados.Items.Add("");
Clculo 13.-
Vc = new List<double>();
Vc2 = new List<double>();
double auxVc;
for (int i = 0; i < t.NumeroAnillos; i++)
{
auxVc = Kt * V[i];
Vc.Add(auxVc);
}
index = 1;
foreach (double i in Vc)
{
Vc2.Add(i*0.062593423);
listResultados.Items.Add("Clculo 13: V" + index + "c" + "= " +
Math.Round(i, 6) + " bbl/plg");
index++;
}
}
catch
{
MessageBox.Show("Ingreso mal de datos","ERROR");
}
TablaSA();
TablaSI();
}
#endregion
#region TablaSA
private void TablaSA()
{
List<double> totalAcc = new List<double>();
double totalAuxiliar = 0;
List<double> incrementoTecho = new List<double>();
for (double i = 0; i < t.AlturaAnilloAcumulada(t.NumeroAnillos); i +=
t.Incremento)
{
totalAcc.Add(0);
incrementoTecho.Add(0);
}
144
Clculo de la columna volumen muerto de los accesorios.-
index = 0;
if (Desde.Count > 0)
{
for (int j = 0; j < Desde.Count; j++)
{
for (double i = 0; i < t.AlturaAnilloAcumulada(t.NumeroAnillos); i +=
t.Incremento)
{
if (i >= Desde[j] + t.Incremento && i <= Hasta[j])
{
totalAuxiliar = incrementoAcc[j];
}
else
{
totalAuxiliar = 0;
}
totalAcc[index] += totalAuxiliar;
index++;
}
index = 0;
}
}
if (t.TipoTecho == 1)
{
for (double i = 0; i < t.AlturaAnilloAcumulada(t.NumeroAnillos); i +=
t.Incremento)
{
145
Clculo de la columna volumen muerto del fondo del tanque.-
double rf = 0, vf = 0, VF = 0, vc = 0;
if (t.TipoFondo == 0)
{
rf = (Ccla[0] * 12) / (2 * Math.PI);
vf = Math.PI * Math.Pow(rf, 2) / FC;
VF = vf * t.PlatinaAforo;
}
else if (t.TipoFondo == 1)
{
146
Clculo de la columna Incremento V.-
indexAnillo = 0;
double conFrec = 0;
try
{
incrementoBV[0] = 0;
}
catch
{
MessageBox.Show("Revisar Datos Ingresados");
return;
}
foreach (double i in incrementoBV)
{
conFrec += i;
incrementoFrecuencia.Add(conFrec);
}
147
Clculo de la columna Inclinacion.-
double m, porsentageInclinacion;
List<double> INCL = new List<double>();
m = t.Inclinacion / t.AlturaAnilloAcumulada(t.NumeroAnillos);
porsentageInclinacion = 100 * (Math.Sqrt(1 + (m * m)) - 1);
indexAnillo = 0;
for (double i = 0; i < t.AlturaAnilloAcumulada(t.NumeroAnillos); i +=
t.Incremento)
{
INCL.Add(incrementoFrecuencia[indexAnillo] +
((incrementoFrecuencia[indexAnillo] * porsentageInclinacion) / 100));
indexAnillo++;
}
List<double> TotalVM = new List<double>();
index = 0;
double auxVM = 0;
foreach (double i in totalAcc)
{
if (index == 0)
{
TotalVM.Add(totalAcc[index] + incrementoTecho[index] + VF);
auxVM = (totalAcc[index] + incrementoTecho[index]) + VF +
auxVM;
}
else
{
TotalVM.Add((totalAcc[index] + incrementoTecho[index]) +
auxVM);
auxVM = (totalAcc[index] + incrementoTecho[index]) + auxVM;
}
if (index < totalAcc.Count)
index++;
}
List<double> VTOTAL = new List<double>();
index = 0;
foreach (double i in INCL)
{
VTOTAL.Add(i + TotalVM[index]);
if (index < TotalVM.Count)
index++;
}
double restaAuxiliar = 0;
foreach (double i in resta)
{
restaAuxiliar += i;
148
}
totalAcc[0] = restaAuxiliar;
index = 0;
double contador = 0;
dgvtablaA.Rows.Clear();
dgvtablaA.Rows.Add(incrementoBV.Count);
dgvtablaA[5, 0].Value = VF;
foreach (double i in incrementoBV)
{
dgvtablaA[0, index].Value = contador;
dgvtablaA[1, index].Value = incrementoBV[index];
dgvtablaA[2, index].Value = incrementoFrecuencia[index];
dgvtablaA[3, index].Value = INCL[index];
dgvtablaA[4, index].Value = totalAcc[index];
dgvtablaA[6, index].Value = incrementoTecho[index];
dgvtablaA[7, index].Value = TotalVM[index];
dgvtablaA[8, index].Value = VTOTAL[index];
contador += t.Incremento;
Math.Round(contador, 2);
if (index < INCL.Count)
index++;
}
}
#endregion
#region TablaSI
private void TablaSI()
{
List<double> totalAcc = new List<double>();
double totalAuxiliar = 0;
List<double> incrementoTecho = new List<double>();
for (double i = 0; i < q.AlturaAnilloAcumulada(t.NumeroAnillos); i +=
q.Incremento)
{
totalAcc.Add(0);
incrementoTecho.Add(0);
}
149
Clculo de la columna volumen muerto de los accesorios.-
index = 0;
if (Desde2.Count > 0)
{
for (int j = 0; j < Desde2.Count; j++)
{
for (double i = 0; i < q.AlturaAnilloAcumulada(t.NumeroAnillos); i +=
q.Incremento)
{
if (i >= Desde2[j] + q.Incremento && i <= Hasta2[j])
{
totalAuxiliar = incrementoAcc2[j];
}
else
{
totalAuxiliar = 0;
}
totalAcc[index] += totalAuxiliar;
index++;
}
index = 0;
}
}
150
Clculo de la colmna volumen muerto del fondo del tanque.-
double rf = 0, vf = 0, VF = 0, vc = 0;
if (t.TipoFondo == 0)
{
rf = (Ccla[0] * 12) / (2 * Math.PI);
vf = Math.PI * Math.Pow(rf, 2) / FC;
VF = vf * t.PlatinaAforo;
VF /= 6.28981077;
}
else if (t.TipoFondo == 1)
{
if (t.PlatinaAforo >= t.AlturaCono)
{
rf = (Ccla[0] * 12) / (2 * Math.PI);
vf = (Math.PI * Math.Pow(rf, 2) * t.PlatinaAforo) / FC;
vc = (Math.PI * t.PlatinaAforo * Math.Pow(rf, 2)) / (3 * FC);
VF = vf - vc;
VF /= 6.28981077;
}
else
{
rf = (Ccla[0] * 12) / (2 * Math.PI);
vf = (Math.PI * Math.Pow(rf, 2) * t.PlatinaAforo) / FC;
vc = (((Math.PI * Math.Pow(rf, 2)) / Math.Pow(t.AlturaCono, 2)) *
((t.PlatinaAforo * Math.Pow(t.AlturaCono, 2)) - (t.AlturaCono *
Math.Pow(t.PlatinaAforo, 2)) + (Math.Pow(t.PlatinaAforo, 3) / 3))) / FC;
VF = vf - vc;
VF /= 6.28981077;
}
}
else
{
rf = (Ccla[0] * 12) / (2 * Math.PI);
vc = (Math.PI * t.PlatinaAforo * Math.Pow(rf, 2)) / (3 * FC);
VF = vc;
VF /= 6.28981077;
}
151
Clculo de la columna Incremento V.-
indexAnillo = 0;
double conFrec = 0;
incrementoBV[0] = 0;
foreach (double i in incrementoBV)
{
conFrec += i;
incrementoFrecuencia.Add(conFrec);
}
double m, porsentageInclinacion;
List<double> INCL = new List<double>();
m = t.Inclinacion / t.AlturaAnilloAcumulada(t.NumeroAnillos);
porsentageInclinacion = 100 * (Math.Sqrt(1 + (m * m)) - 1);
152
indexAnillo = 0;
for (double i = 0; i < q.AlturaAnilloAcumulada(t.NumeroAnillos); i +=
q.Incremento)
{
INCL.Add(incrementoFrecuencia[indexAnillo] +
((incrementoFrecuencia[indexAnillo] * porsentageInclinacion) / 100));
indexAnillo++;
}
List<double> TotalVM = new List<double>();
index = 0;
double auxVM = 0;
foreach (double i in totalAcc)
{
if (index == 0)
{
TotalVM.Add(totalAcc[index] + incrementoTecho[index] + VF);
auxVM = (totalAcc[index] + incrementoTecho[index]) + VF +
auxVM;
}
else
{
TotalVM.Add((totalAcc[index] + incrementoTecho[index]) +
auxVM);
auxVM = (totalAcc[index] + incrementoTecho[index]) + auxVM;
}
if (index < totalAcc.Count)
index++;
}
153
Impresin de la Tabla SI.-
index = 0;
double contador = 0;
dgvtablaI.Rows.Clear();
dgvtablaI.Rows.Add(incrementoBV.Count);
dgvtablaI[5, 0].Value = VF;
foreach (double i in incrementoBV)
{
dgvtablaI[0, index].Value = contador;
dgvtablaI[1, index].Value = incrementoBV[index];
dgvtablaI[2, index].Value = incrementoFrecuencia[index];
dgvtablaI[3, index].Value = INCL[index];
dgvtablaI[4, index].Value = totalAcc[index];
dgvtablaI[6, index].Value = incrementoTecho[index];
dgvtablaI[7, index].Value = TotalVM[index];
dgvtablaI[8, index].Value = VTOTAL[index];
contador += q.Incremento;
Math.Round(contador, 2);
if (index < INCL.Count)
index++;
}
}
#endregion
try
{
int aux = Convert.ToInt32(numero.Text);
dgvAccesorios.Rows.Add(aux);
}
catch(Exception ex)
{
MessageBox.Show(ex.Message);
return;
}
154
}
private void button4_Click(object sender, EventArgs e)
{
incrementoAcc = new List<double>();
incrementoAcc2 = new List<double>();
Desde.Clear();
Hasta.Clear();
Volumen.Clear();
Desde2.Clear();
Hasta2.Clear();
Volumen2.Clear();
resta.Clear();
resta2.Clear();
try
{
double desde, hasta, volumen, incremento;
for (int i = 0; i < dgvAccesorios.Rows.Count; i++)
{
desde = (int)(Convert.ToDouble(dgvAccesorios[0,i].Value));
hasta = Convert.ToDouble(dgvAccesorios[1, i].Value);
volumen = Convert.ToDouble(dgvAccesorios[2, i].Value);
if (t.SistemaDeMeda == 1)
{
Desde.Add(desde-t.PlatinaAforo);
Hasta.Add(Math.Round(hasta, 0)-t.PlatinaAforo);
Volumen.Add(volumen);
Desde2.Add((desde * 2.54) - q.PlatinaAforo);
Hasta2.Add((Math.Round(hasta, 0) * 2.54) - q.PlatinaAforo);
Volumen2.Add(volumen / 6.2898107700);
}
else
{
Desde.Add((desde/ 2.54)-t.PlatinaAforo);
Hasta.Add((Math.Round(hasta, 0) / 2.54)-t.PlatinaAforo);
Volumen.Add(volumen*6.2898107700);
Desde2.Add(desde - q.PlatinaAforo);
Hasta2.Add(Math.Round(hasta, 0) - q.PlatinaAforo);
Volumen2.Add(volumen);
}
155
{
resta2.Add(((Desde2[i] * -1) / q.Incremento) * incrementoAcc2[i]);
}
}
MessageBox.Show("Ingreso de Datos almacenados","Ingreso
Volumen Muerto");
}
catch (Exception ex)
{
MessageBox.Show(ex.Message);
}
}
namespace TesisMecanica
{
public partial class Tanques_Horizontales : Form
{
TanqueH ta ;
public Tanques_Horizontales()
{
ta = new TanqueH();
InitializeComponent();
}
private void button1_Click(object sender, EventArgs e)
{
if (rbtnEsferica.Checked == true && rbtnSoldadas.Checked == true)
{
ta.TipoCaso = 1;
}
156
if (rbtnSemiEsferica.Checked == true && rbtnSoldadas.Checked ==
true)
{
ta.TipoCaso = 2;
}
if (rbtnSegmentoEsferico.Checked == true && rbtnSoldadas.Checked
== true)
{
ta.TipoCaso = 3;
}
if (rbtnEsferica.Checked == true && rbtnTraslapadas.Checked == true)
{
ta.TipoCaso = 4;
}
if (rbtnSemiEsferica.Checked == true && rbtnTraslapadas.Checked ==
true)
{
ta.TipoCaso = 5;
}
if (rbtnSegmentoEsferico.Checked == true && rbtnTraslapadas.Checked
== true)
{
ta.TipoCaso = 6;
}
157
Label b = new Label();
l.Text = "Anillo " + (i + 1) + ":";
l.Width = 50;
l.Location = new Point(0, 25 * i);
a.Text = "a" + (i + 1) + "=";
a.Width = 40;
a.Location = new Point(55, 25 * i);
b.Text = "b" + (i + 1) + "=";
b.Width = 40;
b.Location = new Point(200, 25 * i);
t25.Location = new Point(97, 25 * i);
t75.Location = new Point(240, 25 * i);
texboxA.Add(t25);
texboxB.Add(t75);
panelCircunferencia.Controls.Add(a);
panelCircunferencia.Controls.Add(b);
panelCircunferencia.Controls.Add(l);
panelCircunferencia.Controls.Add(t25);
panelCircunferencia.Controls.Add(t75);
}
158
}
}
159
MessageBox.Show(ex.Message);
}
}
160
t.RadioSegmentoEsferico =
Convert.ToDouble(txtRadioSegmentoEsferico.Text);
t.RadioChaflan = Convert.ToDouble(txtRadioChaflan.Text);
t.Traslape = Convert.ToDouble(txtTraslape.Text);
t.W = Convert.ToDouble(txtAncho.Text);
t.T = Convert.ToDouble(txtEspesor.Text);
t.dn = Convert.ToDouble(txtdiametroNominal.Text);
}
t.Nj = Convert.ToDouble(txtNumero.Text);
t.IncrementoSA = Convert.ToDouble(txtIncrementoSA.Text);
t.IncrementoSI = Convert.ToDouble(txtIncrementoSI.Text);
t.Tl = Convert.ToDouble(txtTemperaturaLiquido.Text);
t.Ta = Convert.ToDouble(txttemperaturaAmbiente.Text);
t.m = Convert.ToDouble(txtinclinacion.Text);
MessageBox.Show("Datos Ingresados Satisfactoriamente", "Ingreso
Datos Generales");
}
catch(Exception ex)
{
MessageBox.Show(ex.Message);
}
}
161
Calculo1Caso3();
Calculo2Caso3();
Calculo3Caso3();
Calculo4Caso3();
Calculo5Caso3();
Calculo6Caso3();
break;
case 4:
Calculo1Caso4();
Calculo2Caso4();
Calculo3Caso4();
Calculo4Caso4();
Calculo5Caso4();
Calculo6Caso4();
break;
case 5:
Calculo1Caso5();
Calculo2Caso5();
Calculo3Caso5();
Calculo4Caso5();
Calculo5Caso5();
Calculo6Caso5();
break;
case 6:
Calculo1Caso6();
Calculo2Caso6();
Calculo3Caso6();
Calculo4Caso6();
Calculo5Caso6();
Calculo6Caso6();
break;
}
TablaCalculos();
TablaSA();
TablaSI();
}
Clculo 1.-
#region Calculo1
private void Calculo1Caso1()
{
t.c.Clear();
double numerador = 0, denominador = 0;
for (int i = 0; i < t.NumeroAnillos; i++)
{
t.c.Add((t.CircunferenciasA[i]+t.CircunferenciasB[i])/2);
numerador += t.LongitudAnillos[i] * t.c[i];
162
denominador += t.LongitudAnillos[i];
}
t.C = numerador / denominador;
double d = (t.C / Math.PI) - (2*t.EspesorCuerpo / 12);
double F = (6 * t.PresionTrabajo * d)/t.EspesorCuerpo;
163
double SumaLanillos = 0;
int contador=1;
foreach (double i in t.LongitudAnillos)
{
if (contador % 2 != 0)
{
Lanillo.Add(i - ((2 * t.Traslape) / 12));
SumaLanillos+=i - ((2 * t.Traslape) / 12);
}
else
{
Lanillo.Add(i + ((2 * t.Traslape) / 12));
SumaLanillos += i + ((2 * t.Traslape) / 12);
}
contador++;
}
t.Lc = SumaLanillos;
double Panillos = 0;
for (int i = 0; i < t.NumeroAnillos; i++)
{
Panillos += ((t.CircunferenciasA[i] + t.CircunferenciasB[i]) /
2)*Lanillo[i];
}
t.C = Panillos / SumaLanillos;
double d = (t.C / Math.PI) - (2*t.EspesorCuerpo / 12);
double F = (6 * t.PresionTrabajo * d) / t.EspesorCuerpo;
if (d > 5.5 && d < 6.5 && F < 20000)
{
t.Signo = (F - 9500) / 1000000;
}
else if (d > 6.5 && d < 7.5 && F < 18500)
{
t.Signo = (F - 8000) / 800000;
}
else if (d > 7.5 && d < 8.5 && F < 18500)
{
t.Signo = (F - 8000) / 1395348 + 0.0057;
}
else if (d > 8.5 && d < 9.5 && F < 19000)
{
t.Signo = (F - 8000) / 1333333 + 0.0065;
}
else if (d > 9.5 && d < 10.5 && F < 17000)
{
t.Signo = (F - 8000) / 1168831 + 0.0073;
}
else if (d > 10.5 && d < 11.5 && F < 15000)
{
t.Signo = (F - 8000) / 1129032 + 0.0088;
}
164
else if (d > 11.5 && d < 12.5 && F < 14000)
{
t.Signo = (F - 8000) / 967742 + 0.0085;
}
else
{
t.Signo = 0;
}
}
private void Calculo1Caso5()
{
Calculo1Caso4();
}
private void Calculo1Caso6()
{
Calculo1Caso4();
}
#endregion
Clculo 2.-
#region Calculo2
private void Calculo2Caso1()
{
double P1, P2;
P1 = t.C;
P2 = t.C + t.Signo;
t.P = ((P1 + P2) / 2) -
(((2*t.Nj*t.T*t.W)/(12*t.dn))+((8*t.Nj*t.T)/(36))*Math.Sqrt(t.T/t.dn));
t.D=(t.P/Math.PI)-((2*t.EspesorCuerpo)/12);
t.Dl=((t.c[0]+t.c[t.c.Count-1])/(2*Math.PI))-((2*t.EspesorCabeza)/12);
t.B=6*(t.LongitudCilindricaB1+t.LongitudCilindricaB2);
double LT = 0;
LT+=t.LongitudCabezaA1+t.LongitudCabetaA2+t.LongitudCilindricaB1+t.Longit
udCilindricaB2;
for (int i = 0; i < t.NumeroAnillos; i++)
{
LT += t.LongitudAnillos[i];
}
t.Lc=LT-2*(((t.B+t.EspesorCabeza)/12)+(t.Dl/2));
double V1, V2;
V1 = (t.D * t.D * Math.PI * t.Lc) / 4;
V2 = (t.Dl*t.Dl*Math.PI*(2*t.B))/48;
t.Vc = (V1 + V2) * t.FC;
}
private void Calculo2Caso2()
{
double P1, P2;
165
P1 = t.C;
P2 = t.C + t.Signo;
t.P = ((P1 + P2) / 2) - (((2 * t.Nj * t.T * t.W) / (12 * t.dn)) + ((8 * t.Nj * t.T) /
(36)) * Math.Sqrt(t.T / t.dn));
t.D = (t.P / Math.PI) - ((2 * t.EspesorCuerpo) / 12);
t.Dl = ((t.c[0] + t.c[t.c.Count - 1]) / (2 * Math.PI)) - ((2 * t.EspesorCabeza)
/ 12);
t.B = 6 * (t.LongitudCilindricaB1 + t.LongitudCilindricaB2);
double LT = 0;
LT += t.LongitudCabezaA1 + t.LongitudCabetaA2 +
t.LongitudCilindricaB1 + t.LongitudCilindricaB2;
for (int i = 0; i < t.NumeroAnillos; i++)
{
LT += t.LongitudAnillos[i];
}
t.Lc = LT - 2 * (((t.B + t.EspesorCabeza) / 12) + (t.Dl / 4));
double V1, V2;
V1 = (t.D * t.D * Math.PI * t.Lc) / 4;
V2 = (t.Dl * t.Dl * Math.PI * (2 * t.B)) / 48;
t.Vc = (V1 + V2) * t.FC;
}
private void Calculo2Caso3()
{
double P1, P2;
P1 = t.C;
P2 = t.C + t.Signo;
t.P = ((P1 + P2) / 2) - (((2 * t.Nj * t.T * t.W) / (12 * t.dn)) + ((8 * t.Nj * t.T) /
(36)) * Math.Sqrt(t.T / t.dn));
t.D = (t.P / Math.PI) - ((2 * t.EspesorCuerpo) / 12);
t.Dl = ((t.c[0] + t.c[t.c.Count - 1]) / (2 * Math.PI)) - ((2 * t.EspesorCabeza)
/ 12);
t.BF = t.RadioSegmentoEsferico;
t.EB = t.RadioChaflan / 12;
t.GC = t.Dl / 2;
t.EF = t.BF - t.EB;
t.EC = t.EB;
t.AF = t.BF;
t.GE = t.GC - t.EC;
t.GF = Math.Sqrt(t.EF*t.EF - t.GE *t.GE);
t.HG=(t.EB*t.GF)/t.EF;
t.HF = t.GF + t.HG;
t.HB = Math.Sqrt(t.BF*t.BF-t.HF*t.HF);
t.AH = t.AF - t.HF;
t.AG = t.AH + t.HG;
166
{
LT += t.LongitudAnillos[i];
}
t.Lc = LT - 2 * (((t.B + t.EspesorCabeza) / 12) + t.AG);
double V1, V2;
V1 = (t.D * t.D * Math.PI * t.Lc) / 4;
V2 = (t.Dl * t.Dl * Math.PI * (2 * t.B)) / 48;
t.Vc = (V1 + V2) * t.FC;
}
private void Calculo2Caso4()
{
double P1, P2;
P1 = t.C;
P2 = t.C + t.Signo;
167
t.HB = Math.Sqrt(t.BF * t.BF - t.HF * t.HF);
t.AH = t.AF - t.HF;
t.AG = t.AH + t.HG;
t.B = 6 * (t.LongitudCilindricaB1 + t.LongitudCilindricaB2);
double V1, V2;
V1 = (t.D * t.D * Math.PI * t.Lc) / 4;
V2 = (t.Dl * t.Dl * Math.PI * (2 * t.B)) / 48;
t.Vc = (V1 + V2) * t.FC;
}
#endregion
Clculo 3.-
#region Calculo3
private void Calculo3Caso1()
{
double Vhl = (Math.PI * t.Dl * t.Dl * t.Dl) / 6;
t.Vh = Vhl * t.FC;
}
private void Calculo3Caso2()
{
double Vhl = (Math.PI * t.Dl * t.Dl * t.Dl) / 12;
t.Vh = Vhl * t.FC;
}
private void Calculo3Caso3()
{
double fi, Vk, Vs;
fi = Math.Asin(t.HG/t.EB);
Vk = (t.GE * t.GE * t.HG + t.EB * t.EB * t.HG - ((t.HG * t.HG * t.HG)/3) +
t.GE*t.HG*Math.Sqrt(t.EB*t.EB-t.HG*t.HG)+t.GE*t.EB*t.EB*fi) * Math.PI * t.FC;
Vs=(Math.PI/6)*t.AH*(3*t.HB*t.HB+t.AH*t.AH)*t.FC;
t.Vh=2*(Vk+Vs);
}
private void Calculo3Caso4()
{
Calculo3Caso1();
}
private void Calculo3Caso5()
{
Calculo3Caso2();
}
private void Calculo3Caso6()
{
Calculo3Caso3();
}
#endregion
168
Clculo 4.-
#region Calculo4
private void Calculo4Caso1()
{
t.VT = t.Vc + t.Vh;
}
private void Calculo4Caso2()
{
Calculo4Caso1();
}
private void Calculo4Caso3()
{
Calculo4Caso1();
}
private void Calculo4Caso4()
{
Calculo4Caso1();
}
private void Calculo4Caso5()
{
Calculo4Caso1();
}
private void Calculo4Caso6()
{
Calculo4Caso1();
}
#endregion
Clculo 5.-
#region Calculo5
private void Calculo5Caso1()
{
t.Ri = t.D / 2;
t.Y = 2 * t.Ri;
t.Alfa = (t.D - t.Dl) / 2;
double Vcl=t.Ri*t.Ri*(Math.Asin((t.Y-t.Ri)/t.Ri)+(((t.Y-
t.Ri)*Math.Sqrt(t.Ri*t.Ri-((t.Y-t.Ri)*(t.Y-
t.Ri))))/t.Ri*t.Ri)+(Math.PI/2))*(t.Lc+((t.B*2)/12))*t.FC ;
double Vh2 = Math.PI * ((t.Ri - t.Alfa) * (t.Y * t.Y) - ((t.Y * t.Y * t.Y) / 3));
double Vhc = Vh2 * t.FC;
double VTl = Vcl + Vhc;
t.U = t.VT / VTl;
}
private void Calculo5Caso2()
{
t.Ri = t.D / 2;
t.Y = 2 * t.Ri;
169
t.Alfa = (t.D - t.Dl) / 2;
double Vcl = t.Ri * t.Ri * (Math.Asin((t.Y - t.Ri) / t.Ri) + (((t.Y - t.Ri) *
Math.Sqrt(t.Ri * t.Ri - ((t.Y - t.Ri) * (t.Y - t.Ri)))) / t.Ri * t.Ri) + (Math.PI / 2)) * (t.Lc
+ ((t.B * 2) / 12)) * t.FC;
double Vh2 = (Math.PI/2) * ((t.Ri - t.Alfa) * (t.Y * t.Y) - ((t.Y * t.Y * t.Y) /
3));
double Vhc = Vh2 * t.FC;
double VTl = Vcl + Vhc;
t.U = t.VT / VTl;
}
private void Calculo5Caso3()
{
t.Ri = t.D / 2;
t.Y = 2 * t.Ri;
t.Alfa = (t.D - t.Dl) / 2;
double Vcl = t.Ri * t.Ri * (Math.Asin((t.Y - t.Ri) / t.Ri) + (((t.Y - t.Ri) *
Math.Sqrt(t.Ri * t.Ri - ((t.Y - t.Ri) * (t.Y - t.Ri)))) / t.Ri * t.Ri) + (Math.PI / 2)) * (t.Lc
+ ((t.B * 2) / 12)) * t.FC;
double Vh2 = ((Math.PI*9)/40) * ((t.Ri - t.Alfa) * (t.Y * t.Y) - ((t.Y * t.Y *
t.Y) / 3));
double Vhc = Vh2 * t.FC;
double VTl = Vcl + Vhc;
t.U = t.VT / VTl;
}
private void Calculo5Caso4()
{
Calculo5Caso1();
}
private void Calculo5Caso5()
{
Calculo5Caso2();
}
private void Calculo5Caso6()
{
Calculo5Caso3();
}
#endregion
Clculo 6.-
#region Calculo6
private void Calculo6Caso1()
{
t.Ri *= 12;
t.Lc *= 12;
t.Alfa *= 12;
t.Y = t.Ri * 2;
t.Vy = (t.Ri * t.Ri * (Math.Asin((t.Y - t.Ri) / t.Ri) + (((t.Y - t.Ri) *
Math.Sqrt(Math.Pow(t.Ri, 2) - (Math.Pow((t.Y - t.Ri), 2)))) / Math.Pow(t.Ri, 2)) +
170
(Math.PI / 2)) * (t.Lc + (t.B * 2)) + Math.PI * ((t.Ri - t.Alfa) * Math.Pow(t.Y, 2) -
(Math.Pow(t.Y, 3)) / 3)) * t.U * t.FG;
}
private void Calculo6Caso2()
{
t.Ri *= 12;
t.Lc *= 12;
t.Alfa *= 12;
t.Y = t.Ri * 2;
t.Vy = (t.Ri * t.Ri * (Math.Asin((t.Y - t.Ri) / t.Ri) + (((t.Y - t.Ri) *
Math.Sqrt(Math.Pow(t.Ri, 2) - (Math.Pow((t.Y - t.Ri), 2)))) / Math.Pow(t.Ri, 2)) +
(Math.PI / 2)) * (t.Lc + (t.B * 2)) + (Math.PI/2) * ((t.Ri - t.Alfa) * Math.Pow(t.Y, 2) -
(Math.Pow(t.Y, 3)) / 3)) * t.U * t.FG;
}
private void Calculo6Caso3()
{
t.Ri *= 12;
t.Lc *= 12;
t.Alfa *= 12;
t.Y = t.Ri * 2;
t.Vy = (t.Ri * t.Ri * (Math.Asin((t.Y - t.Ri) / t.Ri) + (((t.Y - t.Ri) *
Math.Sqrt(Math.Pow(t.Ri, 2) - (Math.Pow((t.Y - t.Ri), 2)))) / Math.Pow(t.Ri, 2)) +
(Math.PI / 2)) * (t.Lc + (t.B * 2)) + ((Math.PI*9)/40) * ((t.Ri - t.Alfa) *
Math.Pow(t.Y, 2) - (Math.Pow(t.Y, 3)) / 3)) * t.U * t.FG;
}
private void Calculo6Caso4()
{
Calculo6Caso1();
}
private void Calculo6Caso5()
{
Calculo6Caso2();
}
private void Calculo6Caso6()
{
Calculo6Caso3();
}
#endregion
Clculo Vy.-
#region CalculoVY
private double Vy(double y)
{
double resultado = 0.0f;
double factor = 0;
if (isSI == false) factor = t.FG;
else factor = t.FH;
switch(t.TipoCaso)
171
{
case 1: resultado = (t.Ri * t.Ri * (Math.Asin((y - t.Ri) / t.Ri) + (((y - t.Ri)
* Math.Sqrt(Math.Pow(t.Ri,2) - (Math.Pow((y - t.Ri),2)))) / Math.Pow(t.Ri,2)) +
(Math.PI / 2)) * (t.Lc + (t.B * 2)) + Math.PI * ((t.Ri - t.Alfa) * Math.Pow(y,2) -
(Math.Pow(y,3)) / 3)) * t.U *factor ; break;
case 2: resultado = (t.Ri * t.Ri * (Math.Asin((y - t.Ri) / t.Ri) + (((y - t.Ri)
* Math.Sqrt(Math.Pow(t.Ri, 2) - (Math.Pow((y - t.Ri), 2)))) / Math.Pow(t.Ri, 2)) +
(Math.PI / 2)) * (t.Lc + (t.B * 2)) + (Math.PI / 2) * ((t.Ri - t.Alfa) * Math.Pow(y, 2) -
(Math.Pow(y, 3)) / 3)) * t.U * factor; break;
case 3: resultado = (t.Ri * t.Ri * (Math.Asin((y - t.Ri) / t.Ri) + (((y - t.Ri)
* Math.Sqrt(Math.Pow(t.Ri, 2) - (Math.Pow((y - t.Ri), 2)))) / Math.Pow(t.Ri, 2)) +
(Math.PI / 2)) * (t.Lc + (t.B * 2)) + ((Math.PI * 9) / 40) * ((t.Ri - t.Alfa) *
Math.Pow(y, 2) - (Math.Pow(y, 3)) / 3)) * t.U * factor; break;
case 4: resultado = (t.Ri * t.Ri * (Math.Asin((y - t.Ri) / t.Ri) + (((y - t.Ri)
* Math.Sqrt(Math.Pow(t.Ri, 2) - (Math.Pow((y - t.Ri), 2)))) / Math.Pow(t.Ri, 2)) +
(Math.PI / 2)) * (t.Lc + (t.B * 2)) + Math.PI * ((t.Ri - t.Alfa) * Math.Pow(y, 2) -
(Math.Pow(y, 3)) / 3)) * t.U * factor; break;
case 5: resultado = (t.Ri * t.Ri * (Math.Asin((y - t.Ri) / t.Ri) + (((y - t.Ri)
* Math.Sqrt(Math.Pow(t.Ri, 2) - (Math.Pow((y - t.Ri), 2)))) / Math.Pow(t.Ri, 2)) +
(Math.PI / 2)) * (t.Lc + (t.B * 2)) + (Math.PI / 2) * ((t.Ri - t.Alfa) * Math.Pow(y, 2) -
(Math.Pow(y, 3)) / 3)) * t.U * factor; break;
case 6: resultado = (t.Ri * t.Ri * (Math.Asin((y - t.Ri) / t.Ri) + (((y - t.Ri)
* Math.Sqrt(Math.Pow(t.Ri, 2) - (Math.Pow((y - t.Ri), 2)))) / Math.Pow(t.Ri, 2)) +
(Math.PI / 2)) * (t.Lc + (t.B * 2)) + ((Math.PI * 9) / 40) * ((t.Ri - t.Alfa) *
Math.Pow(y, 2) - (Math.Pow(y, 3)) / 3)) * t.U * factor; break;
}
return resultado;
}
#endregion
#region CalculoK
private double FuncionK(double R)
{
return 0.0181 * Math.Pow(R, 5) - 0.0401 * Math.Pow(R, 4) + 0.0324 *
Math.Pow(R, 3) - 0.0111 * Math.Pow(R, 2) + 0.0018 * R + 0.0009;
}
#endregion
Clculo Porcentaje.-
#region CalculoPorcentaje
private double Porcentaje(double K)
{
double Ts = ((7 * t.Tl + t.Ta)) / 8;
double am = 0;
if (Ts >= -70 && Ts <= -21 )
{
am=0.0000060;
}
else if (Ts >= -20 && Ts <= 28)
172
{
am=0.0000061;
}
else if (Ts >= 29 && Ts <= 78)
{
am=0.0000062;
}
else if (Ts >= 79 && Ts <= 128)
{
am=0.0000063;
}
else if (Ts >= 129 && Ts <= 177)
{
am=0.0000064;
}
else if (Ts >= 178 && Ts <= 227)
{
am=0.0000065;
}
else if (Ts >= 228 && Ts <= 276)
{
am=0.0000066;
}
else if (Ts >= 277 && Ts <= 326)
{
am = 0.0000067;
}
else if (Ts >= 327 && Ts <= 376)
{
am = 0.0000068;
}
else if (Ts >= 377 && Ts <= 425)
{
am = 0.0000069;
}
else
{
am=0.0000065;
}
Clculo Vt.-
#region CalculoVt
private double Vt(double V1, double porcentaje)
{
173
return V1 + V1 * porcentaje / 100;
}
#endregion
#region CalculoInclinacion
private double Inclinacion(double Vt)
{
return Vt - Vt * t.m / 100;
}
#endregion
#region CalculosTabla
private void TablaCalculos()
{
listCalculos.Items.Clear();
listCalculos.Items.Add("Calculo 1:");
listCalculos.Items.Add("");
listCalculos.Items.Add("C= "+t.C+" pies");
listCalculos.Items.Add("Delta= " + t.Signo + " pies");
listCalculos.Items.Add("");
listCalculos.Items.Add("");
listCalculos.Items.Add("Calculo 2:");
listCalculos.Items.Add("");
listCalculos.Items.Add("P= " + t.P + " pies");
listCalculos.Items.Add("D= " + t.D + " pies");
listCalculos.Items.Add("Dl= " + t.Dl + " pies");
listCalculos.Items.Add("Vc= " + t.Vc + " gal");
listCalculos.Items.Add("");
listCalculos.Items.Add("");
listCalculos.Items.Add("Calculo 3:");
listCalculos.Items.Add("");
listCalculos.Items.Add("Vh= " + t.Vh + " gal");
listCalculos.Items.Add("");
listCalculos.Items.Add("");
listCalculos.Items.Add("Calculo 4:");
listCalculos.Items.Add("");
listCalculos.Items.Add("VT= " + t.VT + " gal");
listCalculos.Items.Add("");
listCalculos.Items.Add("");
listCalculos.Items.Add("Calculo 5:");
listCalculos.Items.Add("");
listCalculos.Items.Add("U= "+t.U);
174
listCalculos.Items.Add("");
listCalculos.Items.Add("");
listCalculos.Items.Add("Calculo 6:");
listCalculos.Items.Add("");
listCalculos.Items.Add("Ri= " + t.Ri+" plg");
listCalculos.Items.Add("Lc= " + t.Lc + " plg");
listCalculos.Items.Add("B= " + t.B + " plg");
listCalculos.Items.Add("Alfa= " + t.Alfa + " plg");
listCalculos.Items.Add("Vy= " + t.Vy + " gal");
listCalculos.Items.Add("");
listCalculos.Items.Add("");
}
#endregion
#region TablaSA
private void TablaSA()
{
isSI = false;
List<double> totalAcc = new List<double>();
double totalAuxiliar = 0;
for (double i = 0; i < t.D * 12; i += t.IncrementoSA)
{
totalAcc.Add(0);
}
//calculo de accesorios desde y hasta
int index = 0;
if (Desde.Count > 0)
{
for (int j = 0; j < Desde.Count; j++)
{
for (double i = 0; i < t.D * 12; i += t.IncrementoSA)
{
if (i >= Desde[j] + t.IncrementoSA && i <= Hasta[j])
{
totalAuxiliar = incrementoAcc[j];
}
else
{
totalAuxiliar = 0;
}
totalAcc[index] += totalAuxiliar;
index++;
}
175
index = 0;
}
}
dgvTablaSA.Rows.Clear();
double vol = 0;
double value = t.D * 12;
double value2 = 0;
if (t.IncrementoSA < 1) value2 = value / t.IncrementoSA;
else value2 = value;
dgvTablaSA.Rows.Add((int)value2+1);
int cont = 0;
for (double y = 0; y < value2; y += t.IncrementoSA)
{
dgvTablaSA[0, cont].Value = y;
double vy=Vy(y);
dgvTablaSA[1, cont].Value = vy;
double R = y / value;
dgvTablaSA[2, cont].Value = R;
double K = FuncionK(R);
dgvTablaSA[3, cont].Value = K;
double porcentaje=Porcentaje(K);
dgvTablaSA[4, cont].Value = porcentaje;
vol = Vt(vy, porcentaje);
dgvTablaSA[5, cont].Value = vol;
dgvTablaSA[6, cont].Value = Inclinacion(vol);
dgvTablaSA[7, cont].Value = totalAcc[cont];
dgvTablaSA[8, cont].Value = Inclinacion(vol) + totalAcc[cont];
if(cont<(int)value2)
cont++;
}
dgvTablaSA[0, cont].Value = value;
dgvTablaSA[1, cont].Value = Vy(value);
dgvTablaSA[2, cont].Value = 1;
dgvTablaSA[3, cont].Value = FuncionK(1);
dgvTablaSA[4, cont].Value = Porcentaje(FuncionK(1));
vol = Vt(Vy(value), Porcentaje(FuncionK(1)));
dgvTablaSA[5, cont].Value = vol;
dgvTablaSA[6, cont].Value = Inclinacion(vol);
dgvTablaSA[7, cont].Value = totalAcc[cont];
dgvTablaSA[8, cont].Value = Inclinacion(vol) + totalAcc[cont];
}
#endregion
# region TablaSI
private void TablaSI()
176
{
isSI = true;
t.Ri *= 2.54;
t.Lc *= 2.54;
t.B *= 2.54;
t.Alfa *= 2.54;
t.D *= 2.54;
List<double> totalAcc = new List<double>();
double totalAuxiliar = 0;
for (double i = 0; i < t.D * 12; i += t.IncrementoSI)
{
totalAcc.Add(0);
}
//calculo de accesorios desde y hasta
int index = 0;
if (Desde2.Count > 0)
{
for (int j = 0; j < Desde2.Count; j++)
{
for (double i = 0; i < t.D * 12; i += t.IncrementoSI)
{
if (i >= Desde2[j] + t.IncrementoSI && i <= Hasta2[j])
{
totalAuxiliar = incrementoAcc2[j];
}
else
{
totalAuxiliar = 0;
}
totalAcc[index] += totalAuxiliar;
index++;
}
index = 0;
}
}
dgvTablaSI.Rows.Clear();
double vol = 0;
double value = t.D * 12;
double value2 = 0;
if (t.IncrementoSA < 1) value2 = value / t.IncrementoSA;
else value2 = value;
dgvTablaSI.Rows.Add((int)value2 + 1);
int cont = 0;
for (double y = 0; y < value2; y += t.IncrementoSI)
{
dgvTablaSI[0, cont].Value = y;
double vy = Vy(y);
dgvTablaSI[1, cont].Value = vy;
double R = y / value;
dgvTablaSI[2, cont].Value = R;
177
double K = FuncionK(R);
dgvTablaSI[3, cont].Value = K;
double porcentaje = Porcentaje(K);
dgvTablaSI[4, cont].Value = porcentaje;
vol = Vt(vy, porcentaje);
dgvTablaSI[5, cont].Value = vol;
dgvTablaSI[6, cont].Value = Inclinacion(vol);
dgvTablaSI[7, cont].Value = totalAcc[cont];
dgvTablaSI[8, cont].Value = Inclinacion(vol) + totalAcc[cont];
if (cont < (int)value2)
cont++;
}
dgvTablaSI[0, cont].Value = value;
dgvTablaSI[1, cont].Value = Vy(value);
dgvTablaSI[2, cont].Value = 1;
dgvTablaSI[3, cont].Value = FuncionK(1);
dgvTablaSI[4, cont].Value = Porcentaje(FuncionK(1));
vol = Vt(Vy(value), Porcentaje(FuncionK(1)));
dgvTablaSI[5, cont].Value = vol;
dgvTablaSI[6, cont].Value = Inclinacion(vol);
dgvTablaSI[7, cont].Value = totalAcc[cont];
dgvTablaSI[8, cont].Value = Inclinacion(vol) + totalAcc[cont];
}
#endregion
178
volumen = Convert.ToDouble(dgvAcc[2, i].Value);
if (t.Sistemamedida == 1)
{
Desde.Add(desde);
Hasta.Add(Math.Round(hasta, 0));
Volumen.Add(volumen);
Desde2.Add((desde * 2.54));
Hasta2.Add((Math.Round(hasta, 0) * 2.54));
Volumen2.Add(volumen);
}
else
{
Desde.Add((desde / 2.54) );
Hasta.Add((Math.Round(hasta, 0) / 2.54));
Volumen.Add(volumen);
Desde2.Add(desde);
Hasta2.Add(Math.Round(hasta, 0) );
Volumen2.Add(volumen);
}
incremento = Volumen[i] * t.IncrementoSA / (Hasta[i] - Desde[i]);
incrementoAcc.Add(incremento);
incremento = Volumen2[i] * t.IncrementoSI / (Hasta2[i] -
Desde2[i]);
incrementoAcc2.Add(incremento);
if (Desde[i] < 0)
{
resta.Add(((Desde[i] * -1) / t.IncrementoSA) * incrementoAcc[i]);
}
if (Desde2[i] < 0)
{
resta2.Add(((Desde2[i] * -1) / t.IncrementoSI) *
incrementoAcc2[i]);
}
}
179
5.6.4 TANQUES ESFRICOS
namespace TesisMecanica
{
public partial class TanquesEsfericos : Form
{
TanqueE t = new TanqueE();
bool isSI = false;
public TanquesEsfericos()
{
InitializeComponent();
}
private void button2_Click(object sender, EventArgs e)
{
Calculos();
TablaSA();
TablaSI();
}
#region Calculos
private void Calculos()
{
listCalculos.Items.Clear();
Clculo 1.-
Clculo 2.-
180
listCalculos.Items.Add("");
listCalculos.Items.Add("");
Clculo 3.-
Clculo 4.-
Clculo 5.-
t.Ri = t.D / 2;
t.y = 2 * t.Ri;
t.VT1=Math.PI*(t.Ri*Math.Pow(t.y,2)-(Math.Pow(t.y,3)/3))*t.FC;
t.U = t.VT / t.VT1;
listCalculos.Items.Add("Calculo 5: ");
listCalculos.Items.Add("y= " + t.y.ToString() + " pies");
listCalculos.Items.Add("VT1= " + t.VT1.ToString() + " gal");
listCalculos.Items.Add("U= " + t.U.ToString());
listCalculos.Items.Add("");
listCalculos.Items.Add("");
Clculo 6.-
t.Ri *= 12;
t.y = 2 * t.Ri;
double vy = Math.PI * (t.Ri * Math.Pow(t.y, 2) - (Math.Pow(t.y, 3) / 3)) *
t.U *t.FG;
listCalculos.Items.Add("Calculo 6: ");
listCalculos.Items.Add("Vy= " + vy.ToString() + " gal");
listCalculos.Items.Add("");
listCalculos.Items.Add("");
}
#endregion
181
En las siguientes lineas de cdigo se realizan las tablas de calibracin en el
sistema de unidades americano.
#region TablaSa
private void TablaSA()
{
isSI = false;
dgvTablaSA.Rows.Clear();
double vol = 0;
double value = t.D * 12;
double value2 = 0;
if (t.IncrementoSA < 1) value2 = value / t.IncrementoSA;
else value2 = value;
dgvTablaSA.Rows.Add((int)(value2)+1);
int cont = 0;
for (double y = 0; y < value2; y += t.IncrementoSA)
{
dgvTablaSA[0, cont].Value = y;
double vy = Vy(y);
dgvTablaSA[1, cont].Value = vy;
double R = y / value;
dgvTablaSA[2, cont].Value = R;
double K = FuncionK(R);
dgvTablaSA[3, cont].Value = K;
double porcentaje = Porcentaje(K);
dgvTablaSA[4, cont].Value = porcentaje;
vol = Vt(vy, porcentaje);
dgvTablaSA[5, cont].Value = vol;
if (cont < (int)value2)
cont++;
}
dgvTablaSA[0, cont].Value = value;
dgvTablaSA[1, cont].Value = Vy(value);
dgvTablaSA[2, cont].Value = 1;
dgvTablaSA[3, cont].Value = FuncionK(1);
dgvTablaSA[4, cont].Value = Porcentaje(FuncionK(1));
vol = Vt(Vy(value), Porcentaje(FuncionK(1)));
dgvTablaSA[5, cont].Value = vol;
}
#endregion
# region TablaSI
private void TablaSI()
{
182
t.Ri *= 2.54;
isSI = true;
dgvTablaSI.Rows.Clear();
double vol = 0;
double value = t.D * 12 * 2.54;
double value2 = 0;
if (t.IncrementoSA < 1) value2 = value / t.IncrementoSI;
else value2 = value;
dgvTablaSI.Rows.Add((int)(value2) + 1);
int cont = 0;
for (double y = 0; y < value2; y += t.IncrementoSI)
{
dgvTablaSI[0, cont].Value = y;
double vy = Vy(y);
dgvTablaSI[1, cont].Value = vy;
double R = y / value;
dgvTablaSI[2, cont].Value = R;
double K = FuncionK(R);
dgvTablaSI[3, cont].Value = K;
double porcentaje = Porcentaje(K);
dgvTablaSI[4, cont].Value = porcentaje;
vol = Vt(vy, porcentaje);
dgvTablaSI[5, cont].Value = vol;
if (cont < (int)value2)
cont++;
}
dgvTablaSI[0, cont].Value = value;
dgvTablaSI[1, cont].Value = Vy(value);
dgvTablaSI[2, cont].Value = 1;
dgvTablaSI[3, cont].Value = FuncionK(1);
dgvTablaSI[4, cont].Value = Porcentaje(FuncionK(1));
vol = Vt(Vy(value), Porcentaje(FuncionK(1)));
dgvTablaSI[5, cont].Value = vol;
}
#endregion
183
{
return 0.00186 * Math.Pow(R, 4) - 0.00226 * Math.Pow(R, 3) + 0.00144
* Math.Pow(R, 2) + 0.00025 * R + 0.00065;
}
private double Porcentaje(double K)
{
double Ts = ((7 * t.Tl + t.Ta)) / 8;
double am = 0;
if (Ts >= -70 && Ts <= -21)
{
am = 0.0000060;
}
else if (Ts >= -20 && Ts <= 28)
{
am = 0.0000061;
}
else if (Ts >= 29 && Ts <= 78)
{
am = 0.0000062;
}
else if (Ts >= 79 && Ts <= 128)
{
am = 0.0000063;
}
else if (Ts >= 129 && Ts <= 177)
{
am = 0.0000064;
}
else if (Ts >= 178 && Ts <= 227)
{
am = 0.0000065;
}
else if (Ts >= 228 && Ts <= 276)
{
am = 0.0000066;
}
else if (Ts >= 277 && Ts <= 326)
{
am = 0.0000067;
}
else if (Ts >= 327 && Ts <= 376)
{
am = 0.0000068;
}
else if (Ts >= 377 && Ts <= 425)
{
am = 0.0000069;
}
else
{
184
am = 0.0000065;
}
return K * (am / 0.0000065);
}
private void TanquesEsfericos_Load(object sender, EventArgs e)
{
if (t.SistemaMedida == 0)//SI
{
lblUnidadH.Text = "mm";
lblUnidadDm.Text = "mm";
lblUnidadma.Text = "mm";
lblUnidadC1.Text = "mm";
lblUnidadC2.Text = "mm";
lblUnidadC3.Text = "mm";
lblUnidade1.Text = "mm";
lblUnidade2.Text = "mm";
lblUnidade3.Text = "mm";
}
else//SA
{
lblUnidadH.Text = "plg";
lblUnidadDm.Text = "pies";
lblUnidadma.Text = "plg";
lblUnidadC1.Text = "pies";
lblUnidadC2.Text = "pies";
lblUnidadC3.Text = "pies";
lblUnidade1.Text = "plg";
lblUnidade2.Text = "plg";
lblUnidade3.Text = "plg";
}
}
private void button1_Click(object sender, EventArgs e)
{
try
{
if (t.SistemaMedida == 0)//SI
{
t.H = Convert.ToDouble(txtH.Text) * 0.0393700787;
t.Dm = Convert.ToDouble(txtDm.Text) * 0.0032808399;
t.ma = Convert.ToDouble(txtma.Text) * 0.0393700787;
185
{
t.H = Convert.ToDouble(txtH.Text);
t.Dm = Convert.ToDouble(txtDm.Text);
t.ma = Convert.ToDouble(txtma.Text);
t.Tl = Convert.ToDouble(txtTl.Text);
t.Ta = Convert.ToDouble(txtTa.Text);
t.C1 = Convert.ToDouble(txtC1.Text);
t.C2 = Convert.ToDouble(txtC2.Text);
t.C3 = Convert.ToDouble(txtC3.Text);
t.e1 = Convert.ToDouble(txte1.Text);
t.e2 = Convert.ToDouble(txte2.Text);
t.e3 = Convert.ToDouble(txte3.Text);
}
t.Tl = Convert.ToDouble(txtTl.Text);
t.Ta = Convert.ToDouble(txtTa.Text);
t.IncrementoSA = Convert.ToDouble(txtIncrementoSa.Text);
t.IncrementoSI = Convert.ToDouble(txtIncrementoSI.Text);
if (t.IncrementoSA == 0 || t.IncrementoSI == 0)
{
MessageBox.Show("El incremento debe ser Diferente de 0 se le
asigno a 1");
txtIncrementoSa.Text = "1";
txtIncrementoSI.Text = "1";
t.IncrementoSA = 1;
t.IncrementoSI = 1;
}
else
{
MessageBox.Show("Datos Ingresados Satisfactoriamente");
}
}
catch(Exception ex)
{
MessageBox.Show(ex.Message);
}
}
private void linkLabel1_LinkClicked(object sender,
LinkLabelLinkClickedEventArgs e)
{
ImagenesE imagenes = new ImagenesE();
imagenes.Show();
}
private void tabPage1_Click(object sender, EventArgs e)
{
}
}
}
186
CAPTULO 6
187
Tabla 6.1. Comparacin Correcciones T. Verticales (continuacin)
Memoria Software de Error
Variable Unidad
de Clculo Calibracin (%)
cv1a (pie) 0.207133 0.207133 0.00
cv1b (pie) 0.175513 0.175513 0.00
cv2a (pie) 0.355896 0.355896 0.00
cv2b (pie) 0.277694 0.277694 0.00
cv3a (pie) 0.130408 0.130408 0.00
cv3b (pie) 0.085207 0.085207 0.00
Clculo 4
cv4a (pie) 0.073545 0.073545 0.00
cv4b (pie) 0.013570 0.013570 0.00
cv5a (pie) 0.000000 0.000000 0.00
cv5b (pie) 0.000000 0.000000 0.00
cv6a (pie) 0.000000 0.000000 0.00
cv6b (pie) 0.000000 0.000000 0.00
ct1 (pie) 0.336113 0.336113 0.00
ct2 (pie) 0.145123 0.145123 0.00
ct3 (pie) 0.250977 0.250977 0.00
Clculo 5
ct4 (pie) 0.188104 0.188104 0.00
ct5 (pie) 0.183157 0.183157 0.00
ct6 (pie) 0.173159 0.173159 0.00
Cc1a (pie) 420.884642 420.884642 0.00
Cc1b (pie) 420.978598 420.978598 0.00
Cc2a (pie) 420.943273 420.943273 0.00
Cc2b (pie) 421.001790 421.001790 0.00
Cc3a (pie) 420.994009 420.994009 0.00
Cc3b (pie) 421.009683 421.009683 0.00
Clculo 6
Cc4a (pie) 420.956265 420.956265 0.00
Cc4b (pie) 420.960466 420.960466 0.00
Cc5a (pie) 421.402212 421.402212 0.00
Cc5b (pie) 420.982264 420.982264 0.00
Cc6a (pie) 420.969296 420.969296 0.00
Cc6b (pie) 420.966015 420.966015 0.00
SG (----) 0.911727 0.911727 0.00
cs1a (pie) 0.038402 0.038402 0.00
cs1b (pie) 0.009605 0.009605 0.00
cs2a (pie) 0.094806 0.094806 0.00
cs2b (pie) 0.023708 0.023708 0.00
Clculo 7
cs3a (pie) 0.054833 0.054833 0.00
cs3b (pie) 0.013709 0.013709 0.00
cs4a (pie) 0.072812 0.072812 0.00
cs4b (pie) 0.018203 0.018203 0.00
cs5a (pie) 0.074626 0.074626 0.00
188
Tabla 6.1. Comparacin Correcciones T. Verticales (continuacin)
189
Tabla 6.1. Comparacin Correcciones T. Verticales (continuacin)
Memoria Software de Error
Variable Unidad
de Clculo Calibracin (%)
TS (F) 87.62500 87.62500 0.00
Kt (----) 1.000346 1.000346 0.00
V1c (bbl/plg) 209.369808 209.369808 0.00
V2c (bbl/plg) 209.493376 209.493376 0.00
Clculo 13
V3c (bbl/plg) 209.615651 209.615651 0.00
V4c (bbl/plg) 209.651785 209.651785 0.00
V5c (bbl/plg) 209.976221 209.976221 0.00
V6c (bbl/plg) 209.848186 209.848186 0.00
En la tabla 6.2 y 6.3 se comparan los resultados obtenidos del volumen muerto
de accesorios. La tabla del volumen muerto por accesorios es muy extensa por
lo cual se ha tomado arbitrariamente secciones de la tabla a fin de observar el
comportamiento de los resultados y validarlos.
190
Tabla 6.2. Comparacin Accesorios S.I. T. Verticales
(continuacin)
HOJAS EXCEL SOFTWARE
INCREMENTO ERROR
ACCESORIOS ACCESORIOS
(cm) (m3) (m3) (%)
5 0.001047 0.001055 -0.7566
181 -0.003210 -0.003191 0.5846
182 -0.003210 -0.003191 0.5846
183 -0.003210 -0.003191 0.5846
184 -0.003210 -0.003191 0.5846
185 -0.003210 -0.003191 0.5846
186 -0.003210 -0.003191 0.5846
187 -0.003210 -0.003191 0.5846
188 -0.003210 -0.003191 0.5846
189 -0.003210 -0.003191 0.5846
190 -0.003210 -0.003191 0.5846
191 -0.003210 -0.003191 0.5846
192 -0.003210 -0.003191 0.5846
193 -0.003210 -0.003191 0.5846
445 -0.000234 -0.000235 -0.0875
446 -0.000234 -0.000235 -0.0875
447 -0.000234 -0.000235 -0.0875
448 -0.000234 -0.000235 -0.0875
449 -0.000234 -0.000235 -0.0875
890 -0.000234 -0.000235 -0.0875
891 -0.000234 -0.000235 -0.0875
892 -0.000234 -0.000235 -0.0875
893 -0.000234 -0.000235 -0.0875
894 -0.000234 -0.000235 -0.0875
1282 -0.000234 -0.000235 -0.0875
1283 -0.000234 -0.000235 -0.0875
1284 -0.000234 -0.000235 -0.0875
1285 -0.000234 -0.000235 -0.0875
1286 -0.000234 -0.000235 -0.0875
1287 -0.000234 -0.000235 -0.0875
191
Tabla 6.3. Comparacin Accesorios S.A. T. Verticales
192
El tipo de fondo utilizado en el ejemplo es de tipo cnico hacia arriba (ver anexo
1) por lo que la comparacin del volumen muerto por el tipo de fondo se debe
realizar de en 2 partes: el volumen del fondo bajo la platina de aforo y sobre la
platina de aforo (ver tablas 6.4 y 6.5).
En las tablas 6.6 y 6.7 se comparan los valores obtenidos del volumen muerto
por el techo flotante, entre los resultados de la hoja de Excel con los del
software de calibracin. El techo flotante influye en el volumen del tanque entre
la altura crtica inferior y la altura critica superior.
193
Tabla 6.6. Comparacin V. Techo - S.I. (continuacin)
HOJAS EXCEL SOFTWARE
INCREMENTO ERROR
ACCESORIOS ACCESORIOS
(cm) (m3) (m3) (%)
184 -13.471011 -13.470592 0.0031
185 -13.471011 -13.470592 0.0031
186 -13.471011 -13.470592 0.0031
187 -13.471011 -13.470592 0.0031
188 -13.471011 -13.470592 0.0031
189 -13.471011 -13.470592 0.0031
190 -13.471011 -13.470592 0.0031
191 -13.471011 -13.470592 0.0031
192 -13.471011 -13.470592 0.0031
En las tablas 6.8 y 6.9 se presentan los resultados obtenidos mediante las
hojas de Excel, el software de calibracin y el porcentaje de error entre estos
valores para el sistema de medida internacional y americano respectivamente.
194
Tabla 6.8 Comparacin Volumen Total S.I. T. Verticales
195
Tabla 6.9 Comparacin Volumen Total S.A. T. Verticales
196
6.2. EVALUACIN DE RESULTADOS PARA TANQUES
HORIZONTALES
Los datos del tanque horizontal, las memorias de clculo y las hojas de Excel
utilizadas para la calibracin volumtrica se encuentran en el anexo1 y anexo 4
respectivamente.
197
6.2.2. VOLUMEN MUERTO
198
Tabla 6.12 Comparacin Incrementos Volumen Accesorios- SA
En las tablas 6.13 y 6.14 se presentan los resultados obtenidos mediante las
hojas de Excel, el software de calibracin y el porcentaje de error entre estos
valores para el sistema de medida internacional y americano respectivamente.
199
Tabla 6.13 Comparacin Volumen Total S.I. T. Horizontales
200
Tabla 6.14 Comparacin Volumen Total S.A. T. Horizontales
(continuacin)
HOJAS EXCEL SOFTWARE
INCREMENTO VOLUMEN VOLUMEN ERROR
TOTAL TOTAL
(plg) (galones) (galones) (%)
54 6197.6750307 6197.6598069 0.0002456
55 6349.4687678 6349.4531740 0.0002456
110 13656.8532051 13656.8203296 0.0002407
111 13735.7022886 13735.6692525 0.0002405
112 13810.3795551 13810.3463711 0.0002403
113 13880.5775986 13880.5442804 0.0002400
114 13945.9295048 13945.8960675 0.0002398
118 14147.3943888 14147.3613888 0.0002333
119 14177.2205530 14177.1868671 0.0002376
119.84 14190.3207052 14190.2871777 0.0002363
Los datos del tanque esfrico, las memorias de clculo y las hojas de Excel
utilizadas para la calibracin volumtrica se la pueden observar en el anexo1 y
anexo 5 respectivamente.
201
Tabla 6.15 Comparacin Correcciones T. Esfricos
En las tablas 6.16 y 6.17 se presentan los resultados obtenidos mediante las
hojas de Excel, el software de calibracin y el porcentaje de error entre estos
valores para el sistema de medida internacional y americano respectivamente.
202
Tabla 6.16 Comparacin Volumen Total S.I. T. Esfricos
(continuacin)
HOJAS EXCEL SOFTWARE
INCREMENTO VOLUMEN VOLUMEN ERROR
TOTAL TOTAL
(cm) (galones) (galones) (%)
35 576.620194 576.620145 0.000008
40 750.925301 750.925238 0.000008
45 947.591185 947.591105 0.000008
50 1166.410539 1166.410441 0.000008
1120 214259.285722 214259.268384 0.000008
1125 214427.432112 214427.414770 0.000008
1130 214572.953563 214572.936218 0.000008
1135 214695.642760 214695.625415 0.000008
1140 214795.292387 214795.275043 0.000008
1145 214871.695129 214871.677789 0.000008
1150 214924.643670 214924.626336 0.000008
1155 214953.930694 214953.913368 0.000008
203
Tabla 6.17 Comparacin Volumen Total S.A. T. Esfricos
(continuacin)
HOJAS EXCEL SOFTWARE
INCREMENTO VOLUMEN VOLUMEN ERROR
TOTAL TOTAL
(plg) (galones) (galones) (%)
452 214907.058417 214907.122431 -0.000030
456 214960.136656 214960.200707 -0.000030
456.15 214960.209975 214960.274027 -0.000030
204
CAPITULO 7
La expresin matemtica que nos permite calcular el valor actual neto es:
F9
VAN <9 ApC
Io Ecuacin 7.1
205
r: Tasa de descuento
Io: Inversin inicial
t: numero de periodos evaluados
Se define como la tasa de inters con la cual el valor actual neto es igual a
cero. Es un indicador de rentabilidad de un proyecto, a mayor TIR, mayor
rentabilidad.
F9
VAN <9 ApC
Io 0 Ecuacin 7.2
206
En la tabla 7.2 se puede interpretar el anlisis de rentabilidad mediante el TIR.
Valor Significado
TIR>tasa de descuento (r) ; VAN>0 Existe ganancia
TIR<tasa de descuento (r) ; VAN<0 Existe perdidas
TIR=tasa de descuento (r) ; VAN=0 No existe ganancia
207
Tabla 7.3 Interpretacin del Costo-Beneficio (continuacin)
Valor Significado
Se dice que por cada dlar de costos se obtiene menos de un
B/C<0
dlar de beneficio, por lo tanto el proyecto debe rechazarse.
Se dice que por cada dlar de costos no se obtiene nada de
B/C=0
ganancia ni prdidas
Descripcin Ao 1
Otros Activos
Programacin 1,000.00
Transporte 300.00
Total Otros Activos (b) 1,300.00
208
Los costos indicados en la tabla 7.4 nicamente corresponden a los gastos que
se realiz para elaboracin y diseo del software. No incluyen los gastos que
se requiere para el proceso de calibracin y de operacin del software.
Concepto Valor Ao 1 Ao 2 Ao 3 Ao 4 Ao 5
209
Los tanques calibrados por la empresa PETROAFIN S.A en el
periodo de un mes es de 4 y para el periodo de un ao es de 48.
En la tabla 7.6 se puede observar los valores que se tendr como ingreso luego
de realizar la calibracin de un nmero determinado de tanques en el periodo
de un ao.
En la tabla 7.7 se puede observar los valores que se requieren para realizar el
proceso de calibracin en el periodo de un mes, y posteriormente para el
periodo de un ao.
210
Tabla 7.7 Egreso Anual
211
7.3.2. INGRESOS Y EGRESOS DE LA EMPRESA CON LA
IMPLEMENTACIN DEL SOFTWARE
212
El tiempo requerido para la elaboracin de las tablas de
calibracin es aproximadamente de un da por cada tanque a ser
calibrado. Este tiempo vara en funcin de la capacidad, cantidad
y la complejidad de los accesorios internos que el tanque
presente.
En la tabla 7.8 se puede observar los valores que se tendr como ingreso luego
de realizar la calibracin de un nmero determinado de tanques en el periodo
de un ao mediante la implementacin del software de calibracin.
En la tabla 7.9 se puede observar los valores que se requieren para realizar el
proceso de calibracin en el periodo de un mes, y posteriormente para el
periodo de un ao.
213
Tabla 7.9 Egreso Anual
214
7.3.3. FLUJO DE CAJA DIFERENCIAL
El flujo de caja diferencial toma en cuenta el flujo de caja actual (Calibracin sin
implementar el software), con el flujo de caja propuesto (Calibracin con la
implementacin del software) para determinar la diferencia entre los dos
procesos y los beneficios que conlleva su realizacin.
Ao1 Ao 2 Ao 3 Ao 4 Ao 5
Origen de fondos
Aporte de inversin
INGRESOS TOTALES 50,800.00 50,800.00 50,800.00 50,800.00
Aplicacin de Fondos
Inversin total en activos
Gastos de Operacin 44,537.28 44,537.28 44,537.28 44,537.28
EGRESOS TOTALES 44,537.28 44,537.28 44,537.28 44,537.28
SALDO DE CAJA 6,262.72 6,262.72 6,262.72 6,262.72
SALDO DE CAJA ACUMULADO 6,262.72 12,525.44 18,788.16 25,050.88
Ao 1 Ao 2 Ao 3 Ao 4 Ao 5
Origen de fondos
Aporte de inversin 3,287.00
INGRESOS TOTALES 3,287.00 130,500.00 130,500.00 130,500.00 130,500.00
Aplicacin de Fondos
Inversin total en activos 3,287.00
Gastos de Operacin 94,397.52 94,397.52 94,397.52 94,397.52
EGRESOS TOTALES 3,287.00 94,397.52 94,397.52 94,397.52 94,397.52
SALDO DE CAJA 36,102.48 36,102.48 36,102.48 36,102.48
SALDO DE CAJA ACUMULADO 36,102.48 72,204.96 108,307.44 144,409.92
Elaboracin: Alberto Nez, Santiago Hidalgo
215
Tabla 7.12 Flujo de Caja Diferencial
Ao 1 Ao 2 Ao 3 Ao 4 Ao 5
Origen de fondos
Aporte de inversin 3,287.00
INGRESOS TOTALES 3,287.00
Aplicacin de Fondos
Inversin total en activos 3,287.00
Gastos de Operacin
-49,860.24 -49,860.24 -49,860.24 -49,860.24
EGRESOS TOTALES 3,287.00
-49,860.24 -49,860.24 -49,860.24 -49,860.24
SALDO DE CAJA
49,860.24 49,860.24 49,860.24 49,860.24
SALDO DE CAJA ACUMULADO
49,860.24 99,720.48 149,580.72 199,440.96
Elaboracin: Alberto Nez, Santiago Hidalgo
No se considera la inflacin
Tasa de descuento del 10%
La operacin inicia a partir del ao 2
El periodo de evaluacin se har a 5 aos
Los gastos de personal de oficina no se considera ya que se dar
uso al mismo personal
216
Tabla 7.13 Flujo neto de fondos
Ao 1 Ao 2 Ao 3 Ao 4 Ao 5
Inversin realizada
Inversin Total (-) (133,787.00)
Saldo neto de caja 49,860.24 49,860.24 49,860.24 49,860.24
Flujo neto de fondos (133,787.00) 49,860.24 49,860.24 49,860.24 49,860.24
Elaboracin: Alberto Nez, Santiago Hidalgo
7.4.1. RESULTADOS
VAN: El valor del proyecto en cinco aos y con una tasa de descuento del
10%, y llevados en valor presente nos da como resultado veinte cuatro mil
doscientos sesenta y tres dlares americanos, indicando que el proyecto es
viable.
217
CAPITULO 8
CONCLUSIONES Y RECOMENDACIONES
8.1. CONCLUSIONES
218
6. El diseo e implementacin del software de calibracin se hizo posible
gracias a las herramientas y objetos proporcionados por el programa C#
de Visual que facilitaron el desarrollo visual y lgico del software.
219
8.2. RECOMENDACIONES
220
BIBLIOGRAFA
221
API Standar 2552. Method for Measurement and Calibration of Spheres
Spheroids Tanks. First Edition 1987.
222
ANEXO 1
ACTAS DE REGISTRO
223
ACTA DE REGISTRO DE MEDIDAS DE CAMPO
TANQUES VERTICALES
224
225
226
ACTA DE REGISTRO DE MEDIDAS DE CAMPO TANQUES
HORIZONTALES
227
228
ACTA DE REGISTRO DE MEDIDAS DE CAMPO
TANQUES ESFRICOS
229
ANEXO 2
TABLAS PARA FACTOR Kh Y
Kc
230
TABLAS PARA DETERMINAR EL FACTOR KC DEL CILINDRO
231
232
233
234
235
TABLAS PARA DETERMINAR EL FACTOR KH DE LAS
CABEZAS
236
237
238
239
240
ANEXO 3
EJEMPLO DE CLCULOS
TANQUES VERTICALES
241
EJEMPLO DE CALIBRACIN
TANQUE VERTICAL
Propietario: PETROECUADOR
Locacin: Auca Central
Capacidad: 106000 barriles
Cdigo: ACT-01
Tipo de cuerpo: Lminas soldadas a tope
Tipo de techo: Flotante
Tipo de Fondo: Cnico hacia arriba
Producto almacenado: Crudo
242
CALIBRACION DE UN TANQUE VERTICAL DE ALMACENAMENTO SEGUN LA NORMA
API MPMS
Al 20% Al 80%
Espesores (pulgadas) .-
243
Anillo 3: h3 := ( 2175) FX = 85.629921 in
Soldadura (pulgadas) .-
NUMERO ANCHO
Anillo 2: N2 := 17 ESPESOR
Anillo 3: N3 := 17 es := ( 3) FX = 0.11811 in
Anillo 4: N4 := 17
Anillo 5: N5 := 17
Anillo 6: N6 := 17
Otros datos .-
CLCULOS:
b1 100.0026
X := = 421.543112 ft
100
244
Factor de correccin : fc := 1 ( gc ce) = 0.999884
JUNTAS SOLDADAS
BUTT STRAPS:
2N t W + 8N t t 12
d 3 d
2 N1 es Ws + 8 N1 es es 12 = 3.947121 10 3
Anillo 1: cc1 := ft
dn 3 dn
2 N2 es Ws + 8 N2 es es 12 = 3.947121 10 3
Anillo 2: cc2 := ft
dn 3 dn
2 N3 es Ws 8 N3 es es 3
Anillo 3: cc3 := + 12 = 3.947121 10 ft
dn 3 dn
2 N4 es Ws 8 N4 es es 3
Anillo 4: cc4 := + 12 = 3.947121 10 ft
dn 3 dn
2 N5 es Ws 8 N5 es es 3
Anillo 5: cc5 := + 12 = 3.947121 10 ft
dn 3 dn
2 N6 es Ws + 8 N6 es es 12 = 3.947121 10 3
Anillo 6: cc6 := ft
dn 3 dn
2
Wh C
2 E t
245
Mdulo de elasticidad del acero: E := 29000000 psi
Circunferencia medida (pies) - correccin de cinta 60 : C = C.. - c60
Espesor de la lamina (pulgadas) : t
Columna hidrosttica por encima de la altura medida (pies) : h
W 8
k := = 2.849239 10
24 E
hL h1 0.20 ( a1 c60) 2
Anillo 1: 20 % cv1a := k
12 = 0.207133 ft
t1
hL h1 0.80 ( b1 c60) 2
80 % cv1b := k
12 = 0.175513 ft
t1
hL h1 + h2 0.20 ( a2 c60) 2
Anillo 2: 20 % cv2a := k
12 = 0.355896 ft
t2
hL h1 + h2 0.80 ( b2 c60) 2
80 % cv2b := k
12 = 0.277694 ft
t2
hL h1 + h2 + h3 0.20 ( a3 c60) 2
Anillo 3: 20 % cv3a := k
12 = 0.130408 ft
t3
hL h1 + h2 + h3 0.80 ( b3 c60) 2
80 % cv3b := k
12 = 0.085207 ft
t3
hL h1 + h2 + h3 + h4 0.20 ( a4 c60) 2
Anillo 4: 20 % cv4a := k
12 = 0.073545 ft
t4
hL h1 + h2 + h3 + h4 0.80 ( b4 c60) 2
80 % cv4b := k
12 = 0.01357 ft
t4
hL h1 + h2 + h3 + h4 + h5 0.20 ( a5 c60) 2
Anillo 5: 20 % cv5a := k
12 = 0.027083 ft
t5
246
hL h1 + h2 + h3 + h4 + h5 0.80 ( b5 c60) 2
80 % cv5b := k
12 = 0.088349 ft
t5
hL h1 + h2 + h3 + h4 + h5 + h6 0.20 ( a6 c60) 2
Anillo 6: 20 % cv6a := k
12 = 0.136766 ft
t6
hL h1 + h2 + h3 + h4 + h5 + h6 0.80 ( b6 c60) 2
80 % cv6b := k
12 = 0.201888 ft
t6
t1
Anillo 1: ct1 := = 0.336113 ft
6
t2
Anillo 2: ct2 := = 0.145123 ft
6
t3
Anillo 3: ct3 := = 0.250977 ft
6
t4
Anillo 4: ct4 := = 0.188104 ft
6
t5
Anillo 5: ct5 := = 0.183157 ft
6
t6
Anillo 6: ct6 := = 0.173159 ft
6
247
Anillo 4: 20 % Cc4a := a4 c60 cc4 cv4a ct4 = 420.956265 ft
80 % Cc4b := b4 c60 cc4 cv4b ct4 = 420.960466 ft
2
SG h C
k
t
141.5
SG := = 0.911727
API + 131.5
2
SG ( h1 h1 0.20) ( Cc1a )
Anillo 1: 20 % cs1a := k = 0.038402 ft
t1 12
2
SG ( h1 h1 0.80) ( Cc1b) 3
80 % cs1b := k = 9.604719 10 ft
t1 12
2
SG ( h2 h2 0.20) ( Cc2a )
Anillo 2: 20 % cs2a := k = 0.094806 ft
t2 12
2
SG ( h2 h2 0.80) ( Cc2b)
80 % cs2b := k = 0.023708 ft
t2 12
2
SG ( h3 h3 0.20) ( Cc3a )
Anillo 3: 20 % cs3a := k = 0.054833 ft
t3 12
2
SG ( h3 h3 0.80) ( Cc3b)
80 % cs3b := k = 0.013709 ft
t3 12
2
SG ( h4 h4 0.20) ( Cc4a )
Anillo 4: 20 % cs4a := k = 0.072812 ft
t4 12
2
SG ( h4 h4 0.80) ( Cc4b)
80 % cs4b := k = 0.018203 ft
t4 12
248
2
SG ( h5 h5 0.20) ( Cc5a)
Anillo 5: 20 % cs5a := k = 0.074626 ft
t5 12
2
SG ( h5 h5 0.80) ( Cc5b)
80 % cs5b := k = 0.018619 ft
t5 12
2
SG ( h6 h6 0.20) ( Cc6a)
Anillo 6: 20 % cs6a := k = 0.079101 ft
t6 12
2
SG ( h6 h6 0.80) ( Cc6b)
80 % cs6b := k = 0.019775 ft
t6 12
Ce1a + Ce1b
Prom. Ce1 := = 420.955623 ft
2
Ce2a + Ce2b
Prom. Ce2 := = 421.031788 ft
2
Ce3a + Ce3b
Prom. Ce3 := = 421.036117 ft
2
Ce4a + Ce4b
Prom. Ce4 := = 421.003873 ft
2
Ce5a + Ce5b
Prom. Ce5 := = 421.23886 ft
2
249
Anillo 6: 20 % Ce6a := Cc6a + cs6a = 421.048397 ft
80 % Ce6b := Cc6b + cs6b = 420.98579 ft
Ce6a + Ce6b
Prom. Ce6 := = 421.017094 ft
2
in3
Factor de conversion (FC): FC := 9702
bbl
Anillo 1: Ce1
r1 := 12 = 803.966019 in
2
2
r1 bbl
v1 := = 209.297474
FC in
Anillo 2: Ce2
r2 := 12 = 804.111484 in
2
2
r2 bbl
v2 := = 209.373219
FC in
Anillo 3: Ce3
r3 := 12 = 804.119751 in
2
2
r3 bbl
v3 := = 209.377525
FC in
Anillo 4: Ce4
r4 := 12 = 804.05817 in
2
2
r4 bbl
v4 := = 209.345457
FC in
Anillo 5: Ce5
r5 := 12 = 804.506962 in
2
2
r5 bbl
v5 := = 209.579218
FC in
250
Anillo 6: Ce6
r6 := 12 = 804.083419 in
2
2
r6 bbl
v6 := = 209.358605
FC in
10. Incremento del volumen por anillo y por cada pulgada de liquido sobre el anillo.-
3
W SG d h
4 E t
3
W SG d
Kt := = 3.703288
4 E
Kt h1 bbl
Anillo 1: v1 := = 0.04778
FC t1 in
Kt h2 bbl
Anillo 2: v2 := = 0.117927
FC t2 in
Kt h3 bbl
Anillo 3: v3 := = 0.068189
FC t3 in
Kt h4 bbl
Anillo 4: v4 := = 0.090563
FC t4 in
Kt h5 bbl
Anillo 5: v5 := = 0.092623
FC t5 in
Kt h6 bbl
Anillo 6: v6 := = 0.09838
FC t6 in
251
Correccin del incremento de volumen
Anillo 1: V1 := 0
bbl
Anillo 2: V2 := v1 = 0.04778
in
bbl
Anillo 3: V3 := v1 + v2 = 0.165707
in
bbl
Anillo 4: V4 := v1 + v2 + v3 = 0.233896
in
bbl
Anillo 5: V5 := v1 + v2 + v3 + v4 = 0.32446
in
bbl
Anillo 5: V6 := v1 + v2 + v3 + v4 + v5 = 0.417082
in
bbl
Anillo 1: V1 := v1 + V1 = 209.297474
in
bbl
Anillo 2: V2 := v2 + V2 = 209.421
in
bbl
Anillo 3: V3 := v3 + V3 = 209.543232
in
bbl
Anillo 4: V4 := v4 + V4 = 209.579353
in
bbl
Anillo 5: V5 := v5 + V5 = 209.903678
in
bbl
Anillo 5: V6 := v6 + V6 = 209.775687
in
( 7 tl + tm)
Para tanques metlicos TS := = 87.625 F
no aislados 8
252
6 9 2
Kt := 1 + 12.4 10 ( TS 60) + 4 10 ( TS 60)
Kt = 1.000346
bbl
Anillo 1: V1c := Kt V1 = 209.369808
in Como se
bbl
Anillo 2: V2c := Kt V2 = 209.493376
puede observar la memoria de clculo nos da como in resultado final
bbl
Anillo 3: V3c := Kt V3 = 209.615651
in
los valores de V1c, V2c, V3c, V4c, V5c y V6c que son los
bbl
Anillo 4: V4c := Kt V4 = 209.651785
incrementos de volumen en barriles por pulgada de in cada anillo.
bbl
Anillo 5: V5c := Kt V5 = 209.976221
in
Estos incrementos sern utilizados en la Hoja de Excel para la
bbl
Anillo 6: V6c := Kt V6 = 209.848186
in
realizacin de la tabla de calibracin.
253
Tabla 1. Tabla de Calibracin - SI
Incremento INCLINACIN VOLUMENES MUERTOS (bbl) VOLUMEN VOLUMEN
V1
ALTURA (cm) V. (bbl/cm) (bbl) (bbl) ACCESORIOS FONDO TECHO TOTAL TOTAL (bbl) TOTAL (m3)
0 0.0000 0.0000 0.0000 0.088248007 617.9329436 618.021192 618.021 98.258
1 78.1334 78.1334 78.1339 0.006585672 618.027777 696.162 110.681
2 79.9644 158.0978 158.0987 0.006585672 618.034363 776.133 123.395
3 81.2867 239.3845 239.3858 0.006585672 618.040949 857.427 136.320
4 82.1001 321.4846 321.4864 0.006585672 618.047534 939.534 149.374
5 82.4107 403.8954 403.8976 0.006585672 618.05412 1021.952 162.477
179 82.4291 14746.5515 14746.6337 -0.020187203 621.559904 15368.194 2443.348
180 82.4291 14828.9806 14829.0632 -0.020187203 621.539717 15450.603 2456.450
181 82.4291 14911.4096 14911.4928 -0.020187203 -84.7301093 536.789421 15448.282 2456.081
182 82.4291 14993.8387 14993.9223 -0.020187203 -84.7301093 452.039124 15445.961 2455.712
183 82.4291 15076.2677 15076.3518 -0.020187203 -84.7301093 367.288828 15443.641 2455.343
184 82.4291 15158.6968 15158.7813 -0.020187203 -84.7301093 282.538531 15441.320 2454.974
185 82.4291 15241.1259 15241.2108 -0.020187203 -84.7301093 197.788235 15438.999 2454.605
186 82.4291 15323.5549 15323.6403 -0.020187203 -84.7301093 113.037938 15436.678 2454.236
187 82.4291 15405.9840 15406.0699 -0.020187203 -84.7301093 28.2876417 15434.358 2453.867
188 82.4291 15488.4130 15488.4994 -0.020187203 -84.7301093 -56.462655 15432.037 2453.498
189 82.4291 15570.8421 15570.9289 -0.020187203 -84.7301093 -141.21295 15429.716 2453.129
190 82.4291 15653.2711 15653.3584 -0.020187203 -84.7301093 -225.96325 15427.395 2452.760
191 82.4291 15735.7002 15735.7879 -0,020187203 -84.7301093 -310.71354 15425.074 2452.391
192 82.4291 15818.1293 15818.2175 -0.020187203 -84.7301093 -395.46384 15422.754 2452.022
193 82.4291 15900.5583 15900.6470 -0.020187203 -395.48403 15505.163 2465.124
194 82.4291 15982.9874 15983.0765 -0.020187203 -395.50422 15587.572 2478.226
195 82.4291 16065.4164 16065.5060 -0.020187203 -395.5244 15669.982 2491.328
196 82.4291 16147.8455 16147.9355 -0.020187203 -395.54459 15752.391 2504.430
254
201 82.4291 16559.9908 16560.0831 -0.020187203 -395.64553 16164.438 2569.940
202 82.4291 16642.4198 16642.5126 -0.020187203 -395.66571 16246.847 2583.042
203 82.4291 16724.8489 16724.9421 -0.020187203 -395.6859 16329.256 2596.144
204 82.4291 16807.2780 16807.3717 -0.020187203 -395.70609 16411.666 2609.246
205 82.4777 16889.7557 16889.8498 -0.020187203 -395.72627 16494.124 2622.356
206 82.4777 16972.2334 16972.3280 -0.020187203 -395.74646 16576.582 2635.466
207 82.4777 17054.7111 17054.8062 -0.020187203 -395.76665 16659.040 2648.576
208 82.4777 17137.1888 17137.2843 -0.020187203 -395.78684 16741.497 2661.685
409 82.4777 33715.2079 33715.3959 -0.001474445 -397.43252 33317.963 5297.133
410 82.4777 33797.6856 33797.8741 -0.001474445 -397.43399 33400.440 5310.246
413 82.4777 34045.1187 34045.3086 -0.001474445 -397.43842 33647.870 5349.584
419 82.4777 34539.9850 34540.1776 -0.001474445 -397.44726 34142.730 5428.260
420 82.4777 34622.4627 34622.6557 -0.001474445 -397.44874 34225.207 5441.373
421 82.4777 34704.9404 34705.1339 -0.001474445 -397.45021 34307.684 5454.486
422 82.4777 34787.4181 34787.6121 -0.001474445 -397.45169 34390.160 5467.599
423 82.5258 34869.9440 34870.1384 -0.001474445 -397.45316 34472.685 5480.719
424 82.5258 34952.4698 34952.6647 -0.001474445 -397.45464 34555.210 5493.839
425 82.5258 35034.9956 35035.1910 -0.001474445 -397.45611 34637.735 5506.960
426 82.5258 35117.5215 35117.7173 -0.001474445 -397.45759 34720.260 5520.080
427 82.5258 35200.0473 35200.2436 -0.001474445 -397.45906 34802.785 5533.201
634 82.5258 52282.8976 52283.1891 -0.001474445 -397.76427 51885.425 8249.123
635 82.5258 52365.4235 52365.7154 -0.001474445 -397.76574 51967.950 8262.244
636 82.5258 52447.9493 52448.2417 -0.001474445 -397.76722 52050.475 8275.364
637 82.5258 52530.4752 52530.7681 -0.001474445 -397.76869 52132.999 8288.485
638 82.5258 52613.0010 52613.2944 -0.001474445 -397.77017 52215.524 8301.605
639 82.5258 52695.5269 52695.8207 -0.001474445 -397.77164 52298.049 8314.725
640 82.5401 52778.0669 52778.3612 -0.001474445 -397.77312 52380.588 8327.848
255
641 82.5401 52860.6070 52860.9017 -0.001474445 -397.77459 52463.127 8340.971
642 82.5401 52943.1471 52943.4423 -0.001474445 -397.77607 52545.666 8354.093
643 82.5401 53025.6872 53025.9828 -0.001474445 -397.77754 52628.205 8367.216
644 82.5401 53108.2272 53108.5233 -0.001474445 -397.77901 52710.744 8380.339
645 82.5401 53190.7673 53191.0639 -0.001474445 -397.78049 52793.283 8393.461
855 82.5401 70524.1826 70524.5758 -0.001474445 -398.09012 70126.486 11149.220
856 82.5401 70606.7227 70607.1163 -0.001474445 -398.0916 70209.025 11162.343
857 82.6678 70689.3905 70689.7846 -0.001474445 -398.09307 70291.692 11175.486
858 82.6678 70772.0583 70772.4529 -0.001474445 -398.09455 70374.358 11188.629
859 82.6678 70854.7261 70855.1211 -0.001474445 -398.09602 70457.025 11201.772
860 82.6678 70937.3939 70937.7894 -0.001474445 -398.09749 70539.692 11214.915
1060 82.6678 87470.9546 87471.4423 -0.001474445 -398.39238 87073.050 13843.509
1061 82.6678 87553.6224 87554.1105 -0.001474445 -398.39386 87155.717 13856.652
1071 82.6678 88380.3004 88380.7932 -0.001474445 -398.4086 87982.385 13988.081
1072 82.6174 88462.9178 88463.4111 -0.001474445 -398.41008 88065.001 14001.216
1073 82.6174 88545.5352 88546.0289 -0.001474445 -398.41155 88147.617 14014.351
1074 82.6174 88628.1526 88628.6468 -0.001474445 -398.41303 88230.234 14027.486
1075 82.6174 88710.7700 88711.2646 -0.001474445 -398.4145 88312.850 14040.621
1076 82.6174 88793.3874 88793.8825 -0.001474445 -398.41597 88395.467 14053.756
1077 82.6174 88876.0048 88876.5003 -0.001474445 -398.41745 88478.083 14066.891
1078 82.6174 88958.6222 88959.1182 -0.001474445 -398.41892 88560.699 14080.026
1284 82.6174 105977.8058 105978.3967 -0.001474445 -398.72266 105579.674 16785.827
1285 82.6174 106060.4232 106061.0145 -0.001474445 -398.72413 105662.290 16798.962
1286 82.6174 106143.0406 106143.6324 -0.001474445 -398.72561 105744.907 16812.097
1287 82.6174 106225.6580 106226.2502 -0.001474445 -398.72708 105827.523 16825.232
1288 82.6174 106308.2754 106308.8681 -0.001474445 -398.72856 105910.140 16838.367
256
Para la obtencion de las diferentes columnas que forman la tabla se realizo de la
siguiente manera:.
1. Columna Altura
Los valores en la columna Altura van desde 0 hasta la altura total del
tanque. Su incremento es definido por el cliente. En este caso el incremento
es de 1 cm y va aumentando la altura de 1 en 1 hasta llegar a su altura
total.
2. Columna Incremento V
257
Anillo 1: de 0 a 204 el incremento V es igual a V1c con el valor de
82.4290583.
Anillo 2: de 204 a 422 el incremento V es igual a V2c con el valor de
82.4777071.
Anillo 3: de 0 a 204 el incremento V es igual a V3c con el valor de
82.5258469.
Anillo 4: de 204 a 422 el incremento V es igual a V4c con el valor de
82.5400728.
Anillo 5: de 0 a 204 el incremento V es igual a V5c con el valor de
82.6678035.
Anillo 6: de 204 a 422 el incremento V es igual a V6c con el valor de
82.6172961.
3. Columna V1
1AC dAC ? 1A 1C
258
4. Columna Inclinacin
a) Relacin m.
ab]eabv]ab c`e vbf`
vef_v ^ve c`e vbf`
43
12877
0.003339287
% 100 1 ? 0.003339287K 1
% 0.00055754
%
ab]e. AC 1A C D 1 ?
100
%
ab]e. A180C V1A180C D 1 ?
100
0.00055754
ab]e. A180C 14828,9806 D 1 ?
100
ab]e. A180C 14829,0632
%
ab]e. A850C V1A850C D 1 ?
100
0.00055754
ab]e. A850C 70111,4822 D 1 ?
100
259
ab]e. A850C 70111,8731
En la Tabla 3 la celdas pintadas son los datos que se deben ingresar para
obtener el incremento de cada accesorio.
260
ef_v vwv
`wc`
^e
b]_``b^]] D b]_``b^
ef_v
vAC b]_``b^]]AC
261
Los tipos de fondo mas comunes son: planos, conico hacia abajo y conico
hacia arriba.
D _1K D v.
158987,294938922
D _1K D ]^b^.
3 D 158987,294938922
262
D _1K D v.
d. ]aeabc_^
158987,294938922
D _1K D ]^b^.
d. ]^b^
3 D 158987,294938922
d. ]aeabc_^ d. ]^b^
D _1K KC
v.V
d. ]^b^_fb D Av D ]^b^
A]^b^ D v KC
?
]^b^ K D 158987,2 3
263
D _1K D v.
d. ]aeabc_^
158987,294938922
d. ]aeabc_^ d. ]^b^_fb
Para el clculo del volumen muerto por techo flotante primero se debe
encontrar el volumen desplazado por el techo de la siguiente forma:
c
e D 42
324913
c
7.60850524 D 42
c 1016.76131
264
Una vez obtenido el volumen desplazado por el techo, que ser la cantidad
de fluido que se restara al volumen del tanque; se debe calcular el
decremento que es el volumen que se disminuir a cada centmetro, medio
centmetro, pulgada, media pulgada, etc. segn como se vaya a presentar
la tabla de calibracin.
c
AC D b]_``b^
wf.
ab.
1016.76131
A190C D1
205.4
193.4
A190C
84.7301093
El valor Vt(x) solo se usa cuando hay techo flotante y solo entre la altura
critica superior e inferior.
A C vAC ? ? AC ? A 1C
265
A0C vA0C ? A0C ? A0C ? A0C
A0C 0.088248007 ? 617.9329436 ? 0 ? 0
A0C 618.021192
zze AC AC ? ab]e. AC
266
10. Columna Volumen Total (m3)
267
ANEXO 4
EJEMPLO DE CLCULOS
TANQUES HORIZONTALES
268
EJEMPLO DE CALIBRACIN
TANQUE HORIZONTAL
Propietario PETROECUADOR
Locacin Refinera
Capacidad 14000 galones
Cdigo H-006
Tipo de cuerpo Lminas soldadas a tope
Tipo de cabeza Torriesfrica
Producto almacenado Gasolina
Los datos requeridos para la calibracin volumtrica del tanque de cdigo H-006
se muestran en el Anexo 1.
Con toda la informacin que se indica en el Acta de registro se procede a llenar los
datos requeridos en las memorias de clculo creada para este tipo de tanque para
posteriormente obtener el volumen total y el modelo matemtico. Todos los
clculos y el procedimiento realizado en MathCad se lo indican a continuacin.
269
CALIBRACIN DE TANQUES HORIZONTALES LMINAS SUPERPUESTAS
Circunferencias
20% 80%
Otros Datos
Temp. Ambiente Ta = 75 F
Inclinacin m = 0.08 %
Datos de la junta
# de juntas Nj := 2
Espesor T := ( 3) FY = 0.11811 in
Cabeza torriesferica
r1 = 10 ft
r2 = 1.496063 in
2 E 2 E 2 E
Lanillo1 := L1 Lanillo2 := L2 + Lanillo3 := L3
12 12 12
Lc := Lanillos
( a1 + b1 ) ( a2 + b2 ) ( a3 + b3 )
Panillo1 := Lanillo1 Panillo2 := Lanillo2 Panillo3 := Lanillo3
2 2 2
Panillos
C := = 31.531237 ft
Lanillos
271
C 2 ec
d := = 9.984211 ft Dimetro de 10 ft ( 9.5 < d < 10.5 )
12
6 Pt d 4
F := = 1.616693 10 psi F < 17000
ec
F 8000
:= + 0.0073
1168831
= 0.014287 ft >0
P1 := C
P2 := C +
P1 + P2 4 Nj T T
P :=
2 36 2 dn
P = 31.537797 ft
P 2 ec
D :=
12
D = 9.986299 ft
( a1 + b3 ) 2 ( eh + ec )
D1 :=
2 12
D1 = 9.937161 ft
B := 6 ( B1 + B2) in
272
Volumen del cilindro Volumen de la parte cilndrica de las cabezas
2 Lc 2 2 B
V1 := D ft3 V2 := D1 ft3
4 12 4
Vc := ( V1 + V2) FC gal
4
Vc = 1.333268 10 gal
r2 D1
BF := r1 EB := GC :=
12 2
EF := BF EB EC := EB AF := BF
GE := GC EC
2 2
GF := EF GE
EB GF
HG :=
EF
HF := GF + HG
2 2
HB := BF HF
AH := AF HF
AG := AH + HG
273
:= asin
HG
EB
2 2 HG
3
2 2 2
Vk := GE HG + EB HG + GE HG EB HG + GE EB FC
3
Vk = 62.565274 gal
Vs :=
( 2
AH 3 HB + AH FC
2 )
6
Vs = 371.780553 gal
Vh := 2 ( Vk + Vs)
Vh = 868.691655 gal
VT := Vc + Vh
4
VT = 1.420137 10 gal
D
Radio del cilindro principal Ri := = 4.993149 ft
2
Incremento y := 2 Ri ft
D D1 ft
:=
2742
y Ri ( y Ri) Ri ( y Ri)
2 2
2 B
Vc1 := Ri asin Lc +
2
+ + FC
Ri 2 2 12
Ri
4
Vc1 = 1.336174 10 gal
9 2 y
3
Vh2 := ( Ri ) y
40 3
c) Volumen total terico del tanque Volumen total prctico del tanque
4 4
VT1 = 1.422645 10 gal VT = 1.420137 10 gal
VT
U := = 0.998238
VT1
UNIDADES ( in-gal)
Ri := Ri 12 = 59.917794 in := 12 = 0.294827 in
gal
Lc := Lc 12 = 213.031496 in FG := 0.0043290043
3
in
B := B = 30.314961 in y := ( 2.Ri) in
y Ri
2
( y Ri) Ri ( y Ri)
2
3
Vy := Ri asin U FG
2 9 2 y
+ + ( Lc + 2 B) + ( Ri ) y
Ri 2 2 40 3
Ri
4
Vy = 1.420137 10 gal
275
Tabla 1. Pocedimiento para determinar el volumen de tanque horizontal con incrementos a cada pulgada.
276
23 1874.227515 0.19192964 0.00101595 0.00098469 1874.24597 1872.746574 -0.4826 1872.263974
24 1993.633546 0.20027441 0.00101686 0.00098557 1993.65319 1992.058272 -0.4826 1991.575672
25 2115.028867 0.20861918 0.00101779 0.00098648 2115.04973 2113.357691 -0.4826 2112.875091
26 2238.332102 0.21696394 0.00101877 0.00098743 2238.3542 2236.56352 -0.4826 2236.08092
27 2363.465132 0.22530871 0.00101982 0.00098845 2363.48849 2361.597703 -0.4826 2361.115103
28 2490.352785 0.23365348 0.00102097 0.00098955 2490.37743 2488.385127 -0.4826 2487.902527
29 2618.922558 0.24199824 0.00102222 0.00099077 2618.94851 2616.853347 -0.4826 2616.370747
30 2749.104378 0.25034301 0.00102359 0.0009921 2749.13165 2746.932347 -0.4826 2746.449747
100 12694.50596 0.83447671 0.00137916 0.00133673 12694.6757 12684.51991 0 12684.51991
101 12804.51887 0.84282147 0.00139337 0.0013505 12804.6918 12794.44804 0 12794.44804
102 12912.05066 0.85116624 0.00140874 0.00136539 12912.227 12901.89718 0 12901.89718
103 13016.98936 0.85951101 0.00142534 0.00138149 13017.1692 13006.75546 0 13006.75546
104 13119.21535 0.86785577 0.00144329 0.00139888 13119.3989 13108.90335 0 13108.90335
105 13218.60018 0.87620054 0.00146268 0.00141768 13218.7876 13208.21255 0 13208.21255
106 13315.00517 0.88454531 0.00148362 0.00143797 13315.1966 13304.54448 0 13304.54448
107 13408.27955 0.89289007 0.00150621 0.00145987 13408.4753 13397.74852 0 13397.74852
108 13498.25821 0.90123484 0.00153058 0.00148349 13498.4585 13487.65969 0 13487.65969
109 13584.75872 0.90957961 0.00155684 0.00150894 13584.9637 13574.09573 0 13574.09573
110 13667.57745 0.91792438 0.00158511 0.00153634 13667.7874 13656.85321 0 13656.85321
111 13746.4844 0.92626914 0.00161552 0.00156582 13746.6996 13735.70229 0 13735.70229
112 13821.21591 0.93461391 0.00164822 0.0015975 13821.4367 13810.37956 0 13810.37956
113 13891.46431 0.94295868 0.00168332 0.00163153 13891.691 13880.5776 0 13880.5776
114 13956.86238 0.95130344 0.00172099 0.00166804 13957.0952 13945.9295 0 13945.9295
115 14016.95873 0.95964821 0.00176137 0.00170718 14017.198 14005.98426 0 14005.98426
116 14071.17588 0.96799298 0.00180461 0.00174909 14071.422 14060.16486 0 14060.16486
117 14118.73103 0.97633775 0.00185088 0.00179393 14118.9843 14107.68912 0 14107.68912
118 14158.46059 0.98468251 0.00190034 0.00184187 14158.7214 14147.39439 0 14147.39439
119.83558 14201.40676 1 0.002 0.00193846 14201.6821 14190.32071 0 14190.32071
277
Ejemplo de calculos:
11. Incremento
12. Obtencin de V1
y Ri
2
( y Ri) Ri ( y Ri)
2
3
Vy := Ri asin U FG
2 9 2 y
+ + ( Lc + 2 B) + ( Ri ) y
Ri 2 2 40 3
Ri
Donde:
y= es el incremento (in)
Ri= es el radio interno (in)
Lc= longitud del cilindro principal (in)
B= longitud de la parte cilindrica de las cabezas (in)
= dieferencia de diametros (in)
U= factor de correccion del volumen
FG= factor de convercin (0.0043290043 gal/in3)
278
13. Correccin por temperatura
d) Relacin R=H/D
Se divide cada incremento para el dimetro del tanque.
e) Factor k
Se remplasa el valor de R en la siguiente funcin que representa el
factor de correcin por volumen.
k 0.0181R
0.0401R ? 0.0324RV
0.0111RK ? 0.0018R ? 0.0009
f) Porcentaje de correccin
Con la temperatura de opercin determinmos el coeficiente de dilatacin
linela medinte la siguiente tabla.
279
AnDT7pT4C nDU}pnU
Ts 79.75
U U
Vt V1A1 ? %C
280
Para ingresar en la grafica y obtener el porcentaje de inclinacin m se
requiere de la relacin H/D y E/D. La funcin que realiza la correccin por
la inclinacin es la siguiente.
m
Vci Vi ? D Vi
100
281
50 150 100 -17 -0.17
150 200 50 -52 -1.04
^e
b]_``b^]] D b]_``b^
ef_v
282
ANEXO 5
EJEMPLO DE CLCULOS
TANQUES ESFRICOS
283
EJEMPLO DE CALIBRACIN
TANQUE ESFRICO
___________________________________________________________________________
Propietario PETROECUADOR
Cdigo E-001
.
PROCEDIMIENTO TRADICIONAL (MEMORIAS DE CLCULO Y HOJAS EN
EXCEL)
Los datos requeridos para la calibracin volumtrica del tanque de cdigo E-001
se muestran en el Anexo 1.
Con toda la informacin que se indica en el Acta de registro se procede a llenar los
datos requeridos en las memorias de clculo creada para este tipo de tanque para
posteriormente obtener el volumen total y el modelo matemtico. Todos los
clculos y el procedimiento realizado en MathCad se lo indican a continuacin.
284
gal 1 ft 1 in
FC := 7.48051948 FX := FY :=
ft3 304.8 mm 25.4 mm
___________________________________________________________________________
Circunferencias
Espesores
e2 := ( 18) FY = 0.708661 in
e3 := ( 18) FY = 0.708661 in
Datos Generales
Temperatura ambiente Ta := 75 F
2
Co :=
2
C1 + 2 H
12
Co = 119.792961 ft
285
2. Clculo de las circunferencias Internas
e1
C1i := Co C1i = 119.401293 ft
6
e2
C2i := C2 C2i = 119.389444 ft
6
e3
C3i := C3 C3i = 119.369759 ft
6
3. Dimetro vertical
2
Dm + 4
2 ma
D :=
12
D = 38.012588 ft
4. Volumen de la Esfera
5
VT = 2.149562 10 gal
a) Volumen de la esfera
D
Radio de la esfera Ri := = 19.006294 ft
2
Incremento y := 2 Ri ft
2 y
3
VT1 := Ri y FC
3
5
VT1 = 2.151358 10 286 gal
b) Volumen total terico del tanque Volumen total prctico del tanque
5 5
VT1 = 2.151358 10 gal VT = 2.149562 10 gal
VT
U := = 0.999165
VT1
UNIDADES ( in-gal)
gal
Ri := Ri 12 = 228.075529 in FG := 0.0043290043
3
in
y := 2 Ri in
2 y
3
Vy := Ri y U FG
3
5
Vy = 2.149562 10 gal
287
Tabla 1. Pocedimiento para determinar el volumen de tanque esfrico con
incrementos a cada 5 centimetros.
0 0 0 0.00065 0.00063 0 0
5 11.97499096 0.00431547 0.00065111 0.00063107 11.9750665 11.9750665
10 47.76175914 0.00863093 0.00065226 0.00063219 47.7620611 47.7620611
15 107.1529975 0.0129464 0.00065347 0.00063337 107.153676 107.153676
20 189.941399 0.01726186 0.00065473 0.00063459 189.942604 189.942604
25 295.9196567 0.02157733 0.00065604 0.00063586 295.921538 295.921538
30 424.8804634 0.02589279 0.0006574 0.00063717 424.883171 424.883171
35 576.6165121 0.03020826 0.00065881 0.00063853 576.620194 576.620194
40 750.9204959 0.03452372 0.00066026 0.00063994 750.925301 750.925301
45 947.5851077 0.03883919 0.00066175 0.00064139 947.591185 947.591185
50 1166.40304 0.04315465 0.0006633 0.00064289 1166.41054 1166.41054
55 1407.166987 0.04747012 0.00066488 0.00064442 1407.17605 1407.17605
60 1669.66964 0.05178558 0.00066651 0.000646 1669.68043 1669.68043
65 1953.703694 0.05610105 0.00066818 0.00064762 1953.71635 1953.71635
70 2259.06184 0.06041651 0.00066989 0.00064927 2259.07651 2259.07651
75 2585.536771 0.06473198 0.00067164 0.00065097 2585.5536 2585.5536
80 2932.921182 0.06904744 0.00067343 0.0006527 2932.94033 2932.94033
85 3301.007764 0.07336291 0.00067525 0.00065448 3301.02937 3301.02937
90 3689.589211 0.07767837 0.00067712 0.00065628 3689.61343 3689.61343
95 4098.458216 0.08199384 0.00067902 0.00065812 4098.48519 4098.48519
100 4527.407471 0.0863093 0.00068095 0.00066 4527.43735 4527.43735
800 165922.6752 0.6904744 0.00118795 0.0011514 165924.586 165924.586
805 167107.5891 0.69478987 0.00119427 0.00115752 167109.523 167109.523
810 168283.1455 0.69910533 0.00120067 0.00116373 168285.104 168285.104
815 169449.1374 0.7034208 0.00120715 0.00117 169451.12 169451.12
820 170605.3573 0.70773626 0.00121371 0.00117636 170607.364 170607.364
825 171751.5979 0.71205173 0.00122035 0.0011828 171753.629 171753.629
830 172887.6519 0.71636719 0.00122708 0.00118932 172889.708 172889.708
835 174013.3121 0.72068266 0.00123389 0.00119593 174015.393 174015.393
840 175128.371 0.72499812 0.00124079 0.00120262 175130.477 175130.477
845 176232.6215 0.72931359 0.00124778 0.00120939 176234.753 176234.753
850 177325.8561 0.73362905 0.00125487 0.00121625 177328.013 177328.013
855 178407.8677 0.73794452 0.00126204 0.00122321 178410.05 178410.05
860 179478.4488 0.74225998 0.00126931 0.00123025 179480.657 179480.657
865 180537.3922 0.74657545 0.00127667 0.00123739 180539.626 180539.626
870 181584.4906 0.75089091 0.00128413 0.00124461 181586.751 181586.751
875 182619.5366 0.75520638 0.00129168 0.00125194 182621.823 182621.823
880 183642.323 0.75952184 0.00129934 0.00125936 183644.636 183644.636
288
885 184652.6424 0.76383731 0.0013071 0.00126688 184654.982 184654.982
890 185650.2876 0.76815277 0.00131496 0.0012745 185652.654 185652.654
895 186635.0512 0.77246824 0.00132293 0.00128222 186637.444 186637.444
995 203305.941 0.85877754 0.00150699 0.00146062 203308.91 203308.91
1000 203972.3037 0.86309301 0.00151757 0.00147088 203975.304 203975.304
1005 204621.2241 0.86740847 0.0015283 0.00148127 204624.255 204624.255
1010 205252.4949 0.87172394 0.00153917 0.00149181 205255.557 205255.557
1015 205865.9088 0.8760394 0.00155019 0.00150249 205869.002 205869.002
1020 206461.2584 0.88035487 0.00156137 0.00151333 206464.383 206464.383
1025 207038.3364 0.88467033 0.00157269 0.0015243 207041.492 207041.492
1030 207596.9356 0.8889858 0.00158418 0.00153543 207600.123 207600.123
1035 208136.8486 0.89330126 0.00159582 0.00154672 208140.068 208140.068
1040 208657.8682 0.89761673 0.00160762 0.00155815 208661.119 208661.119
1045 209159.787 0.90193219 0.00161958 0.00156975 209163.07 209163.07
1050 209642.3977 0.90624766 0.00163171 0.0015815 209645.713 209645.713
1055 210105.493 0.91056312 0.001644 0.00159342 210108.841 210108.841
1060 210548.8656 0.91487859 0.00165646 0.00160549 210552.246 210552.246
1065 210972.3082 0.91919405 0.00166909 0.00161774 210975.721 210975.721
1070 211375.6135 0.92350952 0.0016819 0.00163015 211379.059 211379.059
1075 211758.5741 0.92782498 0.00169488 0.00164273 211762.053 211762.053
1080 212120.9828 0.93214045 0.00170803 0.00165548 212124.494 212124.494
1085 212462.6323 0.93645591 0.00172137 0.0016684 212466.177 212466.177
1090 212783.3153 0.94077138 0.00173489 0.00168151 212786.893 212786.893
1095 213082.8244 0.94508684 0.00174859 0.00169479 213086.436 213086.436
1100 213360.9523 0.94940231 0.00176248 0.00170825 213364.597 213364.597
1105 213617.4918 0.95371777 0.00177655 0.00172189 213621.17 213621.17
1110 213852.2355 0.95803324 0.00179082 0.00173572 213855.947 213855.947
1115 214064.9761 0.9623487 0.00180528 0.00174973 214068.722 214068.722
1120 214255.5064 0.96666417 0.00181994 0.00176394 214259.286 214259.286
1125 214423.6189 0.97097963 0.00183479 0.00177833 214427.432 214427.432
1130 214569.1065 0.9752951 0.00184984 0.00179292 214572.954 214572.954
1135 214691.7618 0.97961056 0.0018651 0.00180771 214695.643 214695.643
1140 214791.3774 0.98392603 0.00188056 0.0018227 214795.292 214795.292
1145 214867.7461 0.98824149 0.00189623 0.00183789 214871.695 214871.695
1150 214920.6606 0.99255696 0.00191211 0.00185328 214924.644 214924.644
1155 214949.9136 0.99687242 0.0019282 0.00186887 214953.931 214953.931
1158.623687 214956.2083 1 0.00194 0.00188031 214960.25 214960.25
Ejemplo de calculos:
289
17. Incremento
18. Obtencin de V1
2 y3
Vy := Ri y U FG
3
Donde:
y= es el incremento (cm)
Ri= es el radio interno (cm)
U= factor de correccion del volumen
FG= factor de convercin (0.0002641721 gal/cm3)
h) Relacin R=H/D
Se divide cada incremento para el dimetro del tanque.
i) Factor k
Se remplasa el valor de R en la siguiente funcin que representa el
factor de correcin por volumen.
290
k 0.00186R
0.00226RV ? 0.00144RK ? 0.00025R ?
0.00065
j) Porcentaje de correccin
Con la temperatura de opercin determinmos el coeficiente de
dilatacin linela medinte la siguiente tabla.
AnDT7pT4C nDU}pnU
Ts 79.75
U U
291
Finalmente el volumen corregido por temperatura se lo determina
amediante la siguiente funcin.
Vt V1A1 ? %C
292
ANEXO 6
MANUAL DE USUARIO
293
MANUAL DE USUARIO
INTRODUCCIN
Pantalla Principal.-
Al hacer correr el programa aparece la pantalla principal (Figura 1). En esta
ventana el usuario puede seleccionar el tipo de tanque que desea calibrar, el
294
sistema de medidas o unidades en el que se va a realizar el ingreso de datos y
el nmero de anillos que el tanque posea.
Figura 1.
Seleccionar en Tipo de Tanque la opcin Tanque Vertical ( Figura 2)
Figura 2.
Figura 3.
Seleccionar en Anillos del Tanque el nmero de anillos que tiene el
tanque.
295
Figura 4.
Figura 5.
Datos Generales.-
En esta pestaa (Figura 6) se ingresa los datos Generales del tanque a
calibrar. Los pasos a seguir son los siguientes:
296
Figura 6.
Figura 7.
Figura 8.
Figura 9.
297
Ingresar en Datos el valor del Grado API a 60F.
Figura 10.
Figura 11.
Figura 12.
Figura 13.
298
Figura 14.
Figura 15.
Figura 16.
Figura 17.
299
Figura 18.
Si el usuario del software tiene dudas de cules son los datos que se
requieren puede hacer click en los links azules Imagen del Tanque e
Imagen del fondo. En donde aparecer una imagen indicando de
manera grfica cuales son los datos requeridos (Figura 19 y Figura 20).
Figura 19.
Figura 20.
Circunferencias.-
En esta pestaa (Figura 21) se ingresan las circunferencias de cada anillo del
tanque a la altura del 20% y 80% si las juntas estn a tope o a la altura del 25%
y 75% si las juntas estn traslapadas. Los pasos a seguir son los siguientes:
300
Figura 21.
Figura 22.
301
Espesores.-
En esta pestaa (Figura 23) se ingresan los espesores de cada anillo del
tanque a la altura del 20% y 80% si las juntas estn a tope o a la altura del 25%
y 75% si las juntas estn traslapadas. Los pasos a seguir son los siguientes:
Figura 23.
Alturas.-
En esta pestaa (Figura 24) se ingresan las alturas de cada anillo del tanque.
Los pasos a seguir son los siguientes:
302
Figura 24.
Figura 25.
303
J. a Tope / J. Traslapadas.-
En esta pestaa (Figura 26) se ingresan las dimensiones de la soldadura o del
traslape y el nmero de juntas verticales que hay en cada anillo. Los pasos a
seguir son los siguientes:
Figura 26.
Si el usuario del software tiene dudas de cules son los datos que se
requieren puede hacer click en los links azules Juntas a Tope o Juntas
Traslapadas. En donde aparecer una imagen indicando de manera
grfica cuales son los datos requeridos (Figura 27 y Figura 28).
304
Figura 27.
Figura 28.
Volumen Muerto.-
En esta pestaa (Figura 29) se ingresan todos los datos necesarios para el
clculo del volumen muerto debido a los accesorios que posea el tanque. Los
pasos a seguir son los siguientes:
Figura 29.
305
Ingresar en Nmero de Accesorios el nmero de accesorios que tiene
posee el tanque.
Hacer click en Aceptar para que se realice una lista en donde se pueda
ingresar los datos necesarios.
Si el usuario del software tiene dudas de cules son los datos que se
requieren puede hacer click en el link azul Imagen Accesorios. En
donde aparecer una imagen indicando de manera grfica cuales son
los datos requeridos (Figura 30).
Figura 30.
Clculos.-
En esta pestaa (Figura 31) se presentan las diferentes correcciones y clculos
que hace el programa segn las normas.
306
Figura 31.
Tabla SA.-
En esta pestaa (Figura 32) se presentan la tabla total de calibracin del
tanque vertical en unidades del sistema americano.
Figura 32.
Tabla SI.-
En esta pestaa (Figura 33) se presentan la tabla total de calibracin del
tanque vertical en unidades del sistema internacional.
307
Figura 33.
308
CALIBRACIN TANQUES HORIZONTALES
Pantalla Principal.-
Al hacer correr el programa aparece la pantalla principal (Figura 33). En esta
ventana el usuario puede seleccionar el tipo de tanque que desea calibrar, el
sistema de medidas o unidades en el que se va a realizar el ingreso de datos y
el nmero de anillos que el tanque posea.
Figura 33.
Figura 34.
Figura 35.
309
Seleccionar en Anillos del Tanque el nmero de anillos que tiene el
tanque.
Figura 36.
Figura 37.
310
Figura 38.
Datos Generales
Circunferencias
Longitud anillos
Accesorios
Clculos
Tabla SA
Tabla SI
Datos Generales.-
En esta pestaa (Figura 39) se ingresa los datos Generales del tanque a
calibrar. Los pasos a seguir son los siguientes:
311
Figura 39.
Figura 40.
Figura 41.
312
Seleccionar en Datos de Juntas Horizontales el Tipo de Juntas, si
son juntas a tope o traslapadas.
Figura 42.
Figura 43.
Figura 44.
Figura 45.
313
Ingresar el valor del Dimetro Nominal. Si el sistema de unidades
seleccionado en la pantalla principal es el SI ingresar en milmetros, si
es el SA ingresar en pulgadas.
Figura 46.
Figura 47.
Figura 48.
Figura 49.
Figura 50.
314
Ingresar el valor del Traslape. Si el sistema de unidades seleccionado
en la pantalla principal es el SI ingresar en milmetros, si es el SA
ingresar en pulgadas. Si el usuario tiene dudas de cul es el dato que
se requiere puede hacer click en el link azul Imagen Tanque (Figura 54)
Figura 51.
Figura 52.
Figura 53.
Si el usuario del software tiene dudas de cules son los datos que se
requieren puede hacer click en el link azul. En donde aparecer una
imagen indicando de manera grfica cuales son los datos requeridos
(Figura 54, Figura 55 y Figura 56).
315
Figura 54.
Figura 55.
Figura 56.
Circunferencias.-
En esta pestaa (Figura 57) se ingresan las circunferencias de cada anillo del
tanque a la altura del 20% y 80%. Los pasos a seguir son los siguientes:
316
Figura 57.
Si el usuario del software tiene dudas de cules son los datos que se
requieren puede hacer click en el link azul Imagen Circunferencias. En
donde aparecer una imagen indicando de manera grfica cuales son
los datos requeridos (Figura 58).
Figura 58.
317
Longitudes de los Anillos.-
En esta pestaa (Figura 59) se ingresan las longitudes de cada anillo del
tanque. Los pasos a seguir son los siguientes:
Figura 59.
Si el usuario del software tiene dudas de cules son los datos que se
requieren puede hacer click en el link azul Imagen Longitudes. En
donde aparecer una imagen indicando de manera grfica cuales son
los datos requeridos (Figura 60).
318
Figura 60.
Accesorios.-
En esta pestaa (Figura 61) se ingresan todos los datos necesarios para el
clculo del volumen muerto debido a los accesorios que posea el tanque. Los
pasos a seguir son los siguientes:
Figura 61.
Ingresar en Nmero de Accesorios el nmero de accesorios que tiene
posee el tanque.
Hacer click en Aceptar para que se realice una lista en donde se pueda
ingresar los datos necesarios.
319
Ingresar en Volumen el valor del volumen que ocupa el accesorio en
galones. El volumen puede ser negativo si el accesorio resta volumen al
tanque.
Si el usuario del software tiene dudas de cules son los datos que se
requieren puede hacer click en el link azul Imagen Accesorios. En
donde aparecer una imagen en donde se indica grficamente cuales
son los datos requeridos (Figura 62).
Figura 62.
Clculos.-
En esta pestaa (Figura 63) se presentan las diferentes correcciones y clculos
que hace el programa segn las normas.
Para obtener los resultados hacer click en Calcular.
320
Figura 63.
Tabla SA.-
En esta pestaa (Figura 64) se presentan la tabla total de calibracin del
tanque horizontal en unidades del sistema americano.
Figura 64.
Tabla SI.-
En esta pestaa (Figura 65) se presentan la tabla total de calibracin del
tanque horizontal en unidades del sistema internacional.
321
Figura 65.
322
CALIBRACIN TANQUES ESFRICOS
Pantalla Principal.-
Al hacer correr el programa aparece la pantalla principal (Figura 66). En esta
ventana el usuario puede seleccionar el tipo de tanque que desea calibrar, el
sistema de medidas o unidades en el que se va a realizar el ingreso de datos y
el nmero de anillos que el tanque posea.
Figura 66.
Figura 67.
Figura 68.
323
Hacer click en Calibrar Tanque.
Figura 69.
Datos Generales
Clculos
Tabla SA
Tabla SI
324
Datos Generales.-
En esta pestaa (Figura 70) se ingresa los datos Generales del tanque a
calibrar. Los pasos a seguir son los siguientes:
Figura 70.
Figura 71.
Figura 72.
325
de cul es el dato que se requiere puede hacer click en el link azul
Imagen Tanque (Figura 79).
Figura 73.
Figura 74.
Figura 75.
Figura 76.
326
Ingresar en Incrementos el valor del incremento que se quiere que
tengan las tablas de resultados.
Figura 77.
Figura 78.
Si el usuario del software tiene dudas de cules son los datos que se
requieren puede hacer click en el link azul. En donde aparecer una
imagen indicando de manera grfica cuales son los datos requeridos
(Figura 79).
Figura 79.
327
Clculos.-
En esta pestaa (Figura 80) se presentan las diferentes correcciones y clculos
que hace el programa segn las normas.
Para obtener los resultados hacer click en Calcular.
Figura 80.
Tabla SA.-
En esta pestaa (Figura 81) se presentan la tabla total de calibracin del
tanque esfrico en unidades del sistema americano.
Figura 81.
Tabla SI.-
En esta pestaa (Figura 82) se presentan la tabla total de calibracin del
tanque esfrico en unidades del sistema internacional.
328
Figura 82.
329