Vidal BV

UNIVERSIDAD NACIONAL DE INGENIERiA
FACULTAD DE INGENIERA MECNICA

SECCIN DE POSGRADO
ANLISIS DEL DIMENSIONAMIENTO DE UNA TURBINA

HIDRULICA, POR REDES NEURONALES PARA UNA
MINICENTRAL
TESIS
PARA OPTAR EL GRADO DE:
MAESTRO EN CIENCIAS, MENCIN INGENIERA

MECNICA, DISEO DE MQUINAS
VCTOR BEDER VIDAL BARRENA

PROMOCIN 2000 - 11
LIMA-PER
2010
* *DEDICATORIA * *
A la memoria de mi querido padre:
Don Arstides Vulal Mrquez
Mantnganse unidos, busquen la feli-
cidad y armona, pues siendo ustedes
felices, yo descansar en paz.
A mi madre: Graciela Barrena de

Vida/
Tus brazos siempre se abren cuando
necesito un abrazo. Tu corazn sabe
comprender cundo necesito una
amiga. Tus ojos sensibles se endure-
cen cuando necesito una leccin. Tu
fuerza y tu amor me han dirigido
por la vida y me han dado las alas
que necesitaba para volar.
AGRADECIMIENTOS.
Agradezco a mis asesores del proyecto, a /os doctores Csar Cebreros

Delgado de la Flor y Nicols Kemper Valvet:de, directores del proyecto;
por su confianza y consejos en el desarrollo de todo el trabajo realizado.
INTRODUCCIN 01
Planteamiento del Problema 03
Formulacin del problema 04
Objeto del estudio 05
Objetivo 06
Alcances 06
Justificacin 06
Limitaciones 07
Limitacin Temporal 07
Limitacin espacial 07
Limitacin conceptual 08
Hiptesis 08
Mtodo de investigacin 08
Tipo de Investigacin 09
Nivel de investigacin 10
Novedad cientfica 10
CAPTULO 1
ESTADO ,DEL ARTE 11
1.1 Revisin Bibliogrfica 11
CAPTULO 2
MODELOS MATEMTICOS PARA LAS DIMENSIONES
DE LAS TURBINAS 25
Vl
2.1 Modelo Matemtico por el Mtodo Tradicional 25
2.1.1 Seleccin de las Turbinas Hidrulicas 25
1. Potencia de la turbina {P) 25
2. Nmero Especfico de revoluciones de potencia {Ns) 26
2.1.2 Modelo Tradicional en el Diseo de una Turbina Pelton 27
1. Salto neto en la Turbina Pelton de un inyector 27
2. Salto neto en la turbina Pelton de varios inyectores 28
2.1.1.2.1 Diseo de los Dimetros Principales 30
1. Dimetro del chorro (Dch) 30
2. Dimetro medio del Rodete (D2) 31
3. Dimetro externo del Rodete {03) 31
4 Diseo de las Dimensiones de las paletas 31
2.1.3 Mtodo Tradicional en el Diseo de una turbina Francis 34
2.1.3.1 Tipos de Rodetes 35
1. Rodetes Lentos 35
2. Rodetes Normales 35
3. Rodetes Rpidos 36
2.1.3.2 Diseo de los Dimetros Principales. 37
1. Dimetro del Tubo de Aspiracin (D3) 37
2. Dimetro Externo del rodete {D1) 38
3. Dimetro Interno del Rodete (02) 38
2.1.3.3 Ancho de la corona directriz (bo) 39
1. Francis Lenta (FL) 39
2. Francis Normal {FN) 39
3. Francis Rpida (FR) 40
4. Francis Extra Rpida (FeR) 40
2.1.3.4 Clculo del Nmero de labes (Zo) 40
1. Francis Lenta (FL) 41
2. Francis Normal (FN) 42
4. Francis Extra Rpida (FeR) 42
2.1.4 Modelo Tradicional en el Diseo de las Turbinas
Vll
De Accin Total 43
2.1.4.1 Diseo de los Dimetros principales de la turbina
De Accin Total 43
2. Dimetro del rodete (D2) 44
3. Dimetro del cubo del Rodete (DN) 45
4. Dimetro del medio del Rodete (D1) 45
2.1.4.2 Ancho de la Rueda Directriz (Bo) 45
2.1.4.3 Clculo del Nmero de Alabes (Z) 46
2.1.5 Modelo Tradicional en el Diseo de la Turbina Michell 47
2.1.5.1 Diseo de los Dimetros Principales de la turbina 48
1. Dimetro Exterior del Rodete (D2) 49
2. Dimetro Interior del Rodete (D1) 49
3. Dimetro del chorro (Dch) 50
4. Velocidad del chorro (C1) 50
5. Dimetro medio del rodete (Dm) 50
6. Espesor del chorro (a) 51
7. Velocidad angular de la Rueda (n) 51
8. Velocidad Tangencial (u 1) 52
9. Ancho del rodete (8) 52
10. Medidas y nmeros de paletas 52
11. Paso o Divisin Exterior 53
.2.2 Modelo Matemtico .por el Mtodo de las
Redes Neuronales 53
2.2.1 Clculo de las Turbinas Hidrulicas 53
1. Potencia de la Turbina (P) 54
2. Nmero Especfico (Ns) 55
2.2.2 Diseo de una Turbina Pelton 55
2.2.2.1 Clculo de las dimensiones principales 55
1. Dimetro del chorro (dch) 56
2. Dimetro medio del Rodete (02) 56
3. Dimetro externo del Rodete (D3) 57
V111
4 Dimensiones de las paletas 57
5. Nmero de las Paletas 57
6. Seleccin de la turbina Pelton 58
2.2.3 Diseo de una Turbina Francis 58
2.2.3.1 Clculo de los Dimetros Principales 58
2. Dimetro Externo del rodete (D1) 58
3. Dimetro Interno del Rodete (D2) 59
4. Ancho de la Corona Directriz (bo) 59
5. Clculo del Nmero de labes (Zo) 59
5.a Francis Lenta (FL) 60
5.b Francis Normal (FN) 60
5.c Francis Rpida (FR) 60
5.d Francis Extra Rpida (FeR) 60
6. Seleccin de la Turbina Francis 61
2.2.4 Diseo de las Turbinas de Accin Total 61
2.2.4.1 Clculo de las Dimensiones Principales 61
3. Dimetro del cubo del Rodete (DN) 62
4. Dimetro del medio del Rodete (D1) 62
5. Ancho de la Rueda Directriz (Bo) 62
6. Velocidad Meridiana (Cmo) 63
2.2.5 Algoritmo de Aprendizaje Backpropagation 63
1. Regla de Aprendizaje 63
2. Deduccin Matemtica 65
CAPTULO 3
DISEO DE LAS DIMENSIONES PRINCIPALES

DE LAS TURBINAS 77
3.1 Diseo de las Dimensiones de una turbina por el mtodo

IX
Tradicional. 77
3.1.1 Diseo de una Turbina Pelton 77
3.1.1.1 Seleccin de una Turbina Pelton 77
2. Nmero Especfico de revoluciones (Ns) 78
3.1.1.2 Diseo de las Dimensiones Principales 80
1. D.imetros Principales 80
a. Dimetro del chorro (dch) 80
b. Dimetro medio del Rodete (D2) 81
c. Dimensiones de la paletas 81
1. Ancho de la paleta 81
2. Altura de la paleta 82
3. Espesor de la paleta 82
d. Dimetro externo del Rodete (D3) 82
e. Nmero de cucharas o paletas (Z) 82
3.1.2 Diseo de una Turbina Francis con Rodete Normal 83
3.1.2.1 Seleccin de una Turbina Francis Normal 83
2. Nmero Especfico .(Ns) 84
3.1.2.2 Diseo de las Dimensiones Principales 85
1. Dimetro del tubo de aspiracin (0 3) 85
2. Dimetro externo del Rodete (D1) 86
3. Dimetro interno del Rodete (02) 87
3.1.2.3 Ancho de la Corona Directriz (bo) 87
3.1.2.4 Clculo del Nmero de labes (Z) 88
3.1.3 Diseo de una Turbina Francis con rodete rpido 88
3.1.3.1 Seleccin de una turbina Francis Rpida 88
1. Potencia deJa Turbina (P) 88
3.1.3.2 Diseo de las dimensiones principales 91
X
1. Dimetro del tubo de aspiracin (D3) 91
2. Dimetro externo del rodete (D1) 92
3. Dimetro interno del rodete (02) 92
3.1.3.3 Ancho de la corona directriz (bo) 93
3.1.3.4 Clculo del Nmero de labes (Z) 93
1. Francis rpida (FR) 93
3.1.4 Diseo de una Turbina de Hlice 94
3.1.4.1 Seleccin de una turbina de hlice 94
1. Dimetro del tubo de aspiracin (D3) 97
3. Dimetro del cubo de.l rodete (DN} 98
4. Dimetro medio del rodete (D 1) 99
3.1.4.3 Ancho de la rueda directriz (Bo) 99
3.1.4.4 Clculo del nmero de labes 101
3.1.5 Diseo de una turbina Michell 101
3.1.5.1 Seleccin de una turbina Michell 101
1. Potencia de la turbina (P) 101
1. Dimetro exterior del rodete (D2) 104
2. Dimetro interior del rodete (D1) 105
3. Dimetro del chorro (dch) 105
4. Velocidad del chorro (C1) 105
5. Dimetro medio del rodete (Dm) 106
6. Espesor del chorro (a) 106
7. Velocidad angular de la rueda (n) 107
8. Velocidad Tangencial (u1) 107
9. Ancho del rodete (B) 108
Xl
10. Medidas y nmero de paletas 109
3.2 Diseo del software utilizando el Mtodo de las
Redes neuronales 110
3.2.1 NeuroShell2 111
3.2.2 Diseo del mtodo de las redes neuronales (MERNA) 112
3.2.2.1 Fase 1: Adquisicin del conocimiento 112
3.2.2.2 Fase 2: Desarmllo del sistema 113
3.2.2.3 Fase 3: Obtencin de datos a partir del MERNA 113
3.2.3 Gestin de las bases de conocimientos del MERNA 114
3.2.3.1 Anlisis 118
1. Datagrid del NeuroShell 2 118
2. Archivo DSC 119
3. File lmport 119
4. Data entry 120
5. .Input y Output 121
6. Test Set Extraction 121
7. Train 122
8. Run 123
9. Attach 123
1O. Spreadsheet Export 124
11. Datagrid 124
12. Generate Runtime Systems 124
3.2.4 Pantalla del men de ingreso de datos: MERNA 125
3.2.4.1 Seleccin y diseo de una turbina Francis Normal 126
3.2.4.2 Seleccin y diseo de una turbina Michell 128
3.2.4.3 Seleccin y diseo de una turbina Pelton 1Ch 129
3.2.4.4 Seleccin y diseo de una turbina Kaplan 131
RESULTADOS 133
4.0 Resultados 133
4.1 Resultados en seleccin y diseo de una turbina Michell 133
4.1.1 Mtodo Tradicional 133
Xll
4.1.2 Mtodo MERNA 134
4.2 Resultados en seleccin y diseo de una turbina de Hlice 137
4. 3 Resultados en seleccin y diseo de una turbina Pelton 2Ch 140
4.4 Resultados en seleccin y diseo de una turbina Kaplan 144
4.5 Resultados en seleccin y diseo de una turbina Francis Lenta 147
CONCLUSIONES 151
RECOMENDACIONES 173
REFERENCIAS BIBLIOGRFICAS 175
ANEXOS
ANEXO A NEUROSHELL2 181

A.1 NeuroShell 2 181
A.2 Inicio en el NeuroShell 2 181
A.3 Designacin del problema 182
A.3.1 Men de Archivo (file) 182
A.3.1.1 Nuevo Problema 183
A.3.1.2 Abrir Problema 184
A.3.2 Ventana del men principal 185
A.3.3 El sistema de Principiantes 186
A.3.4 El sistema de Avanzado 187
A.3.5 Sistema de tiempo de ejecucin 187
A.4 Opciones del men principal 189
Xlll
A.4.1 Men de archivo {file) 189
A.4.2 Men de edicin (Edit) 190
A.4.3 Men de Utilidad (Utility) 191
A.4.4 Men de opciones {Options) 192
ANEXO B CODIGO GENERADOR POR NEUROSHELL 2 193

8.1 Programa C generado por NeuroShell 2 193
8.1.1 Seleccin de turbinas: Mtodo 1 193
B. 1.2 Seleccin de turbinas: Mtodo 2 198
8.1.3 Seleccin de turbinas: Mtodo 3 y 4 219
LISTA DE FIGURAS
Fig. 1.1 Comparacin de la demanda de energa hidrulica - 4

Trmica
Fig. 1.1 Alcance y Aplicacin de turbinas: Tsuguo Nozaki 21
Fig. 1.2 Diagrama de seleccin de turbinas hidrulicas 22
Fig.1.3 Neuronas Biolgicas 23
Fig. 1.4 Comparacin de la neurona biolgica y la neurona 24
Artificial.
Fig. 1.5 Capas de una red 24
Fig . 2 .. 1 Turbina Pelton de un .inyector .28
Fig. 2.2 Turbina Pelton de dos inyectores 29
Fig. 2.3 Rodete de una Turbina Pelton 30
Fig. 2.4 Dimetro del rodete 30
Fig. 2.5 Dimensiones bsicas de una paleta Pelton 32
Fig ..2.6 Formas modernas de una paleta Pelton 33
Fig. 2.7 Separacin entre paletas Pelton 34
Fig. 2.8 Rodete Francis Lenta 35
Fig.2.9 Rodete Francis Normal 36
Fig. 2.10 Hodete Francis Rpido 36
Fig. 2.11 Rodete Francis Extra Rpido 37
Fig. 2.12 Dimensiones principales de un rodete 37
Fig. 2.13 Trayectoria de la vena fluida en el distribuidor 41
Fig. 2.14 Tringulo de velocidades 43
Fig. 2.15 Dimensiones principales de un rodete de accin total 44
Fig. 2.16 Partes principales de una turbina Michell 47
XV
Fig. 2.17 Turbina Michell 48

Fig. 2.18 Dimensiones principales del rodete Miche.ll 49
Fig. 2.19 Tabulacin de datos para el clculo del Potencia 54
Fig. 2.20 Tabulacin de datos para el clculo de Ns 55
Fig. 2.21 Tabulacin de datos para el clculo del dch 56
Fig. 2.22 Tabulacin de datos para el clculo del D2 57
Fig. 2.23 Disposicin de una red de tres capas 65
Fig. 2.24 Patrn de entrenamiento de la red 67
Fig. 3.1 Turbina Pelton 77
Fig. 3.2 Diagrama de seleccin de turbinas hidrulicas 80
Fig. 3.3 Dimensiones de la paleta 81
Fig. 3.4 Turbina Francis con rodete normal 83
Fig. 3.5 Grfico de seleccin de turbinas 85
Fig. 3.6 Turbina Francis con rodete rpido 88
Fig. 3.7 Grfico de seleccin de la turbina Francis 90
Fig. 3.8 Turbina de hlice 94
Fig. 3.9 Grfico de seleccin de la turbina Hlice 96
Fig. 3.10 Turbina Michell 101
Fig. 3.11 Grfico de seleccin de la turbina Michell 103
Fig.3.12 Dimetro del rodete Michell 104
Fig. 3.13 NeuroShell 2 111
Fig. 3.14 Tabulacin de datos 119
Fig. 3.15 Creacin del archivo dsc 119
Fig. 3.16 Seleccionar File lmport 120
Fig. 3.17 Seleccionar el archivo nuecent.wk1 120
Fig. 3.18 Seleccionar Data Entry 120
Fig. 3.19 Ingresos de datos 121
Fig. 3.20 Seleccin de entradas y salidas 121
Fig. 3.21 Seleccin de entradas y salidas 121
Fig. 3.22 Importacin de datos 122
Fig. 3.23 Archivos extrados 122
Fig. 3.24 Inicio del entrenamiento 122
XVl
Fig. 3.25 Entrenamiento a los 5 minutos 122

Fig. 3.26 Entrenamiento a los 9 minutos 123
Fig. 3.27 Correr el proceso 123
Fig. 3.28 Adjuntar Jos archivos 123
Fig. 3.29 Exportacin de archivos 124
Fig. 3.30 Examinar Jos archivos 124
Fig. 3.31 Creacin de funciones especializadas 125
Fig. 3.32 Men de ingreso de datos 125
Fig. 3.33 Diagrama de flujo del proceso realizado 126
Fig. 3.34 Seleccin de una turbina Francis normal 127
Fig. 3.35 Dimensiones de una turbina Francis normal 127
Fig. 3.36 Seleccin de una turbina Mitchell 128
Fig. 3.37 Dimensiones de una turbina Mitchell 129
Fig. 3.38 Seleccin de una turbina Pelton 1eh 130
Fig. 3.39 Dimensiones de una turbina Pelton 1eh 131
Fig. 3.40 Seleccin de una turbina Kaplan 132
Fig. 3.41 Dimensiones de una turbina Kaplan 132
Fig. 4.1 Seleccin de una turbina Michell: M 1 134
Fig. 4.2 Seleccin de una turbina Michell: M2 135
Fig. 4.3 Dimensiones de una turbina Mitchell: M3 136
Fig. 4.5 Seleccin de una turbina Hlice: M1 138
Fig. 4.7 Dimensiones principales de la turbina Hlice: M3 139
Fig. 4.9 Seleccin de una turbina Pelton 2ch: M1 141
Fig. 4.10 Dimensiones de una turbina Pelton 2ch: M2 142
Fig. 4.13 Seleccin de una turbina Kaplan: M 1 145
Fig. 4.14 Dimensiones de una turbina Kaplan: M3 145
xvn

Fig. 4.17 Seleccin de una turbina Francis Lenta: M1 148
Fig. 4.18 Dimensiones de una turbina Francis Lenta: M2 149
Fig. 5.1 Seleccin de una turbina Francis Rpida: M1 152
Fig. 5.2 Dimensiones de una turbina Francis Rpida: M3 153
Fig. 5.5 Seleccin de una turbina Pelton 4ch: M1 156
Fig. 5.9 Seleccin de una turbina Francis Normal: M1 159
Fig. 5.10 Dimensiones de una turbina Francis Normal: M2 160
Fig. 5.13 Seleccin de una turbina Michell: M1 163
Fig. 5.14 Dimensiones de una turbina Michell: M2 163
Fig. 5.21 Seleccin de una turbina Kaplan: M1 170
Fig.A.1 Men principal: NeuroShell2 182
Fig. A.2 Barra de men archivo (file) 182
Fig. A.3 Barra de men de la opcin: New Problem 183
XVlll
Fig. A.4 Barra de men al seleccionar: examples 183

Fig.A.5 Barra de men al seleccionar la opcin: Open Problem 184
Fig.A.6 Barra de men al seleccionar turbina 1 184
Fig. A.7 Ventana del men principal 185
Fig. A.8 Ventana del men de ayuda 186
Fig. A.9 Men del sistema de principiantes 186
Fig. A.10 Men del sistema de avanzado 187
Fig. A.11 Ventana del sistema de avanzado 188
Fig. A.12 Opcin Make def file 188
Fig. A.13 Opcin Source code Generator 189
Fig. A.14 Opcin del men principal: file 189
Fig. A.15 Opcin del men principal: file 190
Fig. A.16 Opcin del men principal: Utility 191
Fig. A.17 Opcin del men principal: Options 192
LISTA DE TABLAS
Tabla 1.1 Clasificacin de las turbinas hidrulicas 17

Tabla 1.2 Caractersticas principales de las turbinas hidrulicas 18
Tabla 1.3 Eficiencia del grupo de generacin 19
Tabla 1.4 Clasificacin de las MCH segn la potencia 19
Tabla 1.5 Valores caractersticos de las turbinas hidrulicas 20
Tabla 1.6 Nmero de polos con la frecuencia del generador 21
Tabla 2.1 Valores de entrada y salida: Pelton 1ch 66
Tabla 3.1 Clculo de seleccin de una turbina Pelton 79
Tabla 3.2 Clculo de seleccin de una turbina Francis normal 84
Tabla 3.3 Clculo de una turbina Francis rpida 90
Tabla 3.4 Clculo de seleccin de una turbina Francis normal 96
Tabla 3.5 Clculo de seleccin de una turbina Michell 103
Tabla 3.6 Clasificacin de las diferentes turbinas hidrulicas 114
Tabla 3.7 Datos de seleccin y diseo de una turbina Pelton 1ch 114
Tabla 3.1 O Datos de seleccin y diseo de una turbina Francis Lenta 115
Tabla 3.11 Datos de seleccin y diseo de una turbina Francis Normal 116
Tabla 3.12 Datos de seleccin y diseo de una turbina Francis Rpida 116
Tabla 3.13 Datos de seleccin y diseo de una turbina Francis ER 116
Tabla 3.14 Datos de seleccin y diseo de una turbina Hlice 117
Tabla 3.15 Datos de seleccin y diseo de una turbina Hlice 117
Tabla 3.16 Datos de seleccin y diseo de una turbina Kaplan 117
Tabla 3.14 Datos de seleccin y diseo de una turbina Michell 118
XX
Tabla 4.1 Clculo de seleccin de una turbina Michell 134

Tabla 4.2 Comparacin de resultados: Potencia turbina Michell 135
Tabla 4.3 Comparacin de resultados: Dimensiones turbina Michell 135
Tabla 4.4 Clculo de seleccin de una turbina Hlice 137
Tabla 4.5 Comparacin de resultados: Potencia turbina Hlice 139
Tabla 4.6 Comparacin de resultados: Dimensiones turbina Hlice 139
Tabla 4.7 Clculo de seleccin de una turbina Pelton 2ch 140
Tabla 4.8 Comparacin de resultados: Potencia turbina Pelton 2ch 142
Tabla 4.9 Comparacin de resultados: Dimensiones turbina Pelton 2ch 142
Tabla 4.10 Clculo de seleccin de una turbina Kaplan 144
Tabla 4.11 Comparacin de resultados: Potencia turbina Kaplan 146
Tabla 4.12 Comparacin de resultados: Dimensiones turbina Kaplan 146
Tabla 4.13 Clculo de seleccin de una turbina Francis Lenta 148
Tabla 4.14 Comparacin de resultados: Potencia turbina Francis Lenta 149
Tabla 4.15 Comparacin de resultados: Dimensiones turbina Francis L. 149
Tabla 5.1 Comparacin de resultados: Potencia turbina Francis Rpida 154
Tabla 5.2 Desviacin de resultados: Potencia turbina Francis Rpida 154
Tabla 5.3 Dimensiones del rodete: turbina Francis Rpida 155
Tabla 5.4 Desviacin de dimensiones: turbina Francis Rpida 155
Tabla 5.5 Comparacin de resultados: Potencia turbina Pelton 4ch 158
Tabla 5.6 Desviacin de resultados: Potencia turbina Pelton 4ch 158
Tabla 5.7 Dimensiones del rodete: turbina Pelton 4ch 159
Tabla 5.8 Desviacin de dimensiones: turbina Pelton 4ch 159
Tabla 5.9 Comparacin de resultados: Potencia Francis Normal 161
Tabla 5.10 Desviacin de resultados: Potencia Francis Normal 161
Tabla 5.11 Dimensiones del rodete: turbina Francis Normal 162
Tabla 5.12 Desviacin de dimensiones: turbina Francis Normal 162
Tabla 5.13 Comparacin de resultados: Potencia Michell 165
Tabla 5.14 Desviacin de resultados: Potencia Michell 165
Tabla 5.15 Dimensiones del rodete: turbina Michell 166
Tabla 5.16 Desviacin de dimensiones: turbina Michell 166
Tabla 5.17 Comparacin de resultados: Potencia Hlice 168
XXI
Tabla 5.18 Desviacin de resultados: Potencia Hlice 168

Tabla 5.19 Dimensiones del rodete: turbina Hlice 169
Tabla 5.20 Desviacin de dimensiones: turbina Hlice 169
Tabla 5.21 Comparacin de resultados: Potencia KapJan 172
Tabla 5.22 Desviacin de resultados: Potencia Kaplan 172
Tabla 5.23 Dimensiones del rodete: turbina Kaplan 172
Tabla 5.24 Desviacin de dimensiones: turbina Kaplan 172
\
Lista de Smbolos
Ancho entre labes

a Espesor del chorro en la turbina Michell
b Ancho de la cuchara
bo Ancho de la corona directriz
8 Ancho del rodete en la turbina Michell
e, Velocidad absoluta en la boquilla
C3 Velocidad de salida en la turbina Francis
1Ch Una boquilla o un chorro
2Ch Dos boquillas o dos chorros
4Ch Cuatro boquillas o cuatro chorros
DGER Direccin General de Electrificacin rural
d Dimetro del chorro de la boquilla
D Dimetro del rodete
De Dimetro exterior de la rueda
D3 Dimetro exterior en el tubo de aspiracin de una turbina Francis
F Fuerza
GWh Giga vatios por hora
GRNN General Regression Neural Network
G Gravedad
H Altura
h Altura de la cuchara
KW Kilo vatios
Logsig Funcin de transferencia sigmoidal.
LMS Algoritmo Least Mean Square
XXlll
MW Mega vatios
MCH Mini Central Hidrulica
MEIM Ministerio de Energa y Minas
MERNA Mtodo de las redes neuronales artificiales
Ns Nmero especfico de revoluciones
N Velocidad de rotacin, rpm
p Potencia
Q Caudal
RNA Redes Neuronales Artificiales
RPM revoluciones por minuto
SE IN Sistema Elctrico interconectado
t Espesor de la cuchara
te paso o divisin exterior
u Velocidad tangencial
U1 Velocidad Tangencial
z Nmero de cucharas
Zo Nmero de alabes
LETRA GRIEGA
11 Eficiencia
<p Coeficiente
(3 ngulo
Este trabajo desarrolla un algoritmo computacional, para la realizacin de la
seleccin de diferentes turbinas hidrulicas, haciendo uso de las tcnicas de las
numerosas experiencias de prctica experimental y de laboratorio de diferentes
expertos, en materias tan especficas como en la seleccin y diseo de estas tur-
binas hidrulicas de accin y de reaccin, complementado con una red neuronal
artificial y ecuaciones de clculo tabuladas en cuadros estadsticos.
Dicha seleccin la realiza el Sistema Inteligente que usa procedimientos de
conocimiento basada en los clculos realizados por los expertos. Este campo re-
quiere utilizar un conjunto de conocimientos basados en la experiencia acumulada
durante muchos aos de trabajo en esa rea especfica, adems de emplear co-
nocimientos y rutinas de trabajo basados en otras disciplinas.
Los conceptos de los parmetros diferentes de las ecuaciones de seleccin
y diseo, tabuladas en cuadros estadsticos, las cuales sern aprovechados por la
red neuronal artificial, previamente entrenada para que tenga capacidad de razo-
nar, en el sentido de inferir nueva informacin, y que por la dificultad del problema
de la seleccin de las turbinas requiera una solucin con un grado de inteligencia.
Esta cualidad de inteligencia implica una serie de elementos distintivos, tales co~
mo la capacidad de aprendizaje, de auto correccin y razonamiento.

Hace veinte aos Mark Weiser acu el trmino computacin ubicua, y con
ello, surgi un nuevo concepto en las relaciones entre el hombre y las computado-
ras. Los avances tecnolgicos actuales hacen posible, que lo que entonces no era
ms que una visin futurista de la computacin, se convierta en una revolucin no
slo tecnolgica sino tambin social y cultural.
Palabras Claves: Turbinas Hidrulicas, Experto, Red Neuronal artificial, neuronas,

dendritas, jaba, red backpropagation, entrenamiento.
XXV
ABSTRACT
This work develops a computational algorithm for the completion of the se-
lection of different hydraulic turbines, using the techniques of the many expe-
riences of experimental and laboratory practice of different experts in specific
areas such as the selection and design of these turbines hydraulic action and
reaction, supplemented with an artificial neural network and calculation equations
tabulated in statistical tables.
This selection is performed by using intelligent knowledge procedures
based on the calculations made by experts. This field requires using a set of know-
ledge based on experience accumulated over many years working in that specific
area, in addition to using knowledge and work: routines based on other disciplines.
The concepts of the different parameters of the selection and design equa-
tions, tabulated in statistical tables, which will be used by the artificial neural net-
work, previously trained to have ability to reason, in the sense of infer new infor-
mation and that the difficulty of the problem of selection of the turbines required a
solution with a degree of intelligence. This quality of intelligence involves a number
of distinctive elements, such as learning ability, self-correcting and reasoning.
Twenty years ago Mark Weiser coined the term ubiquitous computing, and
with it carne a new concept in the relationship between humans and computers.
Current technological advances make it possible, then it was just a futuristic vision
of computing, it becomes a revolution not only technological but also social and
cultural.
Keywords: Hydraulic Turbines, Expert, Artificial neural network, neurons, den-

drites, bag, backpropagation network:, training.
INTRODUCCIN
Desde la antigedad, el hombre ha buscado medios para que su labor

cotidiana sea ms cmoda, para ello ha ido desarrollando tcnicas e instrumentos
que le liberen de los trabajos menos gratos; sin embargo la gran mayora de ellos
precisan que el ser humano supervise e intervenga en su operacin.
Puede decirse que el cerebro humano es un elemento de procesamiento

de la informacin extremadamente complejo, cuyo modo de funcionamiento es
eminentemente paralelo y cuyo comportamiento no puede describirse por medio
de modelos sencillos como son los lineales. De ah que surgiera, dentro de la Inte-
ligencia Artificial, una rama que intenta imitar el comportamiento del cerebro: los
sistemas conexionistas o redes neuronales artificiales.
Los sistemas expertos constituyen una de las principales aplicaciones de

la inteligencia artificial, trmino que fue utilizado por primera vez en 1956, cuando
McCarthy, Minsky, Newel y otros estudiosos definieron sus principales caracters-
ticas: "La Inteligencia Artificial es el conjunto de tcnicas que se aplican en el di-
seo de programas para computador que tengan capacidad de razonar, en el sen-
tido de inferir nueva informacin, y que por la dificultad del problema requieren
una solucin con un grado de inteligencia".
2
La clasificacin como: grandes centrales producen energa elctrica su-

ficiente para abastecer a grandes ciudades ya redes extensas, por ejemplo la cen-
tral Antnez de Mayolo que suministra energa a la red nacional por encima de
los 1O MW de potencia, pequea central se refiere a unidades con una capaci-
dad de menos de 1O MW, la mini central se refiere a unidades con una capaci-
dad de 101 a 2000 KW, mientras que la micro central se refiere a una capacidad
del sistema por debajo de los 100 KW.
Este trabajo de investigacin para una mejor compresin y con fines ne-
tamente didcticos, se ha dividido en varios captulos, que se detallan a continua-
cin:
En el primer captulo de este trabajo se trata sobre el estado del arte de

las turbinas hidrulicas y de las redes neuronales artificiales, el funcionamiento de
una neurona biolgica, caractersticas de una red neuronal artificial y principales
tipos de redes neuronales, como el perceptrn, adaline y las redes Backpropaga-
tion.
En el segundo captulo, se expone en forma detallada la informacin te-

rica sobre el clculo de las turbinas hidrulicas. Actualmente es necesario des-
arrollar la construccin de turbinas para el aprovechamiento de pequeos saltos
hidrulicos, por lo cual se requiere que las mismas sean capaces de transformar
eficientemente la energa cintica del agua en energa en forma de electricidad o
energa mecnica en el eje.
En el tercer captulo, se utilizan los mtodos: tradicional y el proceso se-

guido con la aplicacin de las Redes Neuronales, basadas en la inteligencia artifi-
cial, las RNA han sido aplicadas principalmente como herramienta para la predic-
cin y la clasificacin de patrones. Las RNA son capaces de trabajar de forma no
lineal con el anlisis de grandes masas de datos sujetas a imprecisiones, con su-
ficientes ejemplos reales y para las que no existen reglas generales y rpidas que
3
puedan ser fcilmente aplicadas y programadas como las que utilizaramos en un

sistema experto.
Luego se exhibe los resultados del proyecto y el anlisis comparativo en-

tre los mtodos clsicos y el de las redes neuronales. En definitiva se dan las
conclusiones y recomendaciones a las que se ha llegado despus de la elabora-
cin del proyecto.
Durante la ltima dcada, las RNA han atrado la atencin de multitud de

investigadores y han sido aplicadas con xito en diferentes mbitos del conoci-
miento tales como ingeniera, fsica, estadstica o economa. En medicina, casi
todos los sistemas son no lineales, por lo que se considera que en ella los mode-
los lineales presentan debilidades que podran ser superadas por sistemas que no
impongan a priori esta restriccin.
PLANTEAMIENTO DEL PROBLEMA.
Como resuelvo el dimensionamiento de las turbinas hidrulicas uti-

. ,lizando las redes neuronales?
Como utilizo el lenguaje C++ generado por el NeuroShell 2 en la so-

lucin de este problema?
Actualmente la generacin de energa elctrica es tal vez una de las prin-

cipales fuentes de desarrollo y de mejoramiento de la calidad de vida del hombre
actual, ya que gracias a ella, hoy en da es posible llevar a cabo un sin nmero de
actividades que contribuyen al crecimiento integral de la sociedad, tanto desde el
punto de vista cientfico y tecnolgico, como industrial, cultural y econmico. Por
esta razn, la energa elctrica se ha convertido en uno de los servicios sociales
de mayor demanda e importancia en nuestro medio, hacindose cada vez ms
indispensable para la ejecucin de actividades de gran trascendencia.
4
Segn el Ministerio de Energa y Minas, el Per requiere de una inversin

total en generacin y transmisin de unos 3,065 millones de dlares, de los cuales
1,981 millones corresponden a generacin y 1,084 a transmisin, para atender
la demanda de energa elctrica al 2015. La demanda del Sistema Elctrico Inter-
conectado Nacional (SEIN) durante el perodo 2006 - 2015 crecer a una tasa
promedio del 7.3 por ciento anual, por lo que se requiere instalar 3,605 Megava-
tios (MW), de los cuales 2,540 corresponden a centrales termoelctricas a gas
natural y 1,065 a centrales hidroelctricas.
PARnCJPAON DE LA PRODUCCIN DE ENERGfA EliCTRICA POR EMPRESA YORIGEN

Febrero 2009
Total Ptoduecl6n COES 10 2 317 GW;h
Hdro e 1 631 GW.h (70%)
Termo " 686 GWJI (30%)
ELP
24"
\~ ""'\ EDEGEL
EDEGU 12%
...
1~, ..
~.
1 \ Hidro
70%/.
.
Trmico
30%
ENERSUR
10%
V
1
j
TERMOSELVA
3%
ICAUJ>A
(
~-----~en!~ 2%
FUENTE: MEM
Fig. 1.1 Comparacin de la demanda de energa hidrulica -trmica.
El Ministerio de Energa y Minas (MEM), a travs de la Direccin General

de Electrificacin Rural (DGER-MEM), tiene la competencia en materia de electri-
ficacin rural de acuerdo a la Ley N 28749, 11Ley General de Electrificacin
Rural", en la ampliacin de la frontera elctrica en el mbito nacional, en coordi-
nacin con los Gobiernos Regionales y Locales, y entidades pblicas y privadas
dedicadas a estos fines, permitiendo el acceso del suministro de electricidad a los
pueblos del interior del pas.
FORMULACIN DEL PROBLEMA.
Para resolver el dimensionamiento y seleccin, ante la gran variedad de

turbinas hidrulicas, para un salto y un caudal determinado, se ha desarrollado
5
un mtodo que permita la seleccin y dimensionamiento de las dimensiones

principales de una turbina hidrulica, sin necesidad de tener a un experto en
esta materia; utilizando las redes neuronales. Para dimensionar y seleccionar una
turbina hidrulica, se requiere clasificar las diferentes turbinas por el salto, caudal,
su velocidad especfica, la potencia y sus eficiencias; esta clasificacin se mues-
tra en la Tabla 1.1.
Actualmente no se conoce con informacin publicada para calcular y

determinar cul es el tipo de turbina para un caudal y altura, ms convenien-
te para el funcionamiento de una mini central hidroelctrica, empleando las
redes neuronales.
El Software el NeuroShell 2 es un programa para Windows que se utiliza

para resolver una amplia variedad de problemas. NeuroShell 2 es una herramien-
ta para la creacin de sistemas RNA, que permite predecir en la seleccin y di-
mensiones de una turbina. Esta aplicacin combina una interfaz de diseo modu-
lar con avanzados procedimientos de aprendizaje, est diseado y entrenado con
los datos que figuran en una hoja de clculo (por ejemplo, Excel o 1-2-3) e incor-
porada en la hoja de balance (dentro de la red de desarrollo NeuroShe/1).
NeuroShell 2 genera/compila automticamente una DLL, que podr ser

utilizada en cualquier entorno de programacin que soporte el acceso a libreras
dinmicas, como por ejemplo: Visual Basic, Access, Visual C++ (Jaba). los mto-
dos que se ha utilizado para comparar las soluciones son las siguientes:
1. Mtodo analtico o tradicional,

2. Mtodo de las redes neuronales, que llamaremos MERNA.
OBJETO DEL ESTUDIO.
Es desarrollar un software que permita a los usuarios llevar a cabo varias

tareas especficas, tal que al ingresar la altura y el caudal, permita seleccionar y
calcular las dimensiones principales de las diferentes turbinas hidrulicas par1
una mini central hidrulica.
6
OBJETIVO.
El objetivo de la presente investigacin, es desarrollar una metodologa

para mejorar la seleccin y el clculo de las dimensiones principales de las turbi-
nas hidrulicas para una mini central, ingresando la altura y el caudal mediante
dos mtodos: el mtodo analtico o tradicional y el mtodo de las redes neurona-
les, que en adelante denominaremos MERNA.
ALCANCES.
El desarrollo del presente trabajo comprende:
Determinacin de la potencia y el nmero especfico que se producen

al utilizar la altura de la cada de agua y su caudal, mediante los mto-
dos analtico o tradicional y el MERNA.
Determinacin de las dimensiones principales de una turbina hidrulica,

mediante los mtodos analtico o tradicional y el MERNA.
Se realizaran predicciones para caudales que varan desde los 0.03

m 3/seg hasta 20 m3/seg y alturas que varan desde los 3 metros hasta
los 300 metros, para seleccionar y calcular las dimensiones principales
de las diferentes turbinas hidrulicas que se encuentran en estos ran-
gos.
JUSTIFICACIN.
La importancia de este proyecto se basa en lo siguiente:
1. En el Per existen muchos poblados y se estima que hay un 40% de

poblacin rural que no tienen beneficios energticos. Estn lejos de
una red de distribucin de energa nacional; por requerir estas de una
coyuntura especial del erario nacional (presupuesto).
7
2. En la actualidad en el Per no se tiene la experiencia necesaria para

construir estas turbinas hidrulicas, que si se efecta en otros pases,
especialmente los desarrollados que emplean su propia tecnologa que
no se conocen; en nuestro pas lo que se realiza en las fundiciones es
copiar un modelo existente sin tener cuenta el salto, caudal, potencia y
nmero especfico.
3. Las energas renovables constituyen para nuestro pas, nuevas alterna-

tivas para suministrar energa a regiones aisladas.
4. Un sistema inteligente es capaz de asesorar al diseador inexperto en

el anlisis y seleccin de alternativas ptimas y en el diseo automati-
zado, lo que constituye una potente herramienta que puede contribuir a
nuestra propia tecnologa.
LIMITACIONES.
LIMITACIN TEMPORAL.
El proyecto de investigacin realizada utiliza el NeuroShell2 que genera

una funcin en C++, con el programa fuente generada se ha desarrollado una
aplicacin en el lenguaje Java para su funcionamiento,. como resultado prctico de
la presente investigacin, el sistema realizado selecciona y calcula las dimensio-
nes principales de las turbinas hidrulicas de una mini central hidrulica.
LIMITACIN ESPACIAL.
La investigacin se ha realizado en el laboratorio CIM de la Facultad de

Ingeniera de la Universidad Ricardo Palma; en este ,laboratorio est instalado el
NeuroShell2 (donado por Nicols Kemper) que genera un cdigo fuente en: Visual
Basic, Access, Visual C++ (Java); y en los laboratorios de la Escuela de Ingenier-
a Informtica, en donde se ha desarrollado el software en el lenguaje Java, para
8
la prediccin en la seleccin y clculo de las dimensiones principales de las dife-
rentes turbinas hidrulicas.
LIMITACIN CONCEPTUAL.
En cuanto a la direccin de la investigacin realizada, ser terico y expe-

rimental utilizando, las herramientas del NeuroShell2 que recomienda: Probabils-
tico (probabilistic) y regresin general neta (general regresin net) o mltiples
placas ocultas. La red Backpropagation genera un archivo en C que ocupa 180kb,
la red GRNN genera un archivo en C que ocupa 1.9 MB, este archivo no es posi-
ble compilarlos directamente; por tal motivo he seleccionado la red Backpropaga-
tion.
HIPTESIS.
Es posible generar una funcin utilizando dato~ reales mediante el uso
NeuroShell2 que permite predecir, la seleccin y el clculo de las dimensiones
principales de una turbina hidrulica; empleando las vari~bles de entrada, como la
altura y el caudal.
METODO DE INVESTIGACIN.
La investigacin realizada es un proceso que, mediante la aplicacin del

mtodo cientfico, procura obtener informacin relevante y fidedigna, para enten-
der, verificar, corregir o aplicar el conocimiento; para hallar resultados de manera
clara, en la seleccin y el clculo de las dimensiones principales de las diferentes
turbinas hidrulicas, aplicando el mtodo de una red neuronal artificial.
Mtodo Analtico.
Se utiliza las ecuaciones d forma y dimensiones de Bovet, F. d Siervo y
A. Lugaresi en mquinas hidrulicas.
9
Mtodo de las Redes Neuronales.
El mtodo que pretende en esta tesis es el diseo de una estrategia de

una red neuronal, que permita la ejecucin de acciones que optimicen realizando
buenas predicciones en la seleccin y diseo de turbinas hidrulicas. En este tra-
bajo, se utiliz la red neuronal backpropagation para predecir la variable turbinas
(selecciones y dimensiones del rodete); en donde existe una capa de entrada con
"x" neuronas y una capa de salida con "y" neuronas y al menos una capa oculta
de "z" neuronas internas.
Mtodo experimental.
Utilizar un software comercial, tal como el Java para disear un software

que utilice la funcin generada en el NeuroShell2, de tal manera que al utilizar los
parmetros de entrada como la altura y el caudal, seleccione y calcule la turbina
que corresponde a esas condiciones.
Procedimiento.
El procedimiento realizado es el siguiente:
Se calcula la potencia y su velocidad especfica, que son las carac-

tersticas que diferencian a las turbinas de accin y de reaccin.
Se calcula las dimensiones principales de las diferentes turbinas por

el mtodo tradicional.
Con los datos obtenidos en el mtodo tradicional, aplicamos el mto-

do de las redes neuronales artificiales (MERNA) en donde se gene-
ramos una funcin.
Evaluar el anlisis comparativo de la seleccin y clculo de las dimen-

siones principales de una turbina.
10
TIPO DE INVESTIGACIN.
El proyecto, se ubica como un nuevo paradigma de una investigacin

acadmica y tecnolgica en ciencias de ingeniera, al desarrollar una herramienta
software con una tecnologa relativamente nueva del MERNA en la seleccin y
clculo de turbinas que sustituya al mtodo tradicional y que sea igualmente fia-
ble.
La innovacin en el trabajo realizado con redes neuronales artificiales que

tienen la habilidad de predecir y abordar problemas de una elevada complejidad
entre variables, problemas que, mediante mtodos tradicionales no pueden ser
resueltos.
NIVEL DE INVESTIGACIN.
Por la abundancia de conocimientos explayados, se trata de una investi-

gacin con la finalidad de obtener informacin nueva orientada hacia el logro de
nuevos conocimientos de manera metodolgica, sistemtica y comprobable; que
contribuyan a resolver problemas y que permite seguir desarrollando y profundi-
zando conocimiento en investigaciones posteriores.
NOVEDAD CIENTFICA.
Las redes neuronales operan sobre la base de reconocimiento de patro-
nes, y que pueden adquirir, almacenar y utilizar conocimiento experimental, obte-
nido a partir de ejemplos. Esta forma de adquirir el conocimiento es una de sus
caractersticas ms destacables: no se programa de forma directa, como en los
sistemas expertos, sino que se adquiere a partir de ejemplos, por ajuste de par-
metros de las neuronas mediante un algoritmo de aprendizaje. Por esta razn, se
desarrolla una nueva metodologa que este acorde con los avances tecnolgicos,
como desarrollar un software de programacin especializado, con el propsito que
al aplicar las redes neuronales artificiales simule fa forma de razonar del cerebro
humano.
C~IP1"irlUJl1...(Q) D
res"ir~lm rn> re n... ~IR{"ir re
1.1 REVISIN BIBLIOGRFICA.
Juan Cevallos Ampuero [33], en su artculo: "Aplicacin de Redes Neu-
ronales para Optimizar Problemas Multi respuesta en mejora de la Calidad", trata
sobre la aplicacin de redes neuronales en problemas Multi respuesta para el me-
joramiento de la calidad, a partir de un anlisis conceptual se establece una apli-
cacin que demuestra la validez de las redes neuronales utilizando la red back-
propagation con entrenamiento.
Gustavo Ovando, Mnica Boceo y Silvina Sayago [34], en su artculo:
"Redes Neuronales para Modelar Prediccin de Heladas" En este trabajo se de-
sarrollaron modelos basados en redes neuronales del tipo "backpropagation",
para predecir la ocurrencia de heladas, a partir de datos meteorolgicos de tem-
peratura, humedad relativa, nubosidad, direccin y velocidad del viento. El entre-
namiento y la validacin de las redes se realizaron utilizando 24 aos de datos
meteorolgicos correspondientes a la estacin de Ro Cuarto, Crdoba, Argenti-

12
na, separados en 1O aos como conjunto de datos de entrenamiento y 14 como
conjunto de datos de validacin. Se construyeron diferentes modelos para evaluar
el comportamiento de las redes cuando se usan distintos nmeros de variables de
entrada y/o neuronas en la capa oculta y las probabilidades de aciertos en los re-
sultados de prediccin para los mismos, al considerar distintas variables de entra-
da. En los anlisis realizados por Ceballos [33] y Ovando [34] demuestran la vali-
dez de la utilizacin de las redes neuronales, utilizando la red backpropagation
con entrenamiento que genera un archivo en C que ocupa 180kb, que son facH-
bles de ser generados.
Patricia Gonzlez Serrano [35], en su artculo "Simulacin Tcnico-
Econmica Del Mercado Elctrico Espaol" El proyecto tiene como objeto el estu-
dio de la evolucin del mercado elctrico espaol a partir del comportamiento
hidrulico del parque de generacin. Partiendo de las ofertas presentadas al Pool
durante los aos 2002 y 2003 de las distintas centrales de generacin hidrulica
en rgimen ordinario, proporcionadas por la Compaa Operadora del Mercado
Espaol de Electricidad, y con la informacin obtenida del Ministerio del Medio
Ambiente sobre la pluviometra, reserva y energa disponible de las distintas
cuencas hidrogrficas espaolas durante esos mismos aos, se ha analizado la
forma de ofertar de las distintas unidades hidrulicas en el Mercado Elctrico Es-
paol mediante la aplicacin de Redes Neuronales. Una vez que las Redes Neu-
ronales han aprendido a ofertar con las condiciones hidrulicas reales del 2003,
se ha analizado la variacin del precio de la energa en el Mercado Diario simu-
lando otras condiciones hidrulicas del ao 2003.

13
Hernndez Lpez Leonor, [36] en su artculo "Desarrollo de una metodo-
loga para la prediccin y optimizacin de emisiones contaminantes y consumo en
motores Diesel de automocin mediante redes neuronales artificiales" Las estric-
tas normativas europeas en cuanto a lmite de emisiones de escape permitidas,
junto con el requerimiento de reduccin del consumo de combustible impuesto por
el mercado, someten a los motores Diesel de automocin a unos altos niveles de
exigencia. El desarrollo tecnolgico llevado a cabo como respuesta a estas de-
mandas en el campo de los motores Diesel, ha supuesto un aumento notable en
la complejidad de estos motores, incrementando de forma importante el nmero
de parmetros operativos de motor. Este hecho complica la prediccin de emisio-
nes, a la vez que impone a la optimizacin en motor unas dimensiones elevadas.
Los trabajos realizados en la presente tesis doctoral se plantearon con el objetivo
de desarrollar herramientas que permitieran la prediccin emisiones con un tiem-
po de clculo corto y que proporcionaran resultados de buena calidad. Las redes
neuronales artificiales (RNA) presentan ciertas caractersticas ventajosas a la
hora de abordar el problema planteado, como son el modelado Multi variable, la
gestin de comportamientos no lineales y la rapidez de clculo, con lo que el es-
tudio se centr en estos modelos empricos.
Jorge Enrique Rodrguez Rodrguez, [37] en su artculo "Redes Neuro-
nales Artificiales para la clasificacin de Imgenes Satelitales" En este artculo se
presenta el anlisis hecho a un conjunto de datos que representan diferentes
imgenes, clasificadas como: Tierra roja, Cosecha de algodn, Tierra gris, Tierra
gris hmeda, Tierra con vegetacin, Cada terreno gris hmedo. El artculo se es-
14
tructura en: una introduccin en la cual se destaca la importancia del modelo de
los mapas auto-organizativos de Kohonen (SOM) y la red de resonancia adaptati-
va (ART2) para la clasificacin de imgenes; descripcin de los algoritmos utiliza-
dos por las dos redes neuronales artificiales en mencin; informacin relevante al
problema; uso de las redes SOM y ART2 en la clasificacin de imgenes satelita-
les; y planteamiento de conclusiones y trabajos futuros.
Ismael Gonzlez Garca, [38] en su artculo "Control Neuronal De Un
Generador De Induccin Para Generacin Elica" Dado el impacto para la mejora
ecolgica que representa el empleo del viento como fuente de energa, surge la
necesidad de hacer econmicamente ms atractiva esta opcin energtica para
los gobiernos e industriales de todo el mundo. De aqu que surge la necesidad de
aumentar la eficiencia de los sistemas de conversin de energa. Una forma de
aumentar la eficiencia en esto sistemas, es mediante el desarrollo de mejores
tcnicas de control, como lo han demostrado ser las tcnicas inteligentes basadas
en redes neuronales. En este trabajo de tesis se presenta la elaboracin de un
control neuronal del tipo perceptrn multicapa, aplicando la tcnica de adecuacin
potencia, para controlar un generador de induccin empleado en plantas Eolo
elctricas a travs de la variacin del ndice de modulacin de inversor electrni-
co, perteneciente al sistema rectificador inversor (REC-INV).
Martnez Estudillo, F. J. y Hervs Martnez, C. [39] en su artculo "Mo-
delo no lineal basado en redes neuronales de unidades producto para clasifica-
cin. Una aplicacin a la determinacin del riesgo en tarjetas de crdito". El prin- ',
cipal objetivo de este trabajo es mostrar un tipo de redes neuronales denomina-

15
das redes neuronales basadas en unidades producto (RNUP) como un modelo no
lineal que puede ser utilizado para la resolucin de problemas de clasificacin en
aprendizaje. Proponemos un mtodo evolutivo en el que simultneamente se di-
sea la estructura de la red y se calculan los correspondientes pesos.
PATRICIA GONZLEZ SERRANO [40] en su artculo "Departamento
De Sistemas Energticos, Simulacin Tcnico- Econmica Del Mercado Elctrico
Espaol" El proyecto tiene como objeto el estudio de la evolucin del mercado
elctrico espaol a partir del comportamiento hidrulico del parque de generacin.
Partiendo de las ofertas presentadas al Pool durante los aos 2002 y 2003 de las
distintas centrales de generacin hidrulica en rgimen ordinario, proporcionadas
por la Compaa Operadora del Mercado Espaol de Electricidad, y con la infor-
macin obtenida del Ministerio del Medio Ambiente sobre la pluviometra, reserva
y energa disponible de las distintas cuencas hidrogrficas espaolas durante
esos mismos aos, se ha analizado la forma de ofertar de las distintas unidades
hidrulicas en el Mercado Elctrico Espaol mediante la aplicacin de Redes Neu-
ronales. Una vez que las Redes Neuronales han aprendido a ofertar con las con-
diciones hidrulicas reales del 2003, se ha analizado la variacin del precio de la
energa en el Mercado diario simulando otras condiciones hidrulicas del ao
2003. De los estudios realizados, se concluye que las ofertas presentadas al Pool
por las centrales de generacin hidrulica en rgimen ordinario, y por tanto la ma-
yor o menor disponibilidad de estas centrales para producir energa, influyen en
gran medida en el precio de la energa elctrica casada en el Mercado Diario.

16
ANTONIO MUOZ SAN ROQUE [41] en su artculo "Aplicacin De
Tcnicas De Redes Neuronales Artificiales Al Diagnstico De Procesos Industria-
les" La tesis doctoral que aqu se presenta se enmarca dentro de las reas de
trabajo de diagnstico y mantenimiento de procesos industriales, y propone un
nuevo sistema de deteccin de anomalas incipientes basado en el modelado co-
nexionista del funcionamiento normal de los componentes. El sistema propuesto
est especialmente dirigido a resolver el problema de la deteccin de anomalas
en aquellos casos en los que no existe una completa base de datos de fallo, y en
los que el modelado fsico del comportamiento de los componentes resulta invia-
ble. La solucin propuesta consiste en caracterizar el comportamiento normal de
los componentes involucrados mediante la aplicacin de tcnicas de modelado de
procesos dinmicos no lineales con aproximadores funcionales. Como aproxima-
dores funcionales se propone utilizar Redes Neuronales Artificiales supervisadas,
tales como el Perceptrn Multicapa y la red PRBFN (aportacin original de esta
tesis). Estas herramientas, adems de ofrecer una elevada capacidad de repre-
sentacin, poseen una estructura modular que las hacen altamente paralelizables
y realizables en "hardware".
L. Quantz [31] en su publicacin "Motores Hidrulicos" Elementos para
el estudio, construccin y clculo de las instalaciones modernas de fuerza hidru-
lica. Editorial Gustavo Gili, SA. Se desarrollan las teoras bidimensionales para los
rodetes axiales y centrfugos, indicando los efectos tridimensionales que pueden
producirse. Se afronta el estudio de la semejanza dinmica en las turbo mquinas
a partir de leyes semi empricas. Se ampla el estudio de la cavilacin.

17
Se obtienen coeficientes asociados con el diseo de las mquinas. Nocio-
nes sobre el diseo y comportamiento de las turbo mquinas. Se presta especial
atencin a regmenes de funcionamiento no deseados por su comportamiento
inestable o peridico. Se analiza el proceso de arranque deseable as como los
dispositivos que permiten un equilibrado axial y radial aceptable para la mquina.
Se estudian los ventiladores. En la Tabla 1.1 (L. Quantz [31]) se muestra la clasi-
ficacin de las diferentes turbinas hidrulicas.
Tabla 1.1 Clasificacin de Turbinas Hidrulicas.
TIPO DE ns nq Hmx adm.

TURBINA
Turbina Pelton 1 GH 10 a 13 3a4 1800 a 1300 m

Turb.ina Pelton 2 GH 12 a 20 4a6 1300 a 550m
Turbina Pelton 4 GH 20 a 30 6a9 550a 300m
1
Francis lenta 60 a 125 18 a 38 350a 150m
Francis normal 125 a 175 38 a 53 150a 120m

175 a 225 53 a68 1 120a 80m
Francis rpida 225 a 350 68 a 105 80a35m
350 a 450 105 a 135 1 35a.20im
300 a 600 105 a 180 1 35a 18m
Ka plan
Tubular 300 a 800 180 a 240 18 a 12m
Hlice 500 a 1000 240 a 300 12a 5m
1
ITDG Per [32]. "Manual de Mini y Micro centrales Hidrulicas" Una gua
para el desarrollo de proyectos. lntermediate Technology Development Group,
ITDG-PER. Este manual proporciona informacin sobre el diseo de sistemas
de energa hidrulica en pequea escala. Estos sistemas se clasifican, por lo ge-
neral, en tres rangos de potencia: en gran escala, mini y micro generacin. En la

18
tabla 1.2 (ITDG Per [32]) se muestra las caractersticas principales de turbinas
hidrulicas.
Tabla 1.2 Caractersticas principales de turbinas hidrulicas
Inventor y ao Ns 1 Q H p rmax
TURBINA
3
' de patente rpm m /s m kW %
Lester Pelton 1 eh: 30

1
A PELTON (EE.UU) 2 eh: 30-50 0.05-50 30-1800 2-300000 91
1880 4 eh: 30-50

e 6 eh: 50-70
'
Eric Crewdson
e TURGO (G. Bretaa) 60-260 0.025-10 15-300 5-8000 85
1920
1
A.G. Michell
1
: MleHELL-
1-50
(Australia) 1903
1 BANKI D. Banki (Hung)
40-160 0.025-5 1-750 82
1917-1919 (200)
N
'
Bomba Dionisio Papin
R Rotodinmi- (Francia) 30-170 0.05-0.25 10-250 5-500 80
. ca 1689
1
E James Francis L: 60-150

FRANeiS (G. Bretaa) N: 150-250 1-500 2-750 2-750000 92
1848 H: 250-400
A
P. Deriaz
DERIAZ (Suiza) 60-400 500 30-130 100,000 92
1956
G' V. Kaplan
: KAPLAN y
: de hlice
(Austria) 300-800 1000 5-80 2-200000 93
1912
1
AXIALES:
!
-Tubular Kuhne-1930
300-800 600 5-30 100,00 93
1
-Bulbo . Hugenin-1933
i N
- Generador Harza-1919
Perifrico
Nota: NS: velocidad especifica

eh: chorro
L: lento
N: normal
R: rpida
19
En la Tabla 1.3 (ITDG Per [32]) se muestra la Eficiencia del grupo de
generacin y en la Tabla 1.4 (ITDG Per [32)) se muestra la clasificacin de mini
centrales hidrulicas (M.C.H.) segn la potencia.
TABLA 1.3 Eficiencia del grupo de generacin.
Potencia TIPO DE TURBINA

kW Pelton . Michell - Banki Francis Axial
<50 ; 58-65% 1
54-62% 59-65% 58-66%

51-500 65-69%. 62-65% 66-70% 66-70%1
501-5000 69-73% 65*% 70-74% 70 -74% 1
. .
*Limitacin pormx1ma potencia de 1000w.
*Fuente: ONUDI Mini Hydro Power Stations, UNIDO/OS, Viena (1981)
En la tabla 1.4 se observan los valores de potencia establecidos para la
clasificacin de una mini central hidrulica (MCH) por organismos internacionales.
Tabla 1.4 Clasificacin de MCH segn la potencia .
1
REGIN INSTITUCIN MICRO MINI .1 PEQUEA GRANDES
CENTRAL CENTRAL '1 CENTRAL CENTRALES
Mundial ONUDI 1 < 100kW 101 -2,000 Kw ' >2,000- >10,000 kW . >10,000 kW
'1
2
Latinoamrica OLADE <50kW 51-500Kw 1 >500- <5,000 kW >5,0000 kW
1 1
..
1. Orgamzae~on de las NaCiones Umdas para el Desarrollo Industrial.
2. Organizacin Latinoamericana de la Energa.
Para el desarrollo del trabajo de investigacin se ha propuesto los si-
guientes valores caractersticos de las turbinas hidrulicas (turbinas de accin y
turbinas de reaccin), que se resumen en la Tabla 1.5. Las turbinas hidrulicas
modernas estn clasificadas hoy en da en dos grandes grupos y que se emplean
en las centrales hidrulicas, sean estas micro, mini, pequea o grandes.

20
TABLA 1.5 Valores caractersticos de las tu~binas hidrulicas.
,1 Hmax
Tipos de Ns Q p
Clases de Turbinas adm. 11
'
'
Rodete (rpm) (m;s/seg) (m) % kW
'
1
PELTON
1 Ch
2 Ch
10-30
30-50
'0.03-0.41
0.07-1.1
90-300
60-300
70-
91
30- 900.
30-2500
:TURBINAS
:oE 4Ch 30-50 0.65-2.0 150- 300 750-4000
ACCIN 60-260
'
'
35-175 65-
TURGO 0.83-4.5 750-1500
! 85
1
65-
MICHELL-BANKI 40-160 0.12-1.1 11-90
82
30-150
BOMBA
! 0.05-0.25
60-
ROTODINAMICA
30-170 10-250
80
5-50
1
Lenta 60-125 1.3-7 50-200 2000-4000
Turbinas Normal 125-225 0.25-2.5 20-150 80- 150-750

FRANCIS
de Rpida 225-350 0.6-12 10- 55 92 30-4000
Reaccin 'Extra rpida 350-450 0.7-3.0 5- 9 30-180
Ka plan 300-600 5-25 8,5-35 90 400-4000
KAPLAN Hlice 500-1000 1.4-11 2,5-10 85 30-400
Tubular 300-1000 7.4-25 2,5-7 93 400-1500
Wilfredo Jara T. [43] (1998). "Mquinas Hidrulicas" Fondo Editorial INI-
FIM. Instituto de Investigacin de la Facultad de Ingeniera Mecnica. Este ma-
nual est estructurado en dos partes. La primera desarrolla lo referente a las tur-
binas Hidrulicas, el estudio terico a los diversos tipos de turbinas y un anlisis
detallado de las turbinas de reaccin (Francis, Kaplan, Hlice) y de Accin (Pel-
ton). La segunda parte est dedicada a las bombas centrfugas.
TSUGUO NOZAKI, [46]. "Guia para la Elaboracin de Proyectos de Pe-
queas Centrales Hidroelctricas destinadas a la Electrificacin Rural del Per"
Julio de 1968. Esta gua tiene por objeto proporcionar a los Ingenieros Civiles y
Mecnicos, bases y capacidad como proyectistas de Centrales Hidrulicas pe-
queas, por cuanto son pocos los ingenieros especialistas en proyectos de Cen-
trales Hidrulicas. Esta gua incluye varias tablas para la estimacin de costos. En
21
la Tabla 1.6 se muestra la relacin del nmero de polos con el de revoluciones y
la frecuencia del generador.
Tabla 1.6 Nmero de polos con la frecuencia del generador.

Generador '
Generador
Nmero Velocidad de Rotacin Nmero. Velocidad de Rotacin
1
1
de RPM de RPM
polos Frecuencia 1 Frecuencia polos Frecuencia Frecuencia
50 60 50 60
1
4 1,500 1 1,800 20 300 360 '
6 1,000 !1 1,200 22 272 327 '1
8 750 :1 900 1
24 250 300
10 600 : 720 26 231 277 l
12 500 1 600 28 214 257
14 428 514 30 200 240
16
18
375
333
'
1
1
450
400
i 32
'
187.5 225
!1
'
Tsuguo Nozaki sostiene que se elige el tipo de turbina en funcin de la
cada y el caudal empleando la figura 1.1.
10
?
' 1
5 1 1
0.03 (1(11 0.1 0.2 IAJJ (U tU 11.1 14 ~ 2 3 4 5 7 111 1.()
Q Caudal (m3Jseg)
Fig. 1.1 Alcance y aplicacin del tipo de turbina.
En el desarrollo del trabajo de investigacin y empleando el grfico mos-
trado en la figura 1. 1, se ha propuesto la figura 1.2 en donde podemos realizar

22
una seleccin rpida de una turbina para una mini central; para utilizar este dia-
grama se requiere conocer la altura y caudal.
1 Tulbina Pelton _1 ch. _

2 TUibina Pelton 2 ch.
Q Caudal (m3/seg)
Fig. 1.2 Diagrama de seleccin de turbinas hidrulicas.
TSUGUO NOZAKI, [47]. "Gua para la Elaboracin de Estudios Prelimina-
res de Factibilidad de Proyectos de Pequeas Centrales de Mediana o Grande
-Capacidad en el Per" Enero de 1969. Esta gua tiene por objeto proporcionar a
los ingenieros proyectistas e inspectores de proyectos de Centrales Hidrulicas,
bases y capacidad en estas grandes centrales. La presente gua capacita al pro-
yectista a confeccionar los estudios de mercado de energa elctrica, hidrologa
del ro, geologa, topografa, ubicacin del proyecto, estimacin del costo de cons-
truccin, comparacin de las alternativas y justificacin del proyecto.
A.R. BARRON. [7] "Las Redes Neuronales" El cerebro consta de un gran
nmero (aproximadamente 1011 ) de elementos altamente interconectados

23
(aproximadamente 104 conexiones por elemento), llamados neuronas. Estas neu-
ranas tienen tres componentes principales:
1. dendritas,
2. cuerpo de la clula o soma,
3. axn.
Estas componentes tienen las siguientes funciones:
Las dendritas, son el rbol receptor de la red, son como fibras nerviosas
que cargan de seales elctricas el cuerpo de la clula.
El cuerpo de la clula, realiza la suma de esas seales de entrada.
El axn es una fibra larga que lleva la sefial desde el cuerpo de la clula
hacia otras neuronas. El punto de contacto entre un axn de una clula y una
dendrita de otra clula es llamado sinapsis. En la figura 1.3 se muestra un es-
quema simplificado de la interconexin de dos neuronas biolgicas.
F.ig. 1.3 Neuronas Biolgicas.
Existen varias formas de nombrar una neurona artificial, es conocida co-
mo nodo, celda, unidad o elemento de procesamiento (EP); En la figura 1.4 se
observa un EP en forma general y su similitud con una neurona biolgica.

24
x,
X,
x,
x,
x,
J
x.
Fig. 1.4 COmparadn de la neurona biolgica y la neurona artifidal.
Dentro de una red neuronal, los elementos de procesamiento se encuen-
tran agrupados por capas, como se muestra en la figura 1.5; una capa es una
coleccin de neuronas; de acuerdo a la ubicacin de la capa en la RNA, esta re-
cibe diferentes nombres:
1. Capa de entrada: Recibe las seales de la entrada de la red, algunos

autores no consideran el vector de entrada como una capa pues all
no se lleva a cabo ningn proceso.
2. Capas ocultas: Estas capas son aquellas que no tienen contacto con
el medio exterior, sus elementos pueden tener diferentes conexiones y
son estas las que determinan las diferentes topologas de la red.
3. Capa de salida: Recibe la inforrriacin de la capa ulta y transmite la
respuesta al medio externo.
capa de
Salida
Fig. 1.5 Capas de una red.
Los principales tipos de redes se clasifican en:

1. PERCEPTRN.
2. ADALIN
3. BACKPROPAGATION.
CAPTULO 2
MODELOS MATEMTICOS PARA
LAS DIMENSIONES DE LAS TURBINAS
2.1 MODELO MATEMTICO POR EL MTODO TRADICIONAL
2.1.1 SELECCIN DE LAS TURBINAS HIDRULICAS
Las turbinas hidrulicas no pueden fabricarse en serie. Cada salto {H, Q)

requiere un diseo concreto. La velocidad especifica salto ns es el parmetro cla-
ve para fijar en primer lugar el tipo de turbina y en segundo lugar la forma y el di
mensionamiento correspondientes.
En Europa la frecuencia de la corriente elctrica es de 50 Hz (en Amrica

es de 60Hz, por lo que la velocidad (el nmero de revoluciones) en rpm ser de
3000 (para 1 par de polos en el alternador), 1500 (para 2 pares de polos), 1000
(para 3 pares de polos), 750 (para 4 pares de polos), y as sucesivamente.
Los datos que se necesita son la altura neta H y el caudal normal, o de

diseo a*. Para calcular la potencia normal Pe. que vamos a disponer a partir de H
y Q, tenemos la expresin antes desarrollada:
1. POTENCIA DE LA TURBINA (P).
La potencia en hp de la turbina se determina utilizando la siguiente

relacin:
26
p = lOOOxQxH X1],
(2.1)
76
En donde: P = Potencia en Hp
Q = Caudal en metros cbicos por segundo (m 3/seg)
H = Altura del salto (salto neto) en metros (m),
llt = Rendimiento de la turbina, en tanto por uno; llt/1 00
1000 = Cantidad de litros de agua (o kg) en un metro cbico
(m3)
76 = Proviene de la equivalencia existente entre el HP y el
kgm/seg, como unidades de potencia;
As: 76 kgm/seg 1 HP
1OOxQxHXIlt kgm/seg P
De donde: p = lOOOxQx H X1J1

76
La potencia en KVV de la turbina se utiliza la siguiente relacin:
pkw = lOOOxQxHxrr xHP x lkw

76 1.340Hp
P.kW = lOOOxQxHxrr 22
1.340x 76 ( . )
Ampliando el clculo al alternador y considerando el rendimiento total11r.

producto del rendimiento llt en la turbina por el rendimiento lla en el alternador
tenemos: T/r = T/, + 11a
2. NMERO ESPECFICO DE REVOLUCIONES DE POTENCIA (Ns).
La velocidad especfica representada normalmente por N5 , deno-

minada tambin velocidad especfica absoluta o velocidad angular
27
especfica, corresponde al nmero de revoluciones por minuto que dara
una turbina semejante a la que se desea proyectar (de igual forma pero
dimensiones reducidas), la cual, instalada en un salto de 1 m. de altura,
proporcionara una potencia de 1CV (0.9862 HP). Para calcular el nmero
especfico de revoluciones, utilizamos la siguiente relacin:
n r~
N =
S HA/Ji
Vi (2 3)
.
En donde: Ns = Velocidad especfica en rpm
n = Velocidad de rotacin en rpn,
P = Potencia en HP
H = Altura del salto en metros
= Nmero de boquillas
Si i = lCh, Ns =0.03572 x n (2.3a)
Si i = 2Ch, Ns = 0.02526 X n (2.3b)
Si i = 4Ch, Ns = 0.01786x n (2.3c)
2.1.2 MODELO TRADICIONAL EN EL DISEO DE UNA TURBINA PELTON

([31] Quantz L, [43] Jara W., [32] ITDG Per)
Las turbinas Pelton son turbinas de chorro libre que se acomodan a la

utilizacin de saltos de agua con mucho desnivel y caudales relativamente pe-
queos, con mrgenes de empleo entre 60 y 300 metros, consiguindose rendi-
mientos mximos del orden del 90%.
1. Salto neto en la Turbina Pelton de un inyector (Hn)
En el caso de un solo inyector y eje de la turbina horizontal, si se

considera la zona comprendida desde inmediat~mente antes del inyector,
28
punto A de la figura 2.1, hasta el punto de tangencia del chorro con la cir-
cunferencia media de la rueda, punto A 1, de acuerdo con la definicin da-
da de salto neto, se tiene:
c2
H =-o +Po +z -z
n 2g r o a
Fig. 2.1 Turbina Pelton de un inyector.
2. Salto neto en la turbina Pelton de varios inyectores.
Si por ejemplo se considera que la turbina tiene dos inyectores,

figura 2.2, de diferentes caractersticas que proporcionan los caudales 01
y 0 2 , (caso poco frecuente), el estudio se puede hacer como si el conjunto
constase de dos turbinas, para los respectivos caudales 01 y 02, saltos
correspondientes Hn1 y Hn2, y potencias respectivas Nn1 y Nn2. de la forma:
c2
H n2 =~+Po
2g
2
r +zo2 -za2 N
' n2 =
yQH
2 n2
29
En este caso se puede tomar como salto neto el salto neto prome-
diado Hn, que es el que tendra una turbina de un solo inyector que con el
caudal total, Q =Q1 + Q2, diese la misma potencia, es decir:
Fig. 2.2 Turbina Pelton de dos inyectores.
Que se puede ampliar fcilmente para una turbina de eje horizontal

y cualquier nmero de inyectores. Si la turbipa fuese de eje vertical, las
expresiones se simplifican, (Hn1 =Hn2 =... ),sobre todo, en el caso de te-
ner los inyectores la misma seccin, (Q1 = Q2 =... ), caso cada da ms
frecuente.
30
2.1.2.1 DISEO DE LOS DIMETRO PRINCIPALES.
El rodete de una turbina Pelton mostrado en las figuras 2.3 y 2.4, se ob-
serva que se necesita calcular el dimetro del chorro (d dch}, dimetro del rode-
te (D2) y el dimetro externo (D3).
~
1
-.
Fig. 2.3 Rodete de una turbina Pelton.
1. Dimetro del chorro (dch)
dch = 550~ .] (2.4)
En donde: dch = Dimetro del chorro, en mm

H = Altura del salto en metros (m),
= Nmero de boquillas
Fig. 2.4 Dimetro del rodete.

31
2. Dimetro medio del Rodete (D2)
D2 =km X 1000 Jii (2.5)

n
En donde: D2 = Dimetro medio del rodete en mm

Ko2 = Constante, 37 ~ ko2 S 39
n = Velocidad de rotacin en rpm
3. Dimetro externo del Rodete (D3)
En donde: D3 = Dimetro externo del rodete, en mm

D2 = Dimetro del rodete, en mm
h = Altura de la cuchara, en mm
4. Diseo de las dimensiones de las paletas
Las dimensiones de la cuchara son proporcionales al dimetro del
chorro, la figura 2.5 muestra las proporciones bsicas de una turbina Pel-
ton.
Las paletas o cazoletas, en las versiones ms modernas, tienen
forma de elipsoide; la arista que las divide en dos puede quedar al ras de
los bordes de las mismas, o a veces se queda algo adentro, como se ob-
serva en la figura 2.6. Las medidas se adoptan en funcin del dimetro
del chorro.
32
Fig. 2.5: Dimensiones bsicas de una paleta Pelton.
1. Ancho de la paleta: b = 3.75 x dch (2.7a)
2. Altura de la paleta: h = 3.50 x dch (2.7b)
3. Espesor de la paleta: t = 1.50 x dch (2.7c)
4. El nmero de cucharas la calculamos de la siguiente relacin:
Z= ~ {~2 )+kz (2.8)

eh
En donde: 02 = Dimetro medio del rodete, en mm

Dch = Dimetro del chorro, en mm
Kz = Constante,. 14S kz S16
Z = Nmero de paletas
5. El paso te, entre cucharas se calcula utilizando la siguiente relacin:
t = 7l'.D3 (2.9)
e Z
En donde: 03 = Dimetro exterior del rodete, en mm
te = Paso entre paletas, en mm
Z = Nmero de paletas
33
f
f
t
Las paletas no se colocan exactamente en sentido radial, sino en

forma tal que el chorro al alcanzar de lleno una de ellas, se halle perpen-
dicular a la arista de la misma, quedando separada la paleta del inyector
el mnimo que permita la construccin, atacndola el chorro lo ms cerca
posible de la corona del rodete, para que las prdidas a la salida resulten
ms pequeas, haciendo que la circunferencia tangente al chorro (circun-
ferencia Pelton}, corte a las cazoletas a 2h/5 medido desde el interior. Las
paletas tienen que ir dispuestas de tal forma, que su separacin no permi-
ta que se pierda agua, es decir, cuando el chorro abandone una, debe
encontrarse con la siguiente, figura 2.7.
La paleta en la posicin (a) entra en contacto con el agua, en la (b)

est en un punto intermedio, de forma que capta una parte del chorro, y
en la (e) capta todo el chorro. El tiempo que tardara una partcula ficticia
de agua en recorrer el espacio (AF) sera el mismo que tardara el borde
de la cazoleta en recorrer el espacio (AE}, por lo que:
34
11
AF AE
t=-=-
C U
~2
Fig. 2.7: Separacin entre paletas Pelton.
2.1.3 MTODO TRADICIONAL EN EL DISEO DE UNA TURBINA FRANCIS

[31] Quantz L, [43] Jara W., [32] ITDG Per.
Las turbinas Francis, son de tipo radial, admisin centrpeta y tubo de as-
piracin; siempre se construyen en condiciones de rendimiento mximo, dando
lugar a cuatro tipos fundamentales, lentas, normales, rpidas y extra rpidas, dife-
rencindose unas de otras en la forma del rodete. Haciendo uso de la ecuacin
fundamental de las turbinas en condiciones de rendimiento mximo a 2 = 90 resul-
ta:

35
2.1.3.1 TIPOS DE RODETES
1. Rodetes lentos:
Se utilizan en los grandes saltos, figura 2.8; con ellos se tiende a

reducir el nmero de revoluciones, lo cual supone un aumento del dime-
tro D1 del rodete respecto al del tubo de aspiracin 0 3 (01 > 0 3). El ngulo
a la entrada P1 < 90, (a1 < 15) y su nmero de revoluciones especfico
est comprendido entre 60 y 125. En estas turbinas se obtienen velocida-
des tangenciales reducidas. Los labes tienen forma especial, aumentan-
do su espesor a fin de que su cara posterior gue mejor el chorro que
atraviesa el rodete deslizndose en contacto con las paredes de los la-
bes, ya que de no ser as el chorro se despegara de la cara posterior de
los mismos, originando remolinos.
~--------~.~------~

~-~---
\
\.,
\
\
\
\\. i
\
\.
___ . . ,ve;
Fig. 2.8 Rodete Francis Lento, P1 > 90
2. Rodetes normales:
Se caracterizan porque el dimetro D1 es ligeramente superior al

del tubo de aspiracin 0 3 , figura 2.9. El agua entra en el rodete radialmen-
te y sale de l axialmente, entrando as en el tubo de aspiracin. El valor
de p1 es del orden de 90, (15< a 1 < 30) y se alcanza un ns comprendido
entre 125 y 225 rpm. No existen apenas huelgos entre el distribuidor y la
rueda.
36
1-----'e,,,--------!
Fig. 2.9 Rodete Francis Normal, P1 = 90
En estas turbinas, en el tringulo de velocidades a la entrada, al ser

P1 =90, se cumple:
u1 = c1Cosa1
2
u1 = rhidgHn
3. Rodetes rpidos.-
Permiten obtener elevadas velocidades de rotacin para valores de

ns comprendidos entre 225 y 450 (rpida: 225 y 350, extra rpidos: 350 y
450}, figura 2.10 y 2.11. El dimetro del rodete D1 es menor que el 0 3 del
tubo de aspiracin y el cambio de direccin del agua se efecta ms
bruscamente que en las turbinas normales.
/
.''

/
j
/
1
/
fig. 2.10 Rodete Francis Rpido, P1 < 9oo

37
Fig. 2.11 Rodete Francis Extra Rpido, P1 < 90
El rodete de una turbina Francis mostrado en la figura 2.12, se ob-

serva que se necesita calcular los dimetros del rodete D1, D2 y D3.
H, <t_
bo
01
Fig. 2.12 Dimensiones principales de un rodete.
2.1.3.2 DISEO DE LOS DIMETRO PRINCIPALES.
1. DIMETRO DEL TUBO DE ASPIRACIN (D3)
-J!
D3 -IOOO -
7lC3
(2.10)
En donde: D3 = Dimetro en el tubo de aspiracin, en mm

C3 = Velocidad de salida, m/seg
38
Para determinar la velocidad de salida C 3 utilizamos la ecuacin (2.11 ):
2xgxkc xH
C=
3 (2.11)
100
En donde: C3 = Velocidad de salida, m/seg

g = Gravedad, en m/seg 2
Kc = Constante segn la turbina, en tanto por uno; llt/1 00
Considerar 4% para Francis Lenta, 6% para Francis Normal,
12% para Francis Rpida y 25% para la Francis Extra rpi-
da.
2. DIMETRO EXTERNO DEL RODETE (D1)
Para calcular el dimetro externo del rodete D1 (Lenta, Normal,

Rpida y Extra rpida) de la turbina mostrada en la figura 2.10, utilizamos
la siguiente relacin:
En donde: D1 = Dimetro externo del rodete, mm

D3 = Dimetro del tubo de aspiracin, en mm
N5 = Velocidad especfica, en rpm
3. DIMETRO INTERNO DEL RODETE (D2)
Para calcular el dimetro interno del rodete D2 de la turbina mos-
trada en la figura 2.10, utilizamos la siguiente relacin:

39
D 2 =D3 x(0.96+0.00038xNs) (2.13)
En donde: D2 = Dimetro interno del rodete, mm

Ns = Velocidad especfica, en rpm
2.1.3.3 ANCHO DE LA CORONA DIRECTRIZ (bo)
El ancho de la corona directriz se calcula segn la turbina Francis selec-

cionada, utilizando las siguientes ecuaciones:
1. FRANCIS LENTA (FL)
(2.14a)
En donde: b0 = Ancho de la corona directriz, en mm

D2 = Dimetro interno del rodete, en mm
kL = Constante de diseo para Francis Lenta, 0.08 :S kL s
0.119 (seleccionar uno de los dos valores)
2. FRANCIS NORMAL (FN)
bo =D [(Ns -125)x0.15 +k ] (2.14b)

l 100 N

D2 = Dimetro externo del rodete, en mm
kN =Constante de diseo para Francis Normal.
0.15 :S kN s 0.30 (seleccionar uno de los dos valores)
40
3. FRANCIS RPIDA (FR)
bo =D [(N8 -225)x0.22 +k ] (2.14c)

1
125 R
En donde: bo = Ancho de la corona directriz, en mm

KR = Constante de diseo para Francis rpida.
0.1582 :::; kR :::; 0.30 (seleccionar uno de los dos valores)
4. FRANCIS EXTRA RPIDA (FER)
bo =D [(N8 -225)x0.19 +k ] (2.14d)

1 100 ER
En donde: b 0 = Ancho de la corona directriz, en mm

KER = Constante de diseo para Francis Normal.
0.1807 :::; kER :::; 0.52 (seleccionar uno de los dos valores)
2.1.3.4 CLCULO DEL NMERO DE LABES (Zo)
Perfil de los labes de las directrices.- Las directrices son superficies

desarrollables cilndricas de generatrices paralelas al eje de rotacin de la turbina;
su perfil se determina teniendo en cuenta que no hay transformacin de energa
hidrulica en mecnica al paso del agua por el distribuidor, procurando evitar al
mximo las prdidas por rozamiento y torbellinos. Para calcular este perfil se de-
termina la trayectoria ideal de la vena fluida; para ello, como el paso del agua por
el distribuidor no genera ningn tipo de energa, si consideramos un punto A cual-
quiera de la trayectoria (OA 1) del agua en el distribuidor, figura 2.11, la condicin:
41
d(uc)
dN = yQ n =O=>ucn =cte
g
ucn =rwcn =lw=ctei=Cte=>rc
n =k
Por lo que la circulacin por el distribuidor es rotacional.
La componente Cn no proporciona caudal alguno, por lo que el caudal que
atraviesa el distribuidor es:
Q = 27rb1cr = Cte
re =_fL=Cte
r 27bl
Fig. 2.13 Trayectoria de la vena fluida en el disbibuidor.
El nmero de alabes para la turbina Francis seleccionada, se calcula con

las siguientes ecuaciones:
1. FRANCIS LENTA (FL)
z
FL
=18-.[(Ns
.
-60)].
65
(2.18)
En donde: ZFL = Nmero de alabes para una turbina Francis lenta

Ns = Velocidad especfica, en rprn
42
2. FRANCIS NORMAL (FN)
Z
FN
= 17 -.[ (Ns-125)x
lOO
2]. (2.19)
En donde: ZFN = Nmero de alabes para una turbina Francis normal

z = 1S-[ (Ns-225)x2]', (2.20)

FR 125
En donde: ZFR = Nmero de alabes para una turbina Francis rpida

4. FRANCIS EXTRA RPIDA (FER)
z FER =13-[. (Ns100

-350)] (2.21)
En donde: ZFER = Nmero de alabes para una turbina Francis extra

rpida
2.1.4 MODELO TRADICIONAL EN EL DISEO DE LA TURBINAS DE AC-

CIN TOTAL [31] Quantz L, [43] Jara W., [32] ITDG Per
la importancia de las turbinas Hlice, Tubular y Kaplan en pequeos sal-

tos con grandes caudales, las hacen idneas tanto en posicin horizontal como
vertical. La tendencia a la construccin. de turbinas cada vet. ms rpidas, para
velocidades especficas Ns mayores de 450, conduce a las turbinas indicadas, ya
que en las turbinas Francis con Ns del orden de 400, el agua no se puede guiar y
conducir con precisin. EJ rodete est compuesto por unas pocas palas, que le
43
confieren forma de hlice de barco; cuando stas sean fijas, se llama turbina hli-
ce, mientras que si son orientables se denominan turbinas Kaplan; en ambos ca-
sos las turbinas funcionan con un nico sentido de giro de rotacin; son pues tur-
binas irreversibles.
La trayectoria del fluido recorre lneas contenidas en superficies cilndricas
de revolucin en torno al eje de la turbina. Son de este tipo las turbinas tipo Ka-
plan, Hlice y Tubulares. Para una turbina hlice del tipo que sea, si se supone
una velocidad de entrada c1 uniforme para toda la altura del perfil, las distintas
curvaturas de las palas se deducen de las distintas velocidades perifricas u que
tiene la rueda en los diversos puntos, figura 2.14, de forma que siempre se cum-
pla que: r u = Cte
: Entradl del agoo

'
:r-:-:---t>t -------- .
l
1
1 '
-~
~--~ ; (2)
-~l ' . 1.
Salida de""""'
-~
, . ----
.12 ,.- 2
] ,1<1,,-'
......,.. _ _ _
Wi '7
Fig. 2.14 Tngulo de velocidades
2.1.4.1 DISEO DE LOS DIMETRO PRINCIPALES DE LA TURBINA DE AC-

CIN TOTAL.
El rodete de las turbinas de accin total mostrada en la figura 2.15, se ob-
servan que se necesitan calcular los dimetros del rodete D1, D2 , 0 3 y Dn.
1. DIMETRO DEL TUBO DE ASPIRACIN (D3):

Estas frmulas empricas son aplicables para las turbinas Kaplan,
Hlice y Tubular.
44
En donde: Da = Dimetro en el tubo de aspiracin, en mm

Ca = Velocidad de salida, m/seg
Fig. 2.15 Dimensiones principales de un rodete.
Para determinar la velocidad de salida Ca utilizamos la siguiente

ecuacin:
2xgxkcxH
C3= (2.23)
100
En donde: Ca = Velocidad de salida, m/seg

g = Gravedad, en m/seg2
Kc = Constante, en tanto por uno; 11t11 00
Considerar para la 'Kaplan, Hlice y Tubular el 30%.
2. DIMETRO DEL RODETE (D2)

Para calcular el dimetro externo del rodete D1 de la turbina (Ka-
plan, Hlice y TubUlar) mostrada en la figura 2.15, utilizamos la siguiente
relacin:
45
(2.24)
En donde: D2 = Dimetro del rodete, mm

3. DIMETRO DEL CUBO DEL RODETE (DN)
Para calcular el dimetro del cubo del rodete DN de la turbina (Ka-

plan, Hlice y Tubular) mostrada en la figura 2.15, utilizamos la siguiente
relacin:
(2..25)
En donde: DN = Dimetro del cubo del rodete, mm

4. DIMETRO MEDIO DEL RODETE (D1)
Para calcular el dimetro medio del rodete D1 de ~a turbina (Kaplan,

Hlice y Tubular) mostrada en la figura 2.15, utilizamos la siguiente rela-
cin:
(2.26)
En donde: D1 = Dimetro medio del rodete, mm

DN = Dimetro del cubo del rodete, en mm
2.1.4.2 ANCHO DE LA RUEDA ,DIRECT.RIZ (Bo)
Si la admisin est al 80%, el gasto ser de 0.8 Q y se considera que la

disminucin de seccin por el espesor de las paletas diredrices, alcanzar al
46
10%; la anchura de la rueda directriz (Bo) se calcula segn la turbina de accin
total seleccionada, utilizando la siguiente ecuacin:
_ 0.8 X Q
Bo- (2.27)
0.9 x D2 x 7l x Cmo
En donde: Bo = Ancho de la rueda directriz, en mm

02 = Dimetro del rodete, en mm
Cm o = Velocidad meridiana, en m/seg
Q = Caudal, en m3/seg
La seccin libre de salida debe ser mayor que la ~uperficie de entrada en
el rodete: 0.6 Cm1 ~ Cmo ~ O. 7 Cm1
Utilizar en el diseo: Cmo = 0.65 X Cml (2.28)
En donde: Cm1 = Componente de la velocidad de salida, m/seg
Para calcular esta componente utilizamos la siguiente relacin:
6
4x0.8 x Qxl0
e mi
=
(D~ -Di.) 1l
/
m sea
o
(2.29)
En donde: Cm1 = Componente de la velocidad de salida, en m/seg

02 = Dimetro del rodete, en mm
DN = Dimetro del cubo del rodete, en mm
2.1.4.3 CLCULO DEL NMERO DE ALABES (Z)
El nmero de alabes para la turbina de accin total seleccionada, se cal-
cula con la siguiente ecuacin:

47
Z = 2170-1.2xN8
(2.30)
250
En donde: Z = Nmero de labes

2.1.5 MODELO TRADICIONAL EN EL DISEO DE LA TURBINA MICHELL

31] Quantz L, [43] Jara W., [32] ITDG Per
La turbina de flujo transversal o Micheii-Banki e~ una mquina utilizada
principalmente para pequeos aprovechamientos hidroelctricos. Sus ventajas
principales estn en su sencillo diseo y su fcil construccin lo que la hace atrae-
tiva en el balance econmico de un aprovechamiento a pequea escala. No obs-
tante esto no impide que la turbina se utilice en grandes instalaciones. Aunque la
turbina de flujo transversal se conoce como una mquina de pequea escala,
existen actualmente mquinas de este tipo de hasta 6 MW.
La turbina consta de dos elementos principales: un inyector y un rotor (fi-
gura 2.16). El agua es restituida mediante una descarga a presin atmosfrica. El
rotor est compuesto por dos discos paralelos a los cuales van unidos los labes
curvados en forma de sector circular.
Fig. 2.16 Partes principales de una turbina Michell.

48
La energa del agua es transferida al rotor en dos etapas, lo que tambin
da a esta mquina el nombre de turbina de doble efecto, y de las cuales la prime-
ra etapa entrega un promedio del 70% de la energa total transferida al rotor y la
segunda alrededor del 30% restante (figura 2.17).
Fig. 2.17 Turbina Michell.
Los ensayos realizados por distintos investigadores sitan el rendimiento
hidrulico de esta mquina entre un 65~70%, otros autores mencionan un 61%
aclarando que la segunda etapa entrega un 17%, y en general muchos autores
indican un 70% hasta un 84%. Una caracterstica atractiva de esta mquina es la
forma aplanada de su curva de rendimiento. Esto se logra con un diseo de la
turbina con admisin parcial.
2.1.5.1 DISEO DE LOS DIMETRO PRINCIPALES DE LA TURBINA
El rodete de la turbina Mitcheii-Banki de accin total mostrada en la figura
2.18, se observan que se necesitan calcular los dimetros del rodete 0 1 y 0 2 .

49
a= a'+ a"
Fig. 2.18 Dimetro del rodete.
1. DIMETRO EXTERIOR DEL RODETE (D2)
El dimetro exterior del rodete mostrado en la figura 2.18, la pode-
mos calcular utilizando la ecuacin (2.31}:
D2 =K X lOOOJii {2.31)
m N
En donde: D 2 = Dimetro exterior del rodete, en mm

H = Altura del salto, en metros (m),
N = Velocidad de rotacin, en rpm
Km = Constante de la turbina Mitchell, 37 s Km s 39
2. DIMETRO INTERIOR DEL RODETE (D1)
El dimetro interior del rodete mostrado e11 la figura 2.18, la pode-
mos calcular utilizando la ecuacin (2.32):
(2.32)
50
3. DIMETRO DEL CHORRO (dchorro)
Suponiendo que se adopta un chorro cilndrico, el dimetro del cho-
rro la calculamos con la ecuacin (2.33):
d chorro = 1000 X-~xQ

--_ (2.33)
C1 x;r
En donde: Dchorro = Dimetro del chorro, mm

c1 = Velocidad del chorro, en m/seg
4. VELOCIDAD DEL CHORRO (C1)
Dada la cercana entre el inyector y el rodete, y en el intersticio
comprendido bajo el arco de admisin, existe una pequea sobre presin
despreciable y comprendida bajo el arco de admisin dado por el ngulo
e. La velocidad del chorro, se calcula utilizando la siguiente relacin:
(2.34)
En donde: C1 = Velocidad del chorro, m/seg

g = Aceleracin de la gravedad, 9;80665 m/seg2
H = Altura, en m
fP = Coeficiente para la salida del agua:
0.95 ~ <p ~ 0.98
5. DIMETRO MEDIO DEL RODETE (Drn)
El dimetro medio del rodete mostrado en la figura 2.18; la pode-
mos calcular utilizando la ecuacin 2.35:

(2.35)
En donde: Dm = Dimetro medio del rodete, en mm

02 = Dimetro exterior del rodete, en mm
D1 = Dimetro interior del rodete, en mm
6. ESPESOR DEL CHORRO.
Para calcular el espesor del chorro utilizamos la ecuacin 2.36.
(2.36)
Donde: a = Espesor del chorro, en mm,

D2 = Dimetro exterior del rodete, en mm
ka = Coeficiente que depende del ngulo del inyector
a y del ngulo de admisin 9.
Para a =16 se pueden tomar los siguientes valores:

e 60 goo 120
ka 0.1443 0.2164 0.2886
En el caso de usar una paleta directriz central, como se observa en
la figura 2.16, el espesor del chorro: a= a'+ a".
7. VELOCIDAD ANGULAR DE LA RUEDA (n).
Para calcular el nmero de revoluciones de la rueda, utmzamos la
ecuacin 2.37.
n = lOOOx ( 60 u) (2.37)
D2.7r
52
En donde: n = Velocidad angular de la rueda, en rpm

u1 = Velocidad tangencial, en m/seg
D2 = Dimetre exterier del redete; en mm
8. VELOCIDAD TANGENCIAL (u1).
La velocidad tangencial u1 en el rodete se calcula con la ecuacin
2.38.
(2.38)
En donde: H = Altura, en m
= Velocidad tangencial; en m/seg
9. ANCHO. DEL RODETE (B).
Si el ngulo del inyector del rodete es a ;: 16, este ngulo vara
entre 15 S a ~ 20;
El ancho del rodete (figura 2.18) la calculamos con la ecuacin
(2.39}.
Q 1000
B=98.8x x - - (mm) (2.39)
D2 xJii B
En donde: B = Ancho del rodete, mm

Q = Caudal, m3/seg
H = Altura, en m
D2 = IJjmetr exterior del rodete, mm
9 = ngulo de admisin, valores de 30,60,120
10. MEDIDAS Y NMERO DE PALETAS
El nmero. de. alabes. para la turbina Michell. seleccionada, se calcu-
la con las siguientes ecuaciones:

53
Z::;:;D2 +900 (2.40)

50
z= ttxD
.... 2 (2.41)
fa .
En donde: z = Nmero de labes

02 = Dimetn:> exteriGr del n:>dete; en mm
Ta = Paso o divisin exterior, en mm
Las dimensiones de la cuchara son proporcionales al dimetro del
chorro, para evitar una destruccin rpida de la arista media, no puede
ser ms pequeo pues el agua que sale de una cuchara no debe golpear
Ja siguiente.
b=2.8xd (2.42a)
h=3xd (2.42b)
t=0.8xd (2.42c)
11. PASO O DIVISIN EXTERIOR
Escogemos ahora un paso o divisin exterior de:
h
ta ==
4.5
(2.43)
2.2 MODELO MATEMTICO POR EL MTODO DE LAS REDES NEURO-

NALES
2.2.1 CLCULO DE LAS TURBINAS HIDRULICAS
Los datos obtenidos se tabulan en una hoja del clculo con formato Excel
(Excel 97), los valores hallados son transferidos al Datagrid del NeuroShell 2; que
es el mecanismo de introduccin de datos; tal como se observa en .la figura 2.19.
54
80,00
1200 70,00 80,00 90,00 65,00 ,.
0,05 1800 70,00 80,00 90,00 85,00 65,00 138,158 100,184 ,.
0,07 720 70,00 80,00 90,00 85,00 65,00 193,421 140,258 ,.
0,07 1200 70,00 80,00 90,00 85,00 65,00 193,421 140,258 ,.
0,07 1800 70,00 80,00 90,00 85,00 65,00 193,421 140,258 ,.
0,1 11JJ 70,00 80,00 90,00 85,00 65,00 276,316 200,36& ,.
0,1 900 70,00 80,00 90,00 85,00 65,00 276,316 200,368 ,.
0,1 1200 70,00 80,00 90,00 85,00 65;00 276,316 200,368 ,.
0,2 514 70,00 80,00 90,00 85,00 65,00 552,632 400,736 ,.
0,2 600 70,00 80,00 90,00 85,00 65,00 552,632 400,736 ,.
0,2 71JJ 70,00 80,00 90,00 85,00 65,00 552,632 400,736 ,.
0,2 900 70,00 80,00 90,00 85,00 65,00 552,632 400,i36 ,.
1.200 80,00 90,00 85,00 ,.
85,00
Fig. 2.19 Tabulacin de datos.
1. POTENCIA DI; ~A TURB~NA (P).
La potencia de la turbina se determinan utilizando una hoja Excel
(Excel 97), como se observa en la figura 2.19; los valores calculados son
transferidas al Datagrid del NeuroShell2, por ejemplo para la fila 2 utiliza-
P =(10*A2*82*D2) /76, en hp (2.44a)
P =12/ (1,014*1,36), en kW (2.44Jl)
Cada letra en las ecuaciones 2.44 significa la columna utilizada por
los datos de ~ntrada y el nmero 2 se refier~ a la fila; la letra A corres-
ponde a la altura, la letra B corresponde al caudal, etc. Se utiliza una co-
lumna para cada turbina diferente, por ejemplo la columna 1 para la turbi-
55
2. NMERO ESPECFICO (Ns).
El nmero especJfico de revoh.Jc.iones de _la turbina se determina
utilizando una hoja Excel (Excel 97), como se observa en la figura 2.20;
.los valores calcuJados son transferidas al Datagrid del NeuroShell2, por
ejemplo para la fila 2 utilizamos la ecuacin 2.45; en la columna S que co-
rresponde a.l Ns de .la turbina Pe.lton 1CH.
Ns = (C2*POTENCIA (12; 1/2)) 1(POTENCIA (A2; 5/4)) (2.45)
_" A B C D E F G H I S T :..
1 H_J1Llg_m3_s~g' Vei_Rotn_rpf!l~ _rf_~~lton l~Urancis Lrtkaplan LEf_lfeli~jrr_l\_fi_ch~lltp_P_elt!?_n_h~ Ns Pelton 1CtN~_P!f!
2 : 300 0,05 900 70,00 80,00 90,00 85,00 65,00 138,158 1 8.47 1 5,9
3 300 0,05 1200 70,00 80,00 90,00 85,00 65,00 t38,15S 11,30 7,9
0,05 1800 70,00 80,00 90,00 85,00 65,00 138,158 16,95 H.~
0,07 720 70,00 80,00 90,00 85,00 65,00 193,421 8,02 5,6
0,07 1200 70,00 80,00 90,00 85,00 65,00 193,421 13,37 9,4
0,07 1800 70,00 80,00 90,00 85,00 65,00 193,421 20,05 14,i
0,1 720 70,00 80,00 90,00 85,00 65,00 276,316 9,59 6,7
0,1 900 70,00 80,00 90,00 85,00 65,00 276,316 11,98 8,4
o,t 1200 10,00 8o,oo 90,00 85,00 65,oo 276,316 t5,9S u;
0,2 514 70,00 80,00 90,00 85,00 65,00 552,632 9,68 6,8
0,2 600 70,00 80,00 90,00 85,00 65,00 552,632 11,30 7J
0,2 720 70,00 80,00 90,00 85,00 65,00 552,632 13,56 9,5
0,2 900 70,00 80,00 90,00 85,00 65,00 552,632 l6JS HS
0,2 1200 70,00 80,00 90,00 85,00 65,00 552,632 22,59 15.~
70,00 80,00 90,00 85,00 65,00 552,632 33,89 23,!
1n oo_ _Ro_oo_ _QQoo_ _R_OO no~ ?1\~ Q ~Q 11 1..,.
_ ___. 1. ~ 1
--- -------------Fig.2:2Taiiulacin de datos. -~- -~"- --------
2.2.2 DISEO DE UNA TURBINA PELTON
2.2.2.1 CLCULO DE LAS DIMENSIONES PRINCIPALES.
El rodete de una turbina Pelton mostrado en la figura 2.3, se observa que
se necesita ca.lcu.lar e.l dimetro del chorro (dch). d_imetro del rodete (D2) y e.l d_i-
metro externo (D3).

56
1. Dimetro delchorro (dch)
Utilizando la ecuacin 2.46 calculamos el dimetro del chorro de
una turbina Pelton, como se observa en la figura 2.21; los valores calcula-
dos y tabulada en una hoja de clculo son transferidas al Datagrid del
NeuroShell2, por ejemplo para la fila 2 y -en la columna -P, calculamos el
dch de la turbina Pelton 2CH.
dch =(0,55*1 OOO)*RAIZ((B2/(2*RAIZ(A2)))) (2.46)
11 P2 ... (" /K _1 =(0,55*1000)*RAIZ((B2/(2*RAIZ(A2)))) l~

-
' A 1 B 1
1 D C E 1
1 F 1 G 1 O 1 P ! Q~
~
~rn_:_~~-'"~Vei_Roln..:rpm; rf_Pelton__ : Cs_Pelton I_Kdr_Peltoo 1 Kth_Pelt~o ~-Peltonjch 1 ddt_Pelton_2ch : dch_P~

21 300 0,05 900 70,00 0,97 37,00 14,00 29,55 1 20.90 1 14,"
3 ' 300 0,05 1200 70,00 0,97 37,00 14,00 29,55 20,90 14,"
---j .
' 4 1 300 0,05 1800 70,00 0,97 37,00 14,00 29,55 20,90 14,
.J] 300 0,07 720 70,00 0,97 37,00 14,00 34,96 24,72 17,
6 ' 300 0,07 1200 70,00 0,97 37,00 14,00 34,96 24,72 17,
~ 300 0,07 1800 70,00 0,97 37,00 14,00 34,96 24,72 17,
_!_j 300 O, 1 720 70,00 0,97 37,00 14,00 41.79 29,55 20,!
~ 300 0,1 900 70,00 0,97 37,00 14,00 41,79 29,55 20,!
~ 300 0,1 1200 70,00 0,97 37,00 14,00 41,79 29,55 20,!
~
300 0,2 514 70,00 0,97 37,00 14,00 59,10 41,79 29,!
300 0,2 600 70,00 0,97 37,00 14,00 59,10 41,79 29,!
300 0,2 720 70,00 0,97 37,00 14,00 59,10 41,79 29,!
~ 300 0,2 900 70,00 0,97 37,00 14,00 59,10 41,79 29,!
._Q_ 300 0,2 1200 70,00 0,97 37,00 14,00 59,10 41,79 29,!
16! 300 0,2 1800 70,00 0,97 37,00 14,00 59,10 41,79 29,!
--: 30~1 . O4 _ _3~0_ _70 00__ __ 0~7 37_00 14 00 Rl,'iR ~~J~ ~.1,.;.,
~~ ~ ~ H t Pelton /tl / ., 1 l~ 4 1 ~ 1~
Fig. 2.21 Clculo del dimetro del chorro.
2. Dimetro medio del Rodete (D2 O,)
Utilizando la ecuacin .2.47 calculamos el dimetro medio del rode-
te de una turbina Pelton, como se observa en la figura 2.22; los valores
calculados y tabulada en una hoja de -clculo son -transferidas al Oatagrid

57
oel NeuroShell2, por ejempJo parc la fila 2 y en Ja co.lu.mnc. R, ~lculamos
-el O.rde la turbina -Pelton.
Dr =((F2*1000)*RAIZ (A2))/C2 (2.47)
R2 C ~x 1 =((F2*1000)*RAIZ(A2)}/C2 ~J
,.. J 1 B 1A 1 C l D 1 E 1 F 1 G f R 1 S -~
1 H_m ja__m3_seg:_v~!-Rotn_,rpf!l: ~!_P_~~~n_L9)'_e!t_o~_j K~_Pelto~-~--~~-P_!lt~_! Or_Pelton_mm 1 Vt_Pelton_m_s Vr_Pelb
,_1__ 300 0,05 900 70,00 0,97 37,00 14,00 712.07 1 37,190 ! - 99i !
lc...L 300 0,05 1200 70,00 0,97 37,00 14,00 534,05 _..;;.37"'-,1-'--'90_-+----'13.;;;.;2
....!... 300 0,05 1800 70,00 0,97 37,00 14,00 356,03 37,190 19~ '
:.2_ 300 0,07 720 70,00 0,97 37,00 14,00 890,08 1 37,190 79i i
-~ 300 0,07 1200 70,00 0,97 37,00 14,00 534,05 : 37,190 132
2_ 300 0,07 1800 70,00 0,97 37,00 14,00 356,03 ' 37,190 199< i
.-.!_ 300 0,1 720 70,00 0,97 37,00 14,00 890,08 1 37,190 79i \
_ 300 O, 1 900 70,00 0,97 37,00 14,00 712,07 1 37,190 997
...!!_ 300 O, 1 1200 70,00 0,97 37,00 14,00 534,05 : 37,190 -132~
r-!!-
1
300 0,2 514 70,00 0,97 37,00 14,00 1246,81 1 37,190 56~ :1
JL 300 0,2 600 70,00 0,97 37,00 14,00 1068,10 1 37.; 190 6~
r-- 300 0,2 720 70,00 0,97 37,00 14,00 890,08 37,190 79 '
14 300 0,2 900 70,00 0,97 37,00 14,00 712,07 37,190 99/
:JI
*
1
300 0,2 1200 70,00 0,97 37,00 14,00 534,05 1

- 37,190 132 :
;~-~~.- ~!_~:~~--~~~~~~-~~:;~_;~~
H ~ ttPelton_- ti/
~:~~
it! 1 lllt J
:::Q013fi : ;~!~~ 1:.~.
~ jt 1
;, ~- - - ~ - - -- ~ I.J ,____........ -
J=j~ .2~_22 Cl~lo-del dimetn m~io ~el ~~ele.
~D3=R2+2'\J(3*V.2)/5_) -.(2A8_)
4. OJI\IIENSJONE;S ~DE; l,.AS -pALE:JA$
Ancho de la paleta: b =3,75*02 (2.49)
Altura deJa :Paleta_: -b -= 3,5~0.2 -,(2. 50_)
o
Espesor e _1 ~Pa.letc.; r-1 ,5~02 -(2~51)
El -nmero -de -C!,J~hras: Z -= -o,s~(R210_2)+G2 -.(2.6.2)

58
6. SELECCIN DE LA TURBINA PELTON
P1ch =SI (Y (A2=300; B2>=0,042; B2<=0,4); 10; O) (2.53)
2.2.3 DISEO DE UNA TURBINA FRANCIS
2.2.3.1 CLCULO DE LOS DIMETRO PRINCIPALES.
1. DIMETRO DEL TUBO DE ASPIRACIN (03)
03 = 1000 * RAIZ ((4*B2) 1 (PI ()*M2)) (2.54)

B2 = Columna B y la fila 2, caudal en (m 3/seg)
M2 ::: Columna M y la fila 2, velocidad de salida, m/seg
Para determinar la velocidad de salida C3 utilizamos la siguiente ecuacin:
C3 =RAIZ ((2*9,8*E2*A2)/100) (2.55)

g = Gravedad, 9.8 en m/seg 2
A 2 = Columna A y la fila 2, altura del salto en metros (m),
E2 ... Columna E y la fila 2, constante segn la turbina.
Considerar 4% para Francis ~enta, 6% para Francis
Normal, 12% para Francis Rpida y 25% para la
Francis Extra rpida.
Para calcular el dimetro externo del rodete 0 1 de la turbina mos-

trada en la figura 2.10,. utilizamos la siguiente relacin:
59
DI = Q2*(0,4+(94,5/K2)) .(2.56)

03 = Dimetro del tubo de aspiracin, .columna Q, R, S, T,
fila 2; en mm
-Ns = Velocidad especfica, columna K, fila 2; en rpm
Para calcular el dimetro interno del rodete D2 de la turbina mos-
trada -en -la .figura 2.1-0, -utilizamos -la siguiente .r:elacin:
D 2 == Q2*(0,96+0,00038*K2) (2.57)

D3 ;:;: Oimetr:o .del tubo .de aspiracin, .columna -0, R, S y T,
fila 2; en mm
Ns :::: Velocidad especfica, -columna K, fila 2; en rpm
4. ANCHO DE LA CORONA DIRECTRIZ (bo)
El ancho de la corona directriz se calcula segn la turbina Francis

seleccionada; .utilizando las siguientes ecuaciones:
bo =ABS(Y2*(((K2-60)*0,07)/65+0,08)) (2.58)

5. CLCULO DEL NMERO DE LABES (Zq)

El nmero de alabes para .una turbina Francis seleccionada, se -cal-
cula con .las siguientes ecuaciones:

60
a. FRANCIS LENTA (FL)
ZFL =18-((K2-60)*1/65) (2.59)
En donde: ZFL = Nmero de alabes p~ra una turbina Francis

lenta
Ns = Velocidad especfica; columna K, fila 2, en rpm
b. FRANCIS NORMAL (FN)
ZFN =17-(2*(K2-125)/100) (2.60)
En donde: ZFN = Nmero de alabes p~ra una turbina Francis

normal
c. FRANCIS RPIDA (FR)
ZFR =15-(2*(K2-225)/125) (2.61)
En donde: ZFR = Nmero de alabes para una turbina Francis

rpida
d. FRANCIS EXTRA RPIDA (FER)
ZFER =13-(1 *(1(2-350)/100) (2.62)
En donde: ZFER = Nmero de alabes p~ra una turbina Francis

extra rpida
Ns = Velocidad especfica; columna k, fila 2, en rpm
61
6. SELECCIN DE LA TURBINA FRANCIS
FL =SI (Y (A2=200; 82>=1 ,4; 82<=2,5; J2>=1800; J2<=4000;
K2>=60; K2<:::125); 1.0; O) (2.63)
2.2.4 DISEO DE UNA TURBINA DE ACCIN TOTAL .
2.2.4.1 CLCULO DE LAS DIMENSIONES PRINCIPALES.
El rodete de las turbinas de accin total mostrada en la figura 2.15, se ob-
servan que se necesitan calcular los dimetros del rodete D11 D2 , D3 y Dn.
1. .DIMETRO DEL TUBO DE ASPIRACIN (03):
D3 :;:;:lOOO*RAIZ((4*B2)/(PI0*K2)) (2.64)

B2 .= Caudal, Columna 8, fila 2; m 3/seg
K2 ;::: Velocidad de salida; columna K, fila 2, en m/seg
Para determinar la velocidad de salida C3 (K2) utilizamos la siguien-

te ecuacin:
C3 = RAIZ(2*9,8*0,3* A2) (2.65)
En donde: C3 = Velocidad de salida, (K2} m/seg

g ;::: Gravedad, (9.8} en m/seg 2
A2 = Altura del salto en metros (m},
Kc = Constante, 0.3
2. DIMETRO 'DEL RODETE (D2 )

Para calcular el dimetro externo del rodete 0 1 de la turbina (Ka-
plan, Hlice y Tubular} mostrada en la figura 2.15, utilizamos la siguiente
relacin:
62
D 2 = 0,98*L2 (2.66)
En donde: D2 = Dimetro del rodete, mm

D3 = Dimetro del tubo de aspiracin (L2), columna L y la
fila 2; en mm
DN = L2*((0,25+(94,64/12))) (2.67)

D3 = Dimetro del tubo de aspiracin (L2), columna L y la
fila 2, en mm
Ns = Velocidad especfica (12), en rpm
4. DIMETRO MEDIO DEL RODETE (01 )
Para calcular el dimetro medio del rodete D1 de la turbina (Kaplan,

Hlice y Tubular) mostrada en la figura 2.15, utilizamos la siguiente rela-
cin:
D1 = N2+(M2-N2)/2 (2.68)
En donde: D1 = Dimetro medio del rodete, m111

DN = Dimetro del cubo del rodete (N2), columna N y la fila
2, en mm
02 ;::: Dimetro del rodete (02), columna M y la fila 2, en
mm
5. ANCHO DE LA RUEDA DIRECTRIZ (Bo)
El ancho de la corona directriz se calcula utilizando la siguiente

eeuaein;
B0 = (0,8*B2)/(0,9*M2*PI()*V2)*10/\6 (2.69)
63
En donde: Bo = Ancho de la rueda directriz, en mm

D2 = Dimetro del rodete (M2), columna M y la fila 2, en
mm
Cmo = Velocidad meridiana, columna V y la fila 2, en m/seg
Q = Caudal, columna B y la fila 2, en m3/seg
6. VELOCIDAD MERIDIANA (Cmo)
La velocidad meridiana se calcula utilizando la siguiente ecuacin:
Cmo = 0,65*(ABS((4*0,8*B2)/((M2A2-N2A2)*PI{))*10A6)) {2.70)
En donde: Cmo = Velocidad meridiana, en mm

D2 = Dimetro del rodete (M2), columna M y la fila 2, en
mm
DN = Dimetro del cubo del rodete (N2), columna N y la fila
2, en mm
Q = Caudal, columna By la fila 2, en m 3/seg
2.2.5 ALGORITMO DE APRENDIZAJE BACKPROPAGATION. /'
1. Regla de Aprendizaje.
El algoritmo Backpropagation para redes multicapa es una generaliza-

cin del algoritmo LMS, ambos algoritmos realizan su labor de actualiza="
cin de pesos y ganancias con base en el error medio cuadrtico. La red
Backpropagation trabaja bajo aprendizaje supervisado y por tanto necesita
un set de entrenamiento que le describa cada salida y su valor de salida
esperado de la siguiente forma:
(2.71)
64
Donde: = es una entrada a la red
ta = es la correspondiente salida deseada para el patrn q-simo.
El algoritmo debe ajustar los parmetros de la red para minimizar el
error medio cuadrtico.
El entrenamiento de una red neuronal multicapa se realiza mediante un
proceso de aprendizaje, para realizar este proceso se debe inicialmente te-
ner definida la topologa de la red esto es: nmero de neuronas en la capa
de entrada el cual depende del nmero de componentes del vector de en-'
trada, cantidad de capas ocultas y nmero de neuronas de cada una de
ellas, nmero de neuronas en la capa de la salida el cual depende del
nmero de componentes del vector de salida o patrones objetivo y funcio-
nes de transferencia requeridas en cada capa, con base en la topologa es-
cogida se asignan valores iniciales a cada uno de los parmetros que con-
forma la red.
La regla de entrenamiento es la siguiente:
1. Aprende los W para una red neuronal multicapa, con funciones de
activacin derivables.
2. Funcin de error:
(2.72)
Donde O es el conjunto de ejemplos y O el conjunto de nodos de

salida.
65
tkd , ser la salida esperada para el ejemplo en el nodo,
okd. la salida obtenida para el nodo y el ejemplo.
3. Convergencia a mnimos locales
2. Deduccin Matemtica.
Se desea entrenar una red para que reconozca potencia de la turbina,
nmeros especfico, y seleccin del tipo de turbina. La deduccin matem
tica de este procedimiento se realizar para una red con una capa de en-
trada, una capa oculta y una capa de salida y luego se generalizar para
redes que tengan ms de una capa oculta (figura 2.23)
Capa ,Oculta (o)

Entrada Capa de Salida (s)
Fig. 2.23 Disposicin de una red de tres q~pas.
En la figura 2.23:
66
q Equivale al nmero de componentes el vector de entrada.
m Nmero de neuronas de la capa oculta
Nmero de neuronas de la capa de salida
En la tabla 2.1 se muestran los valores de entrada y las salidas desea-

das.
Tabla 2.1 Valores de entrada y salida

--
ENTRADAS SALIDAS DESEADAS
X1 X2 X3 X. Xs
H Q Vei.Rot. Ef. Coe. Pot.Pelton Pot.Pelton Ns Pelton

(m) (m3/seg) n(rpm) Tpelton Sai.P:(j) (hp) (kW) Pei(1Ch) 1ch
300 0.05 1200 70.00 0,97 138.158 100.184 11.30 10
300 0.1 900 70.00 0,97 276.316 200.368 11.98 10
300 0.2 720 70.00 0,97 552.632 400.736 13.56 10
200 0.04 1200 70,00 0,97 73.684 53.432 13.70 10
200 0.07 1200 70,00 0,97 128.947 93.505 18.12 10
200 0.1 720 70,00 0,97 184.211 133.579 12.99 10
150 0.04 900 70,00 0,97 55.263 40.074 12.75 10
150 0.06 720 70,00 0,97 82.895 60.110 12.49 10
150 0.15 450 70,00 0,97 207.237 150.276 12.34 10
100 0.06 600 70,00 0,97 55.263 40.074 14.10 10
100 0.08 450 70,00 0,97 73.684 53.432 12.22 10
90 0.06 514 70.00 0.97 49.737 36.066 13.08 10
Para iniciar el entrenamiento se le presenta a la red un patrn de en-

trenamiento, el cual tiene q componentes como se describe en la ecuacin
(2.73).
p; (2.73)
67
Cuando se le presenta a la red una patrn de entrenamiento, este se
propaga a travs de las conexiones existentes produciendo una entrada
neta n en cada una las neuronas de la siguiente capa, la entrada neta a la
neurona j de la siguiente capa debido a la presencia de un patrn de entre-
namiento en la entrada est dada por la ecuacin (2.74), ntese que la en"'
trada neta es el valor justo antes de pasar por la funcin de transferencia.
,---~~ Error '
X y D
Wl \V2
X
8
Yt d
--- ---- --- -- ---- -----~ - --- -----~ --------- ~ --- ----- ------~---------~
Fig. 2.24 Patrn de entrenamiento de la red.
q
n; = LW1~P; +b;
i=l
(2.74)
WJ~ : Peso que une la componente i de la entrada con la neurona j de
la capa oculta
p Componente i del vector p que contiene el patrn de entrenamien
to de q componentes
b 0i Ganancia de la neurona j de la capa oculta
68
Donde el superndice (0 ) representa la capa a la que pertenece cada
parmetro, es este caso la capa oculta. Cada una de las neuronas de la
capa oculta tiene como salida a0i que est dada por la ecuacin (2.75).
o
l Funcin de transferencia de las neuronas de la capa oculta
Las salidas a 0 j de las neuronas de la capa oculta (de las componentes)

son las entradas a los pesos de conexin de la capa de salida, este com-
portamiento esta descrito por la ecuacin (2.74)
m
s ~W:s o bs
nk = L-J lifaj + k (2.76)
j=l
W: Peso que une la neurona j de la capa oculta con la neurona k de

la capa de salida, la cual cuenta con s neuronas.
a; Salida de la neurona j de la capa ocult~, la cual cuenta con m
neuronas.
Ganancia de la neurona k de la capa de salida.
Entrada neta a la neurona k de la capa de salida.
La red produce una salida final descrita por la ecuacin (2.77)
Funcin pe transferencia de las neuronas de la capa de salida.

5
f
69
Reemplazando (2.74) en (2.75) se obtiene la salida de la red en funcin
de la entrada neta y de los pesos de conexin con la ltima capa oculta.
5
La salida de la red de cada neurona 8 k se compara con la salida de"
seada tk para calcular el error en cada unidad de s~lida (2.79)
El error debido a cada patrn p propagado esta dado por (2.81)
2 1~ 2
(2.80)
ep =- L..J (8k)
2 k=l
ep2 Error medio cuadrtico para cada patrn de entrada p
8k Error en la neurona k de la capa de salida con 1 neuronas
Este proceso se repite para el nmero total de patrones de entrena-
miento (r), para un proceso de aprendizaje exitoso; el objetivo del algoritmo
es actualizar todos los pesos y ganancias de la red minimizando el error
medio cuadrtico total descrito en (2.81).
r
2
e = ep2 (2.81)
p=J
70
e2 : Error total en el proceso de aprendizaje en una iteracin luego de
haber presentado a la red los r patrones de entrenamiento
El error que genera una red neuronal en funcin de sus pesos, genera
un espacio de n dimensiones, donde n es el nmero de pesos de conexin
de la red, al evaluar el gradiente del error en un punto de esta superficie se
obtendr la direccin en la cual la funcin del error tendr un mayor creci-
miento, como el objetivo del proceso de aprendiz~je es minimizar el error
debe tomarse la direccin negativa del gradiente para obtener el mayor de-
cremento del error y de esta forma su minimizaci9n, condicin requerida
para realizar la actualizacin de la matriz de pesos en el algoritmo Back..
propagation.
(2.82.)
2
El gradiente. negativo de ep2 se denotara como - 'leP y se calcula
como la derivada del error respecto a todos los pesos de la red
En la capa de salida el gradiente negativo del error con respecto a los
pesos es:
- Bep2 = (t - as)2 X aat (2.83)

aw; k k aw;
71
aep2 Componente del gradiente - \} ep 2 respecto al peso de la co-
aw~ nexin de la neurona de la capa de salida y la neurona j de la
capa oculta w;
Derivada de la salida de la neurona k de la capa de salida
respecto, al peso w;
ro,)
Para calcular _k_ se debe utilizar la regla de la cadena, pues el error
ow~
no es- una funcin explcita de los pesos de la red, de la ecuacin (2.75).
puede verse que la salida de la red a5 k esta explcitamente en funcin de

nsk y de la ecuacin (2.76) puede verse que n\ esta explcitamente en
funcin de w; considerando esto se genera la ecuacin (2.84)
Tomando la ecuacin (2.83) y reemplazndola en la ecuacin (2.84) se
obtiene,
~ aep2 = (t ~as) X aa; X an; (2.85)

aw: k k an; aw:
Derivada de la entrada neta a la neurona k de la capa de sali-
da respecto a los pesos de la conexin entre las neuronas de
la capa oculta y la capa de salida.

72
Derivada de la salida de la neurona k de la capa de salida
respecto a su entrada neta.
Reemplazando en la ecuacin (2.85) las derivadas de las ecuaciones
(2.76) y (2.77) se obtiene:
8en 2 8
__r_= (t -a )xf' (n )Xa~
8 8
(2.86)
aw; k k k 1
Como se observa en la ecuacin (2.86) las funciones de transferencia
utilizadas en este tipo de red deben ser continuas para que su derivada
15
exista en todo el intervalo, ya que el trmino f (n\) es requerido para el
clculo del error.
Las funciones de transferencia f ms utilizadas y sus respectivas deri-
vadas son las siguientes:
1
logsig: f(n) = 1 -n (2.87)
+e
f'(n) = f(n)(1- f(n)) (2.88)
f'(n) = a(l-a) (2.89)
en -e-n
tansig: f(n)= (2.90)
en +e-n
f'(n) = 1- (f(n)) 2 (2.91)
f'(n) = (1-a 2 ) (2.92)
73
purelin: f(n) = n (2.93)

f'(n) ;=: 1 (2.94)
De la ecuacin (2.86), los trminos del error para las neuronas de la
capa de salida estn dados por la ecuacin (2.95), la cual se le denomina
comnmente sensitividad de la capa de salida.
Este algoritmo se denomina Backpropagation o de propagacin inversa
debido a que el error se propaga de manera inversa al funcionamiento
normal de la red, de esta forma, el algoritmo encuentra el error en el proce-
so de aprendizaje desde las capas ms internas hasta llegar a la entrada;
con base en el clculo de este error se actualizan los pesos y ganancias de
cada capa.
Despus de conocer (2.95) se procede a encontrar el error en la capa
oculta el cual est dado por:
(2.96)
Para calcular el ltimo trmino de la ecuacin (2.96) se debe aplicar la
regla de la cadena en varias ocasiones como se observa en la ecuacin

74
(2.97) puesto que la salida de la red no es una funcin explcita de los pe-
sos de la conexin entre la capa de entrada y la capa oculta.
Todos los trminos de la ecuacin (2.98) son derivados respecto a va,
riables de las que dependan explcitamente, reemplazando (2.97) en (2.96)
tenemos:
Tomando las derivas de las ecuaciones (2.74), (2.75), (2.76) y (2.77), y
reemplazndolas en la ecuacin (2.99) se obtiene la expresin del gradien.,
te del error en la capa oculta.
Reemplazando las ecuaciones (2.95), (2.96) y (2.97) en la ecuacin
(2.1 00) se tiene:
aep 2 1
~ask x w:s f'o( nio) x Pi
---o = LJ lfi x (2.101)
a~ k=1
75
Los trminos del error para cada neurona de la capa oculta esta dado
por la ecuacin (2.1 02), este trmino tambin se denomina sensitividad de
la capa oculta.
1
a~= f' (n;)x a~w~
0
(2.102)
k=)
Luego de encontrar el valor del gradiente del error se procede a actua-
lizar los pesos de todas las capas empezando por la de salida, para la capa
de salida la actualizacin de pesos y ganancias est dada por las ecuacio-
nes (2.101) y (2.102).
W~q(t+l)=W~g(t)-2aa~ (2.101)
a : Rata de aprendizaje que vara entre O y 1 dependiendo de las carac-
tersticas del problema a solucionar.
Luego de actualizar los pesos y ganancias de la capa de salida se pro..
cede a actualizar los pesos y ganancias de la capa oculta mediante las
ecuaciones (2.1 05) y (2.1 06).

76
Esta deduccin fue realizada para una red de tres capas, si se requiere
realizar el anlisis para una red con dos o ms capas ocultas, las expresio-
nes pueden derivarse de la ecuacin (2.100) donde los trminos que se
encuentran dentro de la sumatoria pertenecen a la capa inmediatamente
superior, este algoritmo es conocido como la regla Delta Generalizada des"'
arrollada por Rumelhart D, la cual es una extensin de la regla delta des-
arrollada por Widrow en 1930

CAPTULO 3
'DISEO DE LAS DIMENSIONES
PRINCIPALES DE LAS TURBINAS
3.1 DISEO DE LAS DIMENSIONES DE UNA TURBINA POR EL MTO-
DO TRADICIONAL.
3.1.1 DISEO DE UNA TURBINA PELTON
3.1.1.1 SELECCIN DE UNA TURBINA PELTON
Para un salto de H =120 m y con un caudal de Q =0.15 m 3/seg,

proyectar una turbina Pelton o rueda tangencial, mostrada en la figura
3.1 y determinar las principales dimensiones de la turbina.
Fig. 3.1: Turbina Pelton.

78
1. POTENCIA DE LA TURBINA (P).
Datos: Q = 0.15 m3/seg, H =120m, r = 0.85
Reemplazando valores en la ecuacin (2.1)
p = 1000 X 0.15 x120 X 0.85

76
P=201.32HP
Para calcular la potencia en KW, reemplazando valores en la
ecuacin (2.2):
P. = 1000x0.15x120x0.85
kw l.340x 76
P=l50.23kW
La potencia obtenida de 150.23kW corresponde al rango de una
mini central, segn la figura 1.2 pgina 22.,
2. NMERO ESPECFICO DE REVOLUCIONES DE POTENCIA (Ns).
Para calcular el nmero especfico de revoluciones, utilizamos la
ecuacin (2.3):
Datos: P = 201.32 HP, H =120m, i= 2 boquillas
Reemplazando valores en la ecuacin (2.3):,
n J201.32
N- l .
s -120 X~'
79
Sii=l, Ns=0.03512xn (3.la)
Si i = 2, Ns = 0.02526xn (J.lb)
Si i = 4, Ns = 0.01786x n (3.Ic)
Los resultados obtenidos al aplicar la ecuacin (2.3), se muestran en
la ecuacin 3. 1; los valores hallados de esta ecuacin han sido tabula-
dos en tabla N 3.1, de estos valores seleccionamos la turbina Pelton de
dos boquillas, que se encuentre dentro de los rangos establecidos.
Tabla 3.1 Seleccin de una turbina Pelton
Altura Caudal
Tipo Efic. Pot. Pot. Vel. Vel.
Turbina Turb. Turb. Turb. Rot. Espcif.
H Q Nombre Clase T) p p Ns n
m m3/seg HP kW rpm rpm
120 0.15 Pelton 1 Ch . 0,85 201,32 150,23 1800 64,30
120 0.15 Pelton 2Ch 0,85 201,32 150,23 1800 45,47
120 0.15 Pelton 4Ch 0,85 201,32 150,23 1800 32,15
En la figura 3.2, buscamos en el eje de las abscisas el caudal de
0.15m3/seg, y en el eje de las ordenadas la altura de 120metros, de es-
tos puntos trazamos lneas vertical y horizontal que se cortan en el cam-
po (2), que corresponde a una Turbina de Pelton de dos boquillas, cuya
potencia corresponde a 140KW, en los clculos hallamos 150.23KW, la
condicin:
Pcalculado > =< PGrfico;

por lo tanto la seleccin es correcta.
80
Q Caudal (m3/seg)
Fig. 3.2 Diagrama de seleccin de Turbinas.
3.1.1.2 DISEO DE LAS DIMENSIONES PRINCIPALES

[31] Quantz L, [43) Jara W., [32]1TDG Per
1. DIMETROS PRINCIPALES.
a. Dimetro del chorro (dch): Utilizamos la ecuacin 2.4:
da, = 550 ~ J (2.4)
Datos: Q =0.15 m3/seg

H =120m
i = 1, 2 y4Ch
Reemplazando valores en la ecuacin (2.4) obtenemos:
d, =550 ~ ht120
0
}b =64.36 mm
81
= 550~
0
d"'
2-v120
}.b = 45.51 mm
b. Dimetro medio del Rodete (D 2): Utilizamos la ecuacin (2.5):
D2-k
- D2 X
lOOOJii
(2.5)
n
En donde: D2 = Dimetro medio del rodete en mm

H = 120m
Ko2 = Constante, 37 ~ ko2 :s; 39
n = 1800, rpm
D2 =37x Iooo.JUo =225.17mm

1800
c. Dimensiones de las paletas
Fig. 3.3 Dimensiones de la paleta.
1. Ancho de la paleta: b = 3.75 x dch (2.7a)
Pelton 1Ch: b = 3. 75 x 64.36 = 241.35 mm
Pelton 2Ch: b = 3.75 x 45.51 = 170.66 mm

82
2. Altura de la paleta: h =3.50 x dch (2.7b)
Pelton 1Ch: h = 3.50 x 64.36 = 225.26 mm
Pelton 2Ch: h =3.50 x 45.51 =159.29 mm
3. Espesor de la paleta: t = 1.50 x dch (2.7c)
Pelton 1Ch: t = 1.50 x 64.36 = 96.54 mm
Pelton 2Ch: t =1.50 x 45.51 =68.27 mm

d. Dimetro externo del Rodete (D~): Utilizamos la ecuacin (2.6):
En donde: 0 3 = Dimetro externo del rodete, en mm

h = Altura de la cuchara, en mm
D3 =225.17 +2[~ x159.29 J=416.318mm

e. El nmero de cucharas o paletas (Z):
Utilizamos la ecuacin (2.8):
En donde: z = Nmero de paletas

D2 = Dimetro medio del rodete, 225.17 mm
Dch = Dimetro del chorro, 45.51 mm
Kz = Constante, 14S kz S16
1 225.17
Z=-( )+14=16.5paletas
2 45.51
83
3.1.2 DISEO DE UNA TURBINA FRANCIS CON RODETE NORMAL
3.1.2.1 SELECCIN DE UNA TURBINA FRANCIS NORMAL
En un salto de H = 20 m y con un caudal de Q = 1 m3/seg, proyectar una
turbina Francis con rodete normal de eje vertical, mostrado en fa figura
3.4; y determinar sus dimensiones principales.
H, <t
bo
D,
Fig. 3.4: Turbina Francis con rodete normal.
1. POTENCIA DE LA TURBINA (P):
La potencia de la turbina se determina utilizando la ecuacin (2.1 ):
p = lOOOx Qx H xr1
(2.1)
76
Datos: Q = 1 m3/seg
H =20m
, = 0.80
Reemplazando valores en (2.1)
P= 1000 X 1.0 X 20 X 0.80 =2 l0. 53 HP

76
La potencia en KW se determina utiHzando la ecuacin (2.2):
P. = 1000x1x20x0.80 = 157 _11

kW 1.340x76
84
La potencia obtenida de 157.11 KW corresponde al rango de

una mini central, segn la figura 1.2 pgina 22.
2. NMERO ESPECFICO (Ns):
ecuacin (2.3):
N- nJP (2.3)
S- H.Wi
Datos: P =210.53 HP
H =20m
N = n ~210.53
s 20 X 4.J20
Ns = 0.343n (3.2)
Utilizando el resultado de (3.2), tabulamos en la tabla N 3.2 pa-
ra las diferentes turbinas Francis y seleccionamos la turbina Francis
Normal, que se encuentra dentro de los rangos establecidos.
Tabla N 3.2 Seleccin de una turbina Francis Normal.
Tipo Efic. Pot. Pot. Vel. Ve l.

Altura Caudal
Turbina Turb. Turb. Turb. Rot. Espcif.
H Q Nombre TI p p n Ns
m m3/seg, HP kW rpm rpm
20 1 Francis Lenta 0,80 210.53 157.11 600 205.83
20
- 1 Francis Normal 0,80 210.53 157.11 600 205.83
20 1 Francis Rpida 0,80 210.53 157.11 600 205.83
20 1 Michell 0,65 171.05 127.65 600 185.54
85
1 Turbina Pelton 1 ch.

4 Turbina Francis Normal
5 Turbina Francis Lenta
6 Turbina Francis Rpida ''
~ - " t
7~ Turbina Kaplan
8 I_Turbin~Erancis Extrar~
-9 - ' -Turbina Tubular
-----------
10 Turbina de HNce
e 12 Turbina Tur o
-
:::t
,
ftl
100
10
50
Cii
o
,
Gl
40
30
,f!
Gl
e 20
...:Scu
=
<
10
Q Caudal (m3 /seg)

Fig. 3.5 Grfico de seleccin de turbinas.
En la figura 3.5, buscamos en el eje de las abscisas el caudal de

1m 3/seg, y en el eje de las ordenadas la altura de 20 metros; de estos pun-
tos trazamos lneas vertical y horizontal que se cortan en el campo de (4)
(11), que corresponde a una Turbina Michell Frcmcis; y por el Ns calculado
(205.83) corresponde a una turbina Francis Normal, segn la Tabla N 1.5
pgina 20 del captulo 1.

1. DIMETRO DEL TUBO DE ASPIRACIN (D3)
Para calcular el dimetro del tubo de aspiracin (03 ), utilizamos
la ecuacin (2.1 0):
D, =lOOOJ nC
4Q (2.10)
3

Q = Caudal, 1m3/seg
86
Para determinar la velocidad de salida C3 utilizamos la ecuacin
(2.11):
C = 2xgxkcxH
3 lOO (2.11)

g = Gravedad, 9. 8 m/seg2
H = Altura, 20 metros
Ke = Constante segn la turbina, en tanto por uno; llt/1 00
12% para Francis Rpida y 25% para la Francis Extra rpida.
9.8m 6
C3 = 2 ( - -) (- - X 20m) =4.85m/ seg
seg1 lOO
D =1000 4 (lm3 /seg) =5l2.37mm

3
7r x4.85mlseg
D3 = 512.37 mm
Para calcular el dimetro externo del rodete D1 utilizamos la si

guiente relacin:
94.5)
DI =D3 X (0..4+- (2
. . 12)
N.s
En donde: 0 1 = Dimetro externo del rodete, mm
0 3 = Dimetro del tubo de aspiracin, 512 mm
N5 = Velocidad especfica, 205.83 rpm
87
.
D1 =512x ( 0.4+ 94.5 ) =439.87mm
205.83'
Para calcular el dimetro interno del rodete 0 2 , utilizamos la ecua-
cin (2.13):

D3 = Dimetro del tubo de aspiracin, 512 mm
Ns = Velocidad especfica, .205.83 rpm
D2 = 512 x (0.96 + 0.00038 x 205.83) = 531.56mm
3.. 1.2.3 ANCHO DE LA CORONA DIRECTRIZ (bo)

cionada, utilizando la siguiente ecuacin:
1. FRANCIS NORMAL (FN): Utilizamos la ecuacin (2.15):

D1 = Dimetro externo del rodete, 439.87 mm
Ns = Velocidad especfica, 205.83 rpm
bo =439.87[(20583 -l 2S)xO.lS +0.15]= 119.3lmm

lOO
88
1. FRANCIS NORMAL (FN): Utilizamos la ecuacin (2.19):
ZFN =l'1-[(Ns -l25)x2] (2 .1 9'1

. lOO
En donde: ZFN = Nmero de alabes para una turbina Francis normal

ZFN =l '7-[(205.83-l25)x2]= 15.38 alabes

lOO
3.1.3 DISEO DE UNA TURBINA FRANCIS CON RODETE RPIDO.
En un salto de H =20 m y con un caudal de Q =2.1 m3/seg, proyectar

una turbina Francis con rodete rpido, mostrada en la figura 3.6 y determinar sus
dimensiones principales.
bo
Fig. ,3.6: Turbina Francis mn rodete t:pido.
3.1.3.1 SELECCIN DE UNA TURBINA FRANCIS RPIDA

89
P = IOOOxQxHxq, ( 2 .l)
76
Datos: Q =
2.1 m 3/seg
H =20m
11 = 0.80
Reemplazando valores en (2.1 ):
P= 1000 X 2.1 X 20 X 0.80 =442.105HP

76
La potencia en KW se determina utilizando la ecuacin (2.2):
P. = l000x2.1x20x0.80 = _
329 93
tw l.340x76
una mini central, segn la figura 1.2 pgina 22.
2. NMERO ESPECFICO (Ns):
ecuacin (2.3):
N-
n.JP (2.3)
S- H.iii
Datos: P = 442.105 HP
H::;:20m
N = n ~442.105
s 20 X .1[iii
Ns = 0.4971n (3.2)
90
ralas diferentes turbinas Francis y seleccionamos la turbina Francis
Rpida, que se encuentra dentro de los rangos establecidos.
Tabla N 3.3 Seleccin de una turbina Francis Rpida.
Altura Caudal Turbina

Efic. Pol 1
iPol Yel. ve1.
Turb. Turb. Turb. IRot Espcif.
1
H Q 1 Nombre Tipo 11 p p n Ns
1
m m3/seg HP KW rpm rpm 1
20 2.1 Francis 1
Lenta 0,80 442.11 329.93 600 298.28 1
20 2.1 Francis j Normal 0,80 442.11 329.93 600 298.28

20 2.1 Francis Rpida 0,80. 442.11 329.93 600 298.28
Extra
20 2.1 Francis 0,80 442.11 329.93 600 298.28
Rpida
1 TU!bina Pe11on 1 ch.

2 Turbina Pellon 2 dJ.
3 _ TUJ_bina PeJion 4 clh.
4 Turbina Francis Nonnat
5 Turbina Francis Lenla
l
6 Turbina Francis Rflpida -
.J._ Turbm Kaplan
8 T~ Francis
E)ltrmapida
)
_~-Turbina Tu!Mar -
10 Turbina de Hice
--s
%
Cll
...
:!!
CD
(,)
Cll
..
511
-
'1:11
Cll
Cll
e: a
E
-::::1
e
1tl
1'
Q Caudal (ma/seg)
91
Seleccionamos una turbina Francis en rodete rpido, con n =

600rpm, del tipo mostrado en la figura 3.6. Si utilizamos la figura 3.7,
observamos que si seleccionamos en el eje de las abscisas el caudal de
2.1 ma/seg, y en el eje de las ordenadas la altura de 20 metros, estas
lneas se intersecan en el campo de (6), que corresponde a una Turbina
Francis Rpida, cuya potencia corresponde a 300KW, en los clculos
hallamos 298.28KW; por lo tanto la seleccin es correcta.
1. DIMETRO DEL TUBO DE ASPIRACIN (Da)
Para calcular el dimetro del tubo de aspiracin (0 3), utilizamos
la ecuacin (2.10):
D3 = 1000~ 1CC3
4Q (2.10)
En donde: Da = Dimetro en el tubo de aspiracin, en mm

Q = Caudal, 2.1 m3/seg
Ca = Velocidad de salida, m/seg
Para determinar la velocidad de salida Ca utilizamos la ecuacin
(2.11 ):
2xgxkcxH
e-3- (2.11)
100
En donde: Ca = Velocidad de salida, m/seg

g = Gravedad, 9.8 m/seg 2
H = Altura, 20 metros
Kc = Constante segn la turbina, en tanto por uno; ~t/1 00
12% para Francis Rpida y 25% para la Francis Extra rpida.
92
9.8m 12
C3 = 2 ( ) (- X 20m) = 6.86m f seg
seg 2 100
Reemplazando valores en la ecuacin (2.1 O) obtenemos:
3
D3 =1000 4 ( 2 .1m /seg) =624.31mm
n x6.86m 1seg
2. DIMETRO EXTERNO DEL RODETE (D 1)
Para calcular el dimetro externo del rodete D1 utilizamos la si-

guiente relacin:
94.5)
D = D3 X (o .4+-- (2.12)
Ns

D3 = Dimetro del tubo de aspiracin, 624.31 mm
Ns = Velocidad especfica, 29~.28 rpm
94 5
D1 =624.31x(0.4+ )=447.52mm
298.28
Para calcular el dimetro interno del rodete D2, utilizamos la s
guiente relacin:
D2 =D3 x(0.96+0.00038xNJ (2.13)

N5 = Velocidad especfica, 298.28 rpm
D2 = 624.31x (0.96+ 0.00038x 298.28) = 670.1mm

93
3.1.3.3 ANCHO DE LA CORONA DIRECTRIZ (bo)

cionada, utilizando la siguiente ecuacin:
bo =D [(N8 -225)x0.22 +k ] (2.14c)

l 125 . R

D1 = Dimetro interno del rodete, 447.52mm
KR = Constante de diseo para Francis rpida.
0.1582::; kR::; 0.30 (seleccionar uno de los dos valores)
298 28 225 0 22
bo =447.52[( - ) x +0.30]= 191.97mm
125
z = 15 -[(N8 - 225)x 2] (2.15c)

FR 125
En donde: ZFR = Nmero de alabes para una turbina Francis rpida

298 28 225 2
ZFR =15 -[( - )x ]= 13.83alabes
125
94
3.1.4 CLCULO DE UNA TURBINA DE HLICE
En un salto de H =&metros y con un caudal de Q = 3.5 m 3/seg, proyec-
tar una turbina de hlice, de eje vertical, mostrado en la figura 3.8; y determinar
sus dimensiones principales.
Fig. 3.8 Turbina de hlice.
3.1.4.1 SELECCIN DE UNA TURBINA DE HLICE.
p = 1000 X Q X H X 1lt . (2.1)

76
Datos: Q = 3.5 m3/seg

H=6m
11 = 0.80
Reemplazando valores en (2.1)
p = 1000 x 3.5 x6 X 0.80 = 22 l.OS 3 HP

76
95
La potencia en KW se determina utilizando la ecuacin (2.2):
P, = 1000x3.5x6x0.80 = _
164 96
kW 1.340x 76
una mini central, segn la tabla 4.3 pgina 22.
2 . NMERO ESPECFICO (Ns):
ecuacin (2.3):
N== nJP
S H.1/ii (2.3)
Datos: P = 221.053 HP
H=6m
N = n ~221.053
s 6 X 16
(3.2)
Ns = 1.5833n
ra las diferentes turbinas seleccionamos la turbina de Hlice, que se
encuentra dentro de los rangos establecidos.

96
Tabla N 3.4 Seleccin de una turbina Francis Normal.
1 Tipo Efic. ~Pot Pot. Vel. Vel.

Altura Caudal
Tul1ina Turb. Tu m. Tu m. !Rot. Espcif.
H Q Nombre Clase TJ p p n Ns
m : m3/seg HP kW rpm rpm 1
6 3.5 Pelton 1 Ch 0.70 193,42 140,26. 600 888,62

16 3.5 Pelton 2Ch 0,70 193,42 140,26 600 628,35
6 3.5 Pelton 4Ch 0,70 1
193,42 140,26! 6001 444,31 1

6 3.5 Michell 0.65 179.61 130.24 6001 1 856.291
16 3.5 Francis Lenta 0,80 1
221,051 160,29 1600 949,971
6 3.5 Francis Normal 0,80 221,05 160,29 600 949,97
16 3.5 Francis Rpida 1 0,80 ' 221 ,05 1160,29 600 949,97j
6 3. 5 1
De 0,80 221,05 ' 164,96 600 949.97
1 TUfbina Peeon 1 ch.

2 TUJbina ~ 2 ch.
3 TUJbina Pefton 4 ch.
41-Tuibina Fra;;s-Noll--"'-"-u-131_ ____.
-- 11
" . '
5
6
lf_~==
Turbina Fram:is lenta
Turbina Francis ~-
~' ['\,.-
~~~'~ ~" f>?
!\
~~ ~ ~
,.... ...-r<
1
i
'
~Ttlfb:na Tubutar
--,~~
.
['\ K '\ 1"' \..
'\ 10 Tuml".a da Hce
~~ >K l'\ "~

~11rlwll
"\ ~ "'\ ~
'< 11 l urhr,,
"
12 TUJiina TUJDO
-e-
' !'\
X
' ">' " "" 1

' Js:
-::
' \..' ''\ ....
.,., " "~~ ""' '
1'\,
y '\.. '\..
~
'
- ... - '
' ' ' '
,, V
' r-." ' '

'
..... r. ~n
~- ' ' '"' ,, / Y'-.
'
,:
" " " "' "" ~,,
" \.. ./
"' >< ,'q
',..,J i
>X "' " " "' '
r ,/ ~ !!.~ ~
" " "'

1"'-
1 1
~d "\ ~
1'-
1'- ~ ~
\..
~~: ~ "\ "

' '
'
'
. " ". V.
:', ~ ~~'N \
."-..
"
" """ "
T
-< -TV "\~ '~

.,..,,..~
. ..,...-~~~,.....:
'9]\. _"\l
5 N.
IIJD U& &t ll2 U &4 U IU U 2 3 4 S 7 D
Q Caudal (m3iseg)
Seleccionamos una turbina de Hlice, con n =600rpm, del tipo mos-

trado en la figura 3.8. En la figura 3.9, observamos que si seleccionamos
en el eje de las abscisas el caudal de 3.5m 3/seg, y en el eje de las ordena-
das la altura de 6metros, estas lneas se intersecan en el campo de (10),
97
que corresponde a una Turbina de Hlice, cuya potencia corresponde a
160kW, en los clculos hallamos 164.30kW; por lo tanto la seleccin es co-
rrecta.
3.1.4.2 DISEO DE LOS DIMENSIONES PRINCIPALES.
El rodete de las turbinas de accin total mostrada en la figura 3.8, se
observan que se necesitan calcular .los dimetros del rodete D1, D2, 03 y Dn.
1. DIMETRO DEL TUBO DE ASPIRACIN (D3):
Estas frmulas empricas son aplicables para las turbinas Kaplan,
Hlice y Tubular, utilizamos la ecuacin (2.22):
(2.22)

Q = Caudal, 3.5 m /seg
3
H = Altura del salto, 6 metros,

Para determinar la velocidad de salida C3 utilizamos la ecuacin

(2.23):
C _ 2xgxkcxH
3 (2.23)
- lOO

g =
Gravedad, 9.8 m/seg2
H =
Altura del salto, 6 metros,
Kc = Constante, 30%; ,I'Jt/100
Considerar para la Kaplan, Hlice y Tubular el 30%.
2x9.8x.30x6 _ . .
e3 = . - 5 . 9 4 m 1seg
100
98
Reemplazando valores en la ecuacin (2.22):
4 35
D3 =1000 x =866.16mm
nx5.94
2. DIMETRO DEL RODETE (02)
Para calcular el dimetro externo del rodete D1 de la turbina
Hlice mostrada en la figura 3.8, utilizamos la ecuacin (2.24):
(2.24)
En donde: 02 = Dimetro del rodete, mm

D2 = 0.98x 866.16 = 848.84 mm
Para calcular el dimetro del cubo del rodete DN de la turbina Hli-
ce mostrada en la figura 3.8, utilizamos la ecuacin (2.25):

03 = Dimetro del tubo de aspiracin, 866.16 mm
'Ns = Velocidad especfica, 949.97 rpm
. 94.64 . .
DN = 866.16 x (0.25 + ) = 302.83 mm
949.97
99
4. DIMETRO MEDIO DEL RODETE (D1)
Para calcular el dimetro medio del rodete D1 de la turbina Hli-
ce mostrada en la figura 3.8, utilizamos la ecuacin (2.26):
(226)
En donde: D1 = Dimetro medio del rodete, mm

DN = Dimetro del cubo del rodete, 302.83 mm
D2 = Dimetro del rodete, 848.84 mm
.q =302.83+(84884 - 30283 )=575.84mm

2
3.1.4.3 ANCHO DE LA RUEDA DIRECTRIZ (Bo)
El ancho de la corona directriz se calcula segn la turbina de accin total

seleccionada, utilizando la ecuacin (2.27):
6
B,G = 0.8 X Q X 10 (2.27)
0.9 x D 2 x 1r x Cmo
En donde: 80 = Ancho de la rueda directriz, en mm

D2 = Dimetro del rodete, 848.64 mm
Cmo = Velocidad meridiana, en m/seg
La seccin libre de salida debe ser mayor que la superficie de
entrada en el rodete:
0.6 Cm1 :::;; Cmo :::;; O. 7 Cm1
Utilizar en el diseo: Cmo = 0.65 xCm1 (2.28)

100
En donde: Cm1 = Componente de la velocidad de salida, m/seg

Para calcular esta componente utilizamos la siguiente relacin:
4x0.8 x Q. xl06
emi =
(D2_D2)
m 1seo-
o
(2.29)
2 N .1!
En donde: Cm1 = Componente de la velocidad de salida, en m/seg

02 = Dimetro del rodete, 848.84 mm
DN = Dimetro del cubo del rodete, 302.83 mm
C = 4x0.8 X 3.5xl06 = 5.615m/se

mi (848.842 - 302.831 ) 7l 'g
B,!'J = 0.8 x 3.5xl06 =316. 272mm

0.9 X 848.84 X Jr X 0.65 X 5.675
3.1.4.4 CLCULO DEL NMERO DE ALABES (Z)
El nmero de alabes para la turbina de accin total seleccionada, se cal-

cula con la ecuacin (2.30):
Z = 2170-1.2x Ns (2 .30)
250

Z= 2170-L2x949.97 = 4 _12 alabes

250
101
3.1.5 DISEO DE UNA TURBINA MICHELL.
En un salto de H =20 metros y con un caudal de Q = 0.4 m 3/seg, pro-
yectar una turbina Mitcheii-Banki, mostrada en la figura 3.10 y determinar las di-
mansiones principales de la turbina.
fig. 3.10: Tul1bina Midbe11.
3.1.5.1 SELECCIN DE UNA TURBINA MICHELL.
1. POTENCIA OE LA TURBINA (P).
Datos: Q =0.4 m3/seg, H =20 m, 11 =0.65 (Tabla 1.5)
p = 1000 X 0.4 x20 X 0.65

76
P=68.421HP
Para calcular la potencia en KW, reemplazando valores en la
ecuacin (2.2):
102
plkiW = 1000x0.4x20x0.65
L340x76
P=5l.06KW
La potencia obtenida de 51.06 KW corresponde al rango de una
mini central, segn la figura 1.2 pgina 22.
2. NMERO ESPECFICO DE REVOLUCIONES (Ns).
ecuacin (2.3):
Datos: P = 68.421 HP,

H =20m,
i= 1 boquilla
(2.3)
Datos: P = 68.42 HP, H =20m
N =nJ68.42
:s 20 X 1/iD
Ns = O.l956n {3.4)
Utilizando el resultado de (3.4), tabulamos en la tabla N 3.5 con
las diferentes turbinas y seleccionamos la turbina Michell.

103
Tabla NO 3.5 Seleccin de una turbina Mitchell.
Efic. 'Pot. Pot. Vel. Vel.

Altura Caudal Turbina
Tulb. Turb. TuJb. Rot. Espcif.
H Q Nombre Clase! 11 ! p p 1 n Ns
m m3/seg 1 1 1
HP 1
KWI rpmJ rpm
20 0;4 Pelton 1 Ch 1 0.70 73,68 53,43 450 91,33 1
20 0,4 Pelton 2 Ch 0,70 i 73,68
1
53,43 450 91,33 1
! 1
20 0;4 Pelton 4Ch ! 0,70 1 73,681 53,431 450 i1 91,33 1
20 0,4 Michell Banki 0,65 68,42 51,06 450 88,01
20 0,4 Francis Lenta 0,80 84,21 1 61,06 450 97,63 1
20 0,4 Francis 1 Normal 080 ! 84,211 61,061 450 97,63 1
1
20 0,4 Francis 1 Rpida 1

;
0,80 1 84,21 61,06 450! 97,63 1
1
20 0,4 K~p1anyde 0,82 97,89 70,98 105,27

ll-ll,i".. 1
450 1
5 lruabina Fnnis Lenta

6 , TU!t:im Fr.anris ~ ;
7 t Tlrilina ICa(JI2n1

8 T~ Franc:i.s_ ~at~
T~ TllbLI'Br__ __ __
Cllt fUI> :t lll 11
Q CaudaJ (m31seg)
IF.ig. 3.11: Grfico de se1eccin de Turbinas.
Seleccionamos una turbina Michell Banki de una boquilla, con n =

450rpm, del tipo mostrado en la figura 3.1 O. Si utilizamos la figura 3.11, ob-
servamos que si seleccionamos en el eje de las abscisas el caudal~ <te
0.4m3/seg y en el eje de las ordenadas la altura de 20metros, estas lneas . :_
104
se intersecan en el campo de (11), que corresponde a una Turbina de Mi-
chell, cuya potencia corresponde a 50KW, en los clculos hallamos
51.06KW; por lo tanto la seleccin es correcta.
El rodete de la turbina Mitcheii-Banki de accin total mostrada en la figu-
ra 3.12, se observan que se necesitan calcular los dimetros del rodete D1 y D2.
fig. 3.12 Dimetro de1 rodete.
1. DIMETRO EXTERIOR DEL RODETE (D2)
El dimetro exterior del rodete mostrado en la figura 3.12, la po-
demos calcular utilizando la ecuacin (2.31):
lOOO.Jii
D2.=~mx N (2.31)
En donde: D2 = Dimetro exterior del rodete, en mm

H = Altura del salto, 20 metros,
N = Velocidad de rotacin, 450 rpm
Km = Constante de la turbina Mitchell, 37 S Km S 39
Km = 37 (asumir este valor)
105
2. DIMETRO INTERIOR DEL RODETE (D1)
El dimetro interior del rodete mostrado en la figura 3.12, la po-
demos calcular utilizando la ecuacin (2.32):
DI = 0.66D2 (2.32)
D 1 = 0.66x367.709 = 242.688mm
3. DIMETRO DEL CHORRO (dchorro)
Suponiendo que se adopta un chorro cilndrico, el dimetro del
chorro la calculamos con la ecuacin (2.33):
dtdhorro = [000x l4-xQ {23J)

. 'l; x:v:r
En donde: Dchorro = Dimetro del chorro, mm

C1 = Velocidad del chorro, en m/seg
4. VELOCIDAD DEL CHORRO (C1)
La velocidad del chorro, se calcula utilizando la ecuacin (2.34):
En donde: C1 = Velocidad del chorro, m/seg

106
g = Aceleracin de la gravedad, 9,80665 m/seg2
H = Altura, 20m
cp = Coeficiente de salida del agua: 0.95
cll =0.95J2x9.8x20 = 18.81 m!.se,;g
5. DIMETRO MEDIO DEL RODETE (Dm)
El dimetro medio del rodete mostrado en la figura 3.12, la podemos
calcular utilizando la ecuacin (2.35):
En donde: Dm = Dimetro medio del rodete, en mm

D2 = Dimetro exterior del rodete, 367.709 mm
D1 = Dimetro interior del rodete, 242.688 mm
6. ESPESOR DEL CHORRO.
Para calcular el espesor del chorro utilizamos la ecuacin (2.36).
(2.36)
107
Donde: a = Espesor del chorro, en mm,

D2 = Dimetro exterior del rodete, en mm
ka = Coeficiente que depende del ngulo del inyector
a y del ngulo de admisin e.

Para a= 16 se pueden tomar los siguientes valores:
e 60 goo 120
ka 0.1443 0.2164 0.2886
En el caso de usar una paleta directriz central, como se ob-
serva en la figura 2.23, el espesor del chorro: a = a + a.
Reemplazando valores en la ecuacin (2.30) obtendremos:
a= 0.1443x 367.709 = 53.06mm

a= 0.2164x 367.709 = 79.57mm
a= 0.2886x 367.709 = 106.121mm
7. VELOCIDAD ANGULAR DE LA RUEDA (n).
Para calcular el nmero de revoluciones de la rueda, utilizamos la
ecuacin 2.37.
8. VELOCIDAD TANGENCIAL (u1).
La velocidad tangencial u1 en el rodete se calcula con la ecuacin

2.32.
Ua =2.. lx/ii (2.38)

108
u1 = 2.1 x/ii = 2.1 x.JW = 9.3915ml seg
Para calcular el nmero de revoluciones de la rueda, utilizamos
la siguiente relacin:
_
n - 1u'
noo x ( 60 x 93915 ml!.seg) -_ 401109 . 71 1, ~
. o ~ o vuelltas u mm
361.109 mm:x E
_ NwxH:xW _ 88~011 :X 20x'!fi0 ._JtSO

lll- - -t-, rpm
..JP ../68.42
No requiere utilizar un engranaje para conseguir para el alterna-

dor la velocidad angular deseada de 450 rpm.
9. ANCHO DEL RODETE (B).
Si el ngulo del inyector a. = 16, este ngulo vara entre 15 Sa ;;::

20; el ancho del rodete la calculamos con la siguiente relacin:
B=98.8x Jiix
D 2 x H fJ

110'- (mm)
. .
6
(2.39)
En donde: B = Ancho del rodete, mm

Q = Caudal, 0.4 m 3/seg
H = Altura, 20m
D2 = Dimetro exterior del rod~te, 367.709 mm
9 = ngulo de admisin, valores de 30,60,120
Remplazando valores en la ecuacin (2.39) tendremos:
0.4 1l06
B =98.8:x 1 ~ X - = 40llt540mm
361.'7/09x'!t!/'lJJ 6'())
109
10. MEDIDAS Y NME~O DE PALETAS
El nmero de alabes para la turbina Michell seleccionada, se calcula
con la siguiente ecuacin:

D2 = Dimetro exterior del rodete, 367.709 mm
ta - Paso o divisin exterior, en mm
Las dimensiones de la cuchara son propprcionales al dimetro del
chorro, para evitar una destruccin rpida de la arista media, no puede
ser ms pequeo pues el agua que sale de una cuchara no debe golpear
la siguiente.
b = 2.8 d =2.8 x 260.2 =728.56 mm

h = 2.8 d=2.8 x 260.2 = 728.56 mm
t =0.8 d =0.8 x 260.2 =208.16 mm
Escogemos ahora un paso o divisin exterior de:

110
(
0
=~ = 20 8. 16 = 46.26mm
4.5 4.5
El valor calculado corresponde aproximadamente a los tipos norma-
les; por lo tanto el nmero de paletas la calculamos de la siguiente rela-
cin:
Z = n x 361'.1a9 = 24.97 """"'etas

46.26 . lt"fill'
z 367.709+900. 25.35 paletas

50
3.2 DISEO DEL SOFTWARE UTILIZANDO EL MTODO DE LAS REDES

NEURONALES
El Mtodo de las Redes Neuronales Artificiales (MERNA), es un

mtodo que presenta un gran nmero de caracte:nsticas semejantes a las de:l ce-
rebro humano, son capaces de aprender de la experiencia. La utilizacin del
MERNA es un mtodo importante que en general permite:
111 Seteooionar a la f,urbina lhidruUca .
111 Dsefia r mas dimensjones p:ncipales de Mas fulbinas lhidlruUcas.
Como la energa de origen hidrulico ha sido la de mayor acogida hasta
el momento, debido a esta gran aceptacin que se logr de la generacin hidro-
elctrica, y a la importancia de la electricidad, cada vez se ha vuelto ms especia-
lizado el estudio de este proceso, convirtindose en un amplio campo de accin
de la ingeniera, debido a la magnitud y frecuencia de problemas que suelen pre-
sentarse y que deben resolverse.

111
Ante la gran variedad de turbinas hidrulicas para la generacin de
energa elctrica, uno de estos problemas, que se presenta a la hora de seleccio-
nar cul es el tipo de turbina ms conveniente, para un salto y un caudal, pues
debe lograrse realizar una instalacin con la que se obtenga el mejor aprovecha-
miento de los recursos, con facilidades de mantenimiento, y al precio ms favora-
ble.
Por esta razn se ha desarrollado un mtodo en el proceso de se-
leccin y clculo de las turbinas hidrulicas, que permita seleccionar y calcular
a la de turbina sin necesidad de tener a un experto en esta materia. Para selec-
cionar una turbina hidrulica, se requiere clasificar las diferentes turbinas por el
salto, caudal, su velocidad especfica, la potencia y sus eficiencias; esta clasifica-
cin se muestra en la pgina 20, Tabla 1.5.
3.2.1 NEUROSHELL 2.
El Software el NeuroShell 2 (la pgina de inicio se muestra en la figura

3.13) es un programa para Windows que se utiliza para tratar para resolver una
amplia variedad de problemas en materia de modelacin de datos de negocio,
investigacin bsica y entornos industriales. NeuroShell 2 es una herramienta pa-
ra la creacin de sistemas RNA, que permite predecir en la seleccin y dimensio-
nes de una turbina.
112
Esta aplicacin combina una interfaz de diseo modular con avanzados
procedimientos de aprendizaje, est diseado y entrenado con los datos que figu-
ran en una hoja de clculo (por ejemplo, Excel o 1-2-3) e incorporada en la hoja
de balance (dentro de la red de desarrollo NeuroShe/1).
NeuroShell 2 genera/compila automticamente una Dll, que podr ser
utilizada en cualquier entorno de programacin que soporte el acceso a libreras
dinmicas, como por ejemplo:. Visual Basic, Access, Visual C++ y Jaba.
3.2.2 DISEO DEL MTODO DE LAS REDES NEURONALES (MERNA)
las RNA han demostrado conseguir buenos resultados en el campo de
la prediccin. La estructura del MERNA est realizada en diferentes fases sucesi-
vas, cada fase con una funcin especfica y diseada para generar informacin de
forma independiente, cada una de ellas necesita los resultados del razonamiento
inferido en las etapas anteriores; estas fases son:
Fase 1: Adquisicin del conocimiento.

Fase 2: Desarrollo del sistema.
Fase 3: Obtencin de datos a partir del MERNA.
3.2.2.1 Fase 1: Adquisicin del conocimiento.
la adquisicin de conocimiento se refiere al conocimiento desde alguna

fuente a .la base de conocimientos del sistema. Las fuentes del conocimiento son
los expertos humanos, libros, y datos experimentales agrupados en bases de da-
tos.
La adicin de conocimiento puede ser directa, o como resultado de una

induccin a partir de ejemplos, o como deduccin de otros conocimientos ya al-
113
macenados en la base de conocimientos. Las tcnicas manuales consumen mu-
cho tiempo y son costosas.
3.2.2.2 Fase 2: Desarrollo del Sistema.
En este paso se elige la arquitectura de red y se eligen los valores de
sus parmetros y los criterios seguidos (caudal, la altura, la velocidad de rotacin,
la potencia, la eficiencia, etc.).
Los resultados obtenidos en la fase 1 son los datos de partida y el pro-
ceso metodolgico es el siguiente: el planteamiento del problema, el anlisis, el
diseo y la implementacin, aqu es necesario manejar un lenguaje de programa-
cin y convertir nuestra respuesta diseada en cdigo ejecutable por la computa-
dora. Existen muchos lenguajes que nos serviran para implementar el programa
entre los ms usados estn el C, el C++ y el Java; el MERNA utiliza el Java.
3.2.2.3 Fase 3: Obtencin de datos a partir del MERNA
Segn las condiciones del requerimiento suministradas por el usuario, el
MERNA selecciona entre todas las turbinas posibles que tcnicamente cumpla
con estos requerimientos; de ah la importancia que tiene la fiabilidad de los datos
incorporados.
Esta es la fase el usuario puede realizar la seleccin final de la turbina
para una mini central. El MERNA selecciona 10 posibles turbinas,. como se obser-
va en la Tabla 3.6 Clasificacin de las diferentes turbinas hidrulicas.

114
Tabla 3.6 Clasificacin de las diferentes turbinas hidrulicas
Clases de Abrev. Tipos de Ns Q Hmax adm. t'J p

Turbinas Rodete (rpm) (m3Jseg) (m) % KW
TP1CH 1 Ch 10-30 0.03-0.41 90-300 30- 900
PELTON TP2CH 2Ch 30-50 0.07-1.1 60-300 70-91 30-2500
TP4CH 4Ch 30-50 0.65-2.0 150- 300 750-4000
MICHELL TMB 40-160 0.12-1.0 12-80 65-82 30-150
TFL Lenta 60-125 1.3-7 50-180 1500-4000
TFN Normal 125-225 0.25-2.5 20-150 150- 750
FRANCIS 80-92
TFR Rpida 225-350 0.6-12 10- 55 30-4000
TFER Extra rpida 350-450 0.7-3.0 5- 9 30-180
KAPLAN y TK Ka plan 300-600 5-25 8,5-35 400-4000
80-93
de Hlice TDH De Hlice 500-1000 1.4- 11 2,5-10 30-400
Cada una de estas posibles soluciones tiene una determinada zona de

aplicacin en el diagrama tcnico "caudal - altura" de seleccin del tipo de turbina,
como se observa en la figura 3.2.
3.2.3 GESTIN DE LAS BASES DE CONOCIMIENTOS DEL MERNA.
La gestin de la base de conocimiento abarca no solo la recopilacin de

datos de proyectos reales, sino tambin la extraccin del conocimiento a los ex-
pertos. La RNA requiere el conocimiento especializado extrado de la experiencia
de expertos humanos; por lo tanto es necesario tener ejemplos correctamente
desarrollados de las diferentes turbinas; tal como se observan en las tablas si-
guientes, que permita al software transformar los datos operacionales en informa-
cin til.
Tabla 3. 7 Clculo de seleccin de una turbina Pelton 1 Ch.
Pot.Pelton Vel. Sal.

H Q Vei.Rot. Ef. Coe. Pot.Pelton Ns Pelton
(kW) Pelton
(m) (m3/seg) n(rpm) Tpelton Sai.P:(j) (hp) Pei(1Ch) 1ch
(m/seg)
300 0.05 1200 70.00 0,97 138.158 100.184 11.30 37.190 10
300 0.2 720 70.00 0,97 552.632 400.736 13.56 37.190 10
200 0.04 1200 70,00 0,97 73.684 53.432 13.70 30.366 10
200 0.1 720 70,00 0,97 184.211 133.579 12.99 30.366 10
150 0.04 900 70,00 0,97 55.263 40.074 12.75 26.298 10
150 0.15 450 70,00 0,97 207.237 150.276 12.34 26.298 10
100 0.06 600 70,00 0,97 55.263 40.074 14.10 21.472 10
100 0.08 450 70,00 0,97 73.684 53.432 12.22 21,472 10
90 0.06 514 70.00 0.97 49.737 36.066 13.08 20.370 10
115
Tabla 3.8 Clculo de seleccin de una turbina Pelton 2 Ch.
H Q Vei.Rot. Ef. Coe. Pot.Pelton Pot.Pelton Vei.Sal.

Ns Pelton
(m) (m3/seg) n(rpm) Tpelton Sai.P:ij) (hp) (kW) Pelton
Pei(2Ch) 2ch
(m/seg)
300 0.5 1800 70.00 0.97 1381.579 1001.841 37.89 37.190 10
200 0.3 1800 70.00 0.97 552.632 400.736 39.78 30.366 10
200 0.5 1200 70.00 0.97 921.053 667.894 34.24 30.366 10
150 0.2 1800 70.00 0.97 276.316 200.368 40.30 26.298 10
100 0.1 1800 70.00 0.97 92.105 66.789 38.63 21.472 10
100 0.2 1200 70.00 0.97 184.211 133.579 36.42 21.472 10
90 0.08 1800 70.00 0.97 66.316 48.088 37.39 20.370 10
90 0.15 1200 70.00 0.97 124.342 90.166 34.13 20.370 10
80 0.07 1800 70.00 0.97 51.579 37.402 38.21 19.205 10
80 0.15 1200 70.00 0.97 110.526 80.147 37.29 19.205 10
70 0.1 1200 70.00 0.97 64.474 46.753 33.65 17.965 10
70 0.13 1200 70.00 0.97 83.816 60.778 38.37 17.965 10
60 0.09 1200 70.00 0.97 49.737 36.066 35.84 16.632 10
60 0.1 1200 70.00 0.97 55.263 40.074 37.77 16.632 10
Tabla 3.9 Clculo de seleccin de una turbina Pelton 4 Ch.
Pot. Pel Pot. Pel Vei.Sal.

H Q Vei.Rot. Ef. Coe. ton Ns Pelton
ton Pelton
(m) (m3/seg) n(rpm) Tpelton Sai.P:(j) (kW) Pei.(4Ch) 4ch
(hp) (m/seg)
300 1.2 1800 70.00 0.97 3315.789 2404.419 41.51 37.190 10
300 1.6 1200 70.00 0.97 4421.053 3205.892 31.95 37.190 10
250 0.9 1800 70.00 0.97 2072.368 1502.762 41.21 33.950 10
250 1 1800 70.00 0.97 2302.632 1669.735 43.44 33.950 10
250 2 1200 70.00 0.97 4605.263 3339.470 40.96 33.950 10
200 0.7 1800 70.00 0.97 1289.474 935.052 42.97 30.366 10
200 1.2 1200 70.00 0.97 2210.526 1602.946 37.51 30.366 10
150 0.7 1200 70.00 0.97 967.105 701.289 35.54 26.298 10
150 0.8 1200 70.00 0.97 1105.263 801.473 38.00 26.298 10
Tabla 3.10 Clculo de seleccin de una turbina Francis Lenta.
Pot. Pot. Vsfrancis VTg.

H Q Vei.Rot. Ef. Francis Ns C3 Francis
Francis Francis
(m) (m3/seg) n(rpm) Tfrancis (kW) Francis Lenta
(hp) (m/seg) (m/seg)
200 1.3 900 80.00 2,736.842 1,984.600 62.60 12.522 29.6984848 10
200 2.5 900 80.00 5,263.158 3,816.538 86.81 12.522 29.6984848 10
150 1.5 1200 80.00 2,368.421 1,717.442 111.25 10.844 25.7196423 10
125 4 600 80.00 5,263.158 3,816.538 104.14 9.899 23.4787138 10
100 2.3 720 80.00 2,421.053 1,755.607 112.03 8.854 21.0000000 10
100 5 514 80.00 5,263.158 3,816.538 117.92 8.854 21.0000000 10
90 2.5 514 80.00 2,368.421 1,717.442 90.24 8.854 19.9223493 10
80 3 514 80.00 2,526.316 1,831.938 107.98 7.920 18.7829710 10
70 3 450 80.00 2,210.526 1,602.946 104.49 7.408 17.5698606 10
60 4 360 80.00 2,526.316 1,831.938 108.36 6.859 16.2665301 10
60 6 360 80.00 3,789.474 2,747.907 132.71 6.859 16.2665301 10
50 4.5 300 80.00 2,368.421 1,717.442 109.81 6.261 14.8492424 10
116
Tabla 3.11 Clculo de seleccin de una turbina Francis Normal.
Pot Pot Vs Francis VTg.

H Q Vei.Rot Ef. Francis Ns Francis
(m) Francis C3 Francis
(m3/seg) n(rpm) Tfrancis (kW) Francis Normal
150 0.42 2700 80.00 663.158 480.884 132.45 13.282 25.7196423 10
150 0.7 2500 80.00 1,105.263 801.473 158.33 13.282 36.0070000 10
125 0.35 2500 80.00 460.526 333.947 128.36 12.124 32.8700000 10
125 0.9 900 80.00 1'184.211 858.721 74.10 12.124 32.8700000 10
100 0.25 1200 80.00 263.158 190.827 61.56 10.844 29.4000000 10
100 1 1200 80.00 1,052.632 763.308 123.12 10.844 29.4000000 10
90 0.25 1200 80.00 236.842 171.744 66.62 10.288 27.8910000 10
90 1 1800 80.00 947.368 686.977 199.86 10.288 27.8910000 10
80 0.28 900 80.00 235.789 170.981 57.76 9.699 26.2960000 10
80 1.3 1200 80.00 1,094.737 793.840 165.95 9.699 26.2960000 10
70 0.4 1200 80.00 294.737 213.726 101.75 9.073 24.5980000 10
70 0.9 900 80.00 663.158 480.884 114.47 9.073 24.5980000 10
Tabla 3.12 Clculo de seleccin de una turbina Francis Rpida.
Pot. Pot. Vs Francis VTg.

H Q Vei.Rot. Ef. Francis Ns Francis
Francis C3 Francis
(m) (m3/seg) n(rpm) Tfrancis (kW) Francis Rpida
60 8 600 80.00 5,052.632 3,663.876 255.40 11.879 24.787 10
50 6 514 80.00 3,157.895 2,289.923 217.24 10.844 22.627 10
50 10 514 80.00 5,263.158 3,816.538 280.46 10.844 22.627 10
40 5 450 80.00 2,105.263 1,526.615 205.25 9,699 20,239 10
40 12 360 80.00 5,052.632 3,663.876 254.38 9,699 20,239 10
35 3.5 514 80.00 1,289.474 935.052 216.81 9.073 18.931 10
35 10 225 80.00 3,684.211 2,671.576 160.42 9.073 18.931 10
30 3 450 80.00 947.368 686.977 197.27 8.400 17.527 10
30 7 514 80.00 2,210.526 1,602.946 344.20 8.400 17.527 10
25 2.0 600 80.00 526.316 381.654 246.23 7.668 16.000 10
25 4.0 600 80.00 1,052.632 763.308 348.23 7.668 16.000 10
20 1.5 514 80.00 315.789 228.992 215.96 6.859 14.311 10
Tabla 3.13 Clculo de seleccin de una turbina Francis Extra Rpida.
Pot. Vs Fran
Pot. VTg.
H Q Vei.Rot. Ef. Francis Ns cis Francis
Francis Francis
(m) (m3/seg) n(rpm) Tfrancis (kW) Francis C3 Rpida
(hp) (m/seg)
(m/seg)
9 0.7 720 80.00 66.316 48.088 376.13 6.641 10,500 10
9 2.0 450 80.00 189.474 137.395 397.36 6,641 10,500 10
8 0.7 720 80.00 58.947 42.745 410.87 6.261 9.899 10
8 1.5 450 80.00 126.316 91.597 375.91 6.261 9.899 10
7 0.8 600 80.00 58.947 42.745 404.59 5,857 9,260 10
7 2 300 80.00 147.368 106.863 319.85 5,857 9,260 10
6 0.9 450 80.00 56.842 41.219 361.29 5,422 8,573 10
6 1.8 360 80.00 113.684 82.437 408.76 5,422 8,573 10
5 1.3 327 80.00 68.421 49.615 361.77 4.950 7.826 10
5 1.3 400 80.00 68.421 49.615 442.53 4.950 7.826 10
117
Tabla 3.14 Clculo de seleccin de una turbina Hlice.
Pot. Pot. Vs Hlice VTg. Hlice

H Q Vei.Rot. Ef. Hlice Ns
(m) Hlice C3 U1 Hlice
(m3/seg) n(rpm) Hlice (kW) Hlice
10 4.0 514 85.00 447.368 324.406 611.36 7.67 16.01 10
10 5.0 514 85.00 559.211 405.507 683.52 7.67 16.27 10
9 3.5 450 85.00 352.303 255.469 541.84 7.27 14.87 10
9 4.0 600 85.00 402.632 291.965 772.33 7.27 15.67 10
9 5.0 450 85.00 503.289 364.956 647.62 7.27 15.32 10
8 3.0 450 85.00 268.421 194.643 547.97 6.86 14.05 10
8 4.0 600 85.00 357.895 259.525 843.66 6.86 14.91 10
8 6.0 400 85.00 536.842 389.287 688.84 6.86 14.57 10
7 2.5 514 85.00 195.724 141.927 631.56 6.42 13.46 10
7 3.0 450 85.00 234.868 170.313 605.69 6.42 13.37 10
7 5.0 400 85.00 391.447 283.855 695.06 6.42 13.64 10
Tabla 3.15 Clculo de seleccin de una turbina Hlice.
Pot. Pot. Vs Hlice VTg.Hlice

H Q Vei.Rot. Ef. Hlice Ns
Hlice C3 U1 Hlice
(m) (m3/seg) n(rpm) Hlice (kW) Hlice
7 6.0 360 85.00 469.737 340.626 685.26 6.42 13.62 10
6 2.0 600 85.00 134.211 97.322 740.21 5.94 12.73 10
6 7.0 327 85.00 469.737 340.626 754.72 5.94 12.76 10
6 8.0 400 85.00 536.842 389.287 986.95 5.94 13.09 10
5 10.0 277 85.00 559.211 405.507 876.10 5.42 11.83 10
3 1.5 360 85.00 50.329 36.496 646.86 4.20 8.84 10
3 10.0 225 85.00 335.526 243.304 1043.86 4.20 9.29 10
Tabla 3.16 Clculo de seleccin de una turbina Kaplan.
Vel. Pot. Pot. C3 VTg.

H Q Ef. Kaplan Ns
Rot. Kaplan Kaplan Kaplan Kaplan
(m) (m3/seg) TKaplan (kW) Ka plan
n(rpm) (hp) (m/seg) (m/seg)
35 12 514 80,00 4421.053 3205.892 401.46 14,35 27,24 10
35 13 450 80,00 4789.474 3473.049 365.82 14,35 26,38 10
30 10 450 80,00 3157.895 2289.923 360.17 13,28 24,28 10
30 16 300 80,00 5052.632 3663.876 303.72 13,28 22,45 10
25 7 450 80,00 1842.105 1335.788 345.50 12,12 21,80 10
25 20 450 80,00 5263.158 3816.538 584.00 12,12 25,12 10
20 6 450 80,00 1263.158 915.969 378.14 10,84 20,18 10
15 9 327 80,00 1421.053 1030.465 417.58 9,39 18,05 10
12 10 327 80,00 1263.158 915.969 520.36 8,40 17,04 10
10 7 300 80,00 736.842 534.315 457.94 7,67 15,11 10
9 7 300 80,00 663.158 480.884 495.59 7,67 14,60 10
8.5 10 240 80,00 894.737 648.811 494.64 7,07 14,19 10
8 8 300 80,00 673.684 488.517 578.74 6,86 14,19 10
118
Tabla 3.17 Clculo de seleccin de una turbina Michell.
Vel. Pot. Pot. C1 VTg.

H Q Ef. Michell Ns
Rot. Michell Michell Michell Michell
(m) (m3/seg) T.Michell (kW) Michell
n(rpm) (hp) (m/seg) (m/seg)
90 0.22 1200 65.00 169.342 122.797 56.33 39.90 19.922 10
80 0.25 1800 65.00 171.053 124.037 98.40 37.62 18.783 10
70 0.15 1200 65.00 89.803 65.120 56.16 35.19 17.570 10
70 0.3 1200 65.00 179.605 130.239 79.43 35.19 17.570 10
60 0.12 1800 65.00 61.579 44.653 84.59 32.58 16.267 10
50 0.11 1800 65.00 47.039 34.110 92.85 29.74 14.849 10
50 0.41 1200 65.00 175.329 127.138 119.51 29.74 14.849 10
45 0.47 900 65.00 180.888 131.170 103.86 28.21 14.087 '10
40 0.51 900 65.00 174.474 126.518 118.18 26.60 13.282 10
35 0.6 360 65.00 179.605 130.239 56.67 24.88 12.424 10
30 0.2 600 65.00 51.316 37.211 61.22 23.04 11.502 10
30 0.5 450 65.00 128.289 93.028 72.59 23.04 11.502 10
25 0.7 600 65.00 149.671 108.533 131.31 21.03 10.500 10
20 0.27 360 65.00 46.184 33.490 57.84 18.81 9.391 10
15 0.5 514 65.00 64.145 46.514 139.45 16.29 8.133 10
3.2.3.1 Anlisis.
La investigacin realizada en el presente trabajo es de calcular y selec-

cionar el tipo de turbina a utilizar en una mini central, para ciertas condiciones <;te
entrada: como la altura y el caudal. Se requiere que este sistema razone y apren-
da basndose en analogas: RAZONAMIENTO BASADO EN CASOS. Se ha utili-
zado informacin de diferentes turbinas, seleccionados y calculadas de acuerdo al
rango de valores caractersticos de las turbinas hidrulicas sealados en la Tabla
3.6 y en el grfico de la figura 3.2. Los pasos a seguir en el NeuroShell 2 son los
siguientes:
1. Datagrid del NeuroShell 2
Los datos proporcionados por los expertos se tabulan en una hoja

del clculo con formato Excel o utilizamos el Datagrid del NeuroShell 2
como el mecanismo de introduccin de datos; tal como se observa en la
figura 3.15.
119
~~Ji:f-~ ~~ f!J ~ ; SeiTurb [Modo de compatibilidad] - Micro... _ o x i

-~--' rymo l~:_~~eo e g~~-F~--~~-~~-mf---~om~~~~~~-~ -=----~ _~ :
:a .ll
~ar $-
- - u 1 "'.~ ~ """"' A
~ ~N1 E
1 A ~j, :::~~:::m ~~~ ~-~~~~, .
11 ~ A
1!1 !i)
>= ti'
!M
-::; -= ~ .., 'j C~s

ro
: t"":"'"T
-~
.., ~.... ..

1 ~=- ~=-
-~ -;- , 1
- j ~.
-- 1
Estilos
\1
1'f' <2
1
_Portapapeles r.._): Fuente r.._j _--~~ineacin r;, Nmero _ ~- L____JL ____ j ~oc:lifi_car _,
Al
rr-=l:.....a...::;.;;=-"""".:s_segYeii_RaU_..-
2~ OJH~ 900
:u_Peta. !:u_F--al
70..00
:u_....._
SO.OO 90..00
1 :u_~~eiim 1
&5'.00
:u_:Mir:WI
6HIO
P-~-
U-f..m
!~ :
~-~ 300
:::~
0.07
::
720
::
70.00
:: :: :::
SO.OO 9CUIO &5'.00
:::
61.00
:~~
t!HA:Zl
~ 300 O..G7 1200 70.00 SO.OO 90.00 &5'.00 6HIO l!HA.Zl
~ 300 O..G7 1100 70..00 SO.OO 90..00 &5'.00 61..00 tiJH.Zl
.~ cu so..oa
9
s 300 71JJ 10..00 90..00 &5'.00 6.5JIO 276316
300 0.1 900 70JIO SOliO 90110 &5'.00 61..00 276316
~!-~ 300 0.1 1200 70..00 SOJIO 90.00 8:5110 61JIO 276314
~ ~ E~ ~ ~ ~~ ~~ ~
!
.......
. 15
-::=.1___ --
Usta 1
300 1200 70.00 SO..OO 90..00 &5'..00 41.00 112.S2
fig. 3.14 Tabulacin de datos.
2. Archivo OSe
Crear el archivo ose, como se observa en la figura 3.15.
Selecta problem description file or other file lE!
~
c:\~~kl.lb
Aoep\at
1
Cancelar 1
Sefiur~ DSC (Oc:\ ...
(O NS:H!ill2 JBetL.
e uiiJRiBlll""l 1
~semcdb
M~tra~&~
1illi~.Resr.&c} iJ
IF1g. 3 .15 IOreadin del al!dJivo dsc.
3. File lmport.
Seleccionar de "file import" el archivo Se/Turb.wk1, mostrados en
las figuras 3.16 y 3.17.
120
l!ille ;,;ip
r;;;;;;,;. r;;-, Apply Problem'
i
.
Input , Newal Newal :Output 1
Network 1 Nelwotk
~ : .~ :+ =~1 -~11
no lmpa( Define . FaeEI!POtt
Apply.to
lro>ut< 1 File '
'Outputs ;
:
~:
1
.Data .Examine:
Entry Attach .Data
1TestS.et Output
E><tracl file
m
Leam;,g!
1
~~~ enler ~~~ here fo~ ~ problem
IFiig. 3.:16 Se1ecxiionar lfiile lmpert.
:Spreadsheet File: :C:\NSHELL2\NUECENP.,NUECEN:T.wk1

PatternHe: :C:I:NSHEI.:L2\NUEDENT\NUECEN'T :PAJ
:S prea&heet Jrformaticm
labelsoare located:on r.ow.nl,llllber IO:or blank if:nonej: p ~ l

Dilt-a :begins -at row. number: 2 ====.~11
::=1 j
,.Enter .the row ~"'here labels "'ppear .in !he spreads~~~ (blank ~D if nolabeilsl J
lfig. 3.:17 Se1ea::iiena1' e1 al'<lhivo trurecent.Wk:L
4. Data entry
Seleccionar en el men del NeuroShell2, "Data entry" mostrada en
la figura 3.18 y generamos el archivo nuecent.pat, mostrado en la figura
3.19.
l!ille !t!!Bip
Problelro'
'
ln!Mit
ReE"'JC)rtl
,....,.,:
File ', App!Yto
File 1
:11 flt : :111

Data J;':11, .E1<amine:
.Entry Attach Dat~ )
Output
File
IFiig. 3 .18 Se1ecciena1' Data IE:nby.

121
~~~
~
i lb lA __jjJI
-~~
!Eille 1lllt lf!ltr;mt !!je[p
~
L~tro~
Number :Of .row ;with ':Variable ,names :(blarik ~~ non~): 111 u [~ ,lelt1ght .arrow 1keys :end :edit
IF:ird ,row :containing .actual <trai~g :data:
f~ Size: '1U29 .rows ~25 ;c:Ofumns
ra1llows
ote: This is not a commeJcial spreadsheet and may not load fast enough f01
you lo chenge lhe datagrd cal lo your own
files. The NeuroShell 2 Options menu
la<ge
spreadsheel Search help f~e f01 "datagrid'' for details. ! :
1A
'
B C ! ;o _ .... 1
'~
IHimt .. !!V-'1 IRnt oftfTftOft'l 'IELJud'lhl ICui 1
2 7"ill 111'. ~ 111
3 7"ill 111' 7aJI 111
:!!_ :2511 0' 257.1 10......
5 ?1>11 111' ' 2T.I. lfl !
i
16 ?1>11 111". "111111 10.
'!/ 7'il'l 111' 32.7. 111 ,,
;a 7"ifl 0, ~ 10..1
'9, "7'ifl lfl'. ' 1
-~:o 7"ifl, rn ..... 10
:
:=
J;;l
-~ .!j_M
IF.ig. 3 ..19 Inpesos de datos.
5. Input y Output
Seleccionar las entradas (input) y las salidas (output), como se ob-
serva en las figuras 3.20 y 3.21.
13 tn 7.\1~ 111"0 3i111\l~lii3C1ilHI :00lf
'Maallle fi:IS'pe Selection IIAdua'l o~ ~11
11
IF.ig. 3.20 Se1eooin de entradas y sa1idas.
ll:!i:irlr
~::-""*''1F~I\'IC""..,.,.....,.,r--" o / ~
~ - lllMO'ItT.:tllW>
~~"-'~
10 M~~m
~-~!:!;
~ 'ctmc:mltl
'5ll'llll:m
lll'!llMlE~
IF.ig. 3.21 Se1eooin de entr:adas y sa1idas.
6. Test Set Extraction

Healizar la importacin de los datos, mostrado en las figuras 3.22 y
3.23 .
122
~ / Text Set F><trdction- C:\NSHELL21PEQCB~1UIPEQCEN1U.PAT -ml!liJ~
~~~~~
ElllroetionMethodt
, ~ N percen~ IT est s..t M percer< (l'mcU:Oon s..t ~ choson:
0
>0 Al poUems
E. YeiJ' olte1 N(Test
Nlh pol.tem thu M (Test
S.ett s..tM.ol
EYeiJ'. oft'" M (l'roWction
lh.pofl.em ..~
(Produclion. sSet)
i!J l ... Mpottem; (Produclion Set). N percer< (Test s ..J.~ choson:
0 ByAowMori<01
, 1 T,.,;.w-,gs .._ _ _ TestSet. I Ploduclionk][
labelrow: 1 1d Plllt5n row: 2 ladP~emrow: 31-4 TotoiPoU""'*' 313

tnlormotion Needed lo- lhe Selected Elllroction Mothod
Whon! N Whole M Rondom Nwnbe! Soed
@1 11 1 11 lo 11
t::__ _N:-::0:-:T::E'"':t::-lvou.JIdon' wich lo ~acto producbon oet.leOYe lhe ..... fcx M blon<.
:1Elllroeb N percent lo- o test oet ond M percent. lo- prodJctm Remor.def goes in the Ooiring file. J
Ag. 3.22 Importacin de datos.
llles IE:Ctraret!
INI:mibera:il'I!'OI'!Silnltrai:lir(g!St{.1l'Rlil)
.
INtJnlber ldf ITOWS iinll:eSt!SE!t 1J5'1
IP.ttem ({.!P.:ti'l]lfile \!'Rl';!T:II: ~lter:etl.
Rg. 3.23 Aro'hiv:os exb"aidos.
7. Train
Realizar el entrenamiento utilizando 30 neuronas, tal como se obser-
van en las figuras 3.24, 3.25 y 3.26; durante 1O minutos.
, 1 ;,:::=-==- -
:1 <O Co.Pe and YetJ' notJI'
llteuront:..cf~
~-m-
ro:;-:-
.,_ l_,_o___ _
',1 !P......,s........,,
([)Hot~tbonal ~R.nn~
1
-,.-~........ _, 1
(J'JibefttnlirqJatt il,lt~mt._.-@ IOiftO_..,..-e
1
........,_
Wh!!m.;em;ug:bairWngNitlnms:.
~
D"illem"llft!HS!h!-il~.
""""""""'- )200 __ _
IL!nlt.~!Ernr. 110)1!154032 f:l..;aSt~!Ermr. 11027701'18
11&\..A~!Enor:: j IO,li ..JI9G9'1 IMin..~IEnnr: j10~
IE.-pncm~SinaciMK rs--- IEwmtb~-- ~
'IJjlle
O
:..- (tldlp
-~-----,
40 G
Vety srmple
Complex and vety noisy

Ag ..3 ..24 Inicio del en'lrenamiento.
Cornptex ltre~aa.te:
1~:
__ lo~~----J
to~~------;
....,.........,
~
UinpUU: 1~2-.-~J
l_1o --- r
Set number of Hidden Neurona to Defau1t J
C Aotational ::;; Random
.1 .AUtnntalicC!IIIIy S:ave irll'all'llng IOn~

1 Olbe>lllb-...,~ f!il,)--~~ Oorao_,.,v.,
Jil'itn::l"c~2391b~~~- 1J'1heol"e .aa-e i7S lteti:IPlltte:nn:..
lllcarngiEpoc!hs: l111i900 ~--..~ 1200~- . - _
ll..iaSt#l~IElnnr. llmdA-t&mo: IID;3112z.1<73
IMin. .AYCI'age IEnor.:: IMin.. Ave.-age lEn'ol: I1D.'ll:s7.53611
~s-l!neeltilin.: lE~~--: .,.,._
Rg. 3.25 Entr.enamiento a los 5 minutos.

123
1!!lile ][cm !!l!eiiP

1 ICiornp'JeXib> 11- lde1aUltsJ: IN....,.,_ and lllearriing:
O Very simple @ Complcx ILearriing 1oate: 1..!!-l___j llnnib: l_g ____ j
O Coruplex and vey noi$.v
IMomeritum: l_o.t_ ___ J IDU\Inh: l..!_o____j
IP..Uern S~ec"tlon:
O Rotationa1 @ Random lltiiMenl~
1
AlomaticaQp s..ve ifll<iiriing oun:
O lbest1trciiriin9 _ . l&[~ ~~ - O 1nu adto *,_
1 1
illhe<e -e 2391bairiinJp-._ 1l'lhere ...... 751lest p>ifterns..
ILearriing IE...,Chs: J !SI~ ll:atilmifion llriterwal: j201J ----- _ J
ll.Ja1i;t Aver-IEinor: llllJ08060Z8 II.Roit Aver-IEirror: llll.lli7ni74'1 ;.
1Min. lltvelage l&rm: llll.Jm83.-o9 IMin. AverageiElrnH: llll.li41~~
1~ Since 1M in: 115391_ IEvent.s !nce 111iin:: I11Simroll ,
IF.ig. 3.26 !Entrenamiento a los 9 minutos.
8. Run
Luego iniciamos la salida del proceso mostrado en la figura 3.27.
lfiC(o~np~te R :squ:ared_: etc. l{act!,!_'!'!'l ~!i!!J!uits onust '.be in :the i'!1~lJ

[~ ,Jnclude .actuals "in ..:ouT "file {-actual .outputs :onust 'be 'in '.the ifile]
~ ,_lnclude :in .iOUT 1file -actual"' -rninus net-oo'k uutputs
fldi 'WII'ite ,neuron .:activations <leo ;file :for <Siab .nuonber. ~~

[C,] Set highest :ouitput :.to 1- .others .toro ;{use -hen :outpuits <ar-e :cat:egoo'ie:s)
!Input Jile .na~ne: ;c:\iNSHELlL-2\iNUECENT"\iNUE:CE,N'f..IPAT
:P.atterns 1proce:ssed: ;1:314 !J
Outpuit: :cs1-
IR :squa.-ed:
jif1l>j,; apjlies <tl>e .network lto !ll>e 1pattern_1VPi3tJ tfile tto get ;an oWtP\lit l(.<aut) tfile.
IF.i_g. 3.27 Goner e1prooceso.
9. Attach
Adjuntar los archivos de lado a lado, mostrado en la figura 3.28.
iFite .2 :C:\:NS-HEll.2'iNUE8Nil"\NlliEGBNlr.JOl!J:r
.Attach,fiifes iT:op 1to'.Bottom tNew :C:\INSHELL2XNl!JEDENii"\NlJEOEJNT.:'OliJT
fi.g. 3 .28 Adjuntar os aldliv:os.

124
1O. Spreadsheet Export

Realizar la exportacin de los archivos, mostrado en la figura 3.29.
'' Percen1age of File Exported )E'J
: il[!1 iiiiii!iiiii!!!iii"i11!iii!!!!!!!!!!l~~-~----~~-~- 1
iPattern IF.ile: lC:\NSH Eil.tL:2~NllJBDE!Nif\'\NUI.EOBN1.iiJUiT 25? :ctilllmm

$preadsheet I:C::\INS.HIBUL-2~NllJBDENir~NllJBDBtliT.:~~ 225-.cdh;!mns
lCdlumn 1Expot1Mode
Q tJy.erwrite eliistiY~g i.C'Eills \Oreate ~preatls!reet !barik~o~p :file

1
.ticlhei[B=:_iij~tichetrro, ri.lichelf{B..:mll 1Pe1to 11 iPelton 11 1Pelton JI :FJL:e'
\!Jhecik~he :ocllumm (Qf ~he ~preadSheellfileitolbe re~laoed .wifh lhose ho_rn ~he !~~ltern lfile
IF.ig. 3.29 IEJqJeltadn de ardlivos.
11. Datagrid
Examinar los archivos de la data, mostrado en la figura 3.30.
, C:\NSHELL2\NUECENT\NUECENT.OUT 1!19'~
-Number .Of -..-ow -.With varia;l:)le ,
-----
.First row cc()nt~iriing ~c~u~l ''.h airiiing:data:
Ag.3 ..30 !Examinar les aldlives.
12. Generate Runtime Systems

Finalmente crear las funciones especializadas, mostrado en la figura
.3.. 31.
125
.1~
~
1Make . . smiroe
i!D.EiF;Fme .ICode
' lGenerator
IF.ig. 3.31 Oleaoln de filndones especializadas.
3.2.4 Pantalla del men de ingreso de datos: MERNA
Al tener la funcin generada por NeuroShell 2 utilizamos un software
vigente, este puede ser C#, Net Bean 5.5 y en base a la ayuda de estos progra-
mas de programacin; se desarrolla un formulario de ingresos de datos y obten-
cin de resultados, la cual mostramos en la figura 3.32 y en la figura 3.33 el dia-
grama de flujo del proceso realizado.
AINUS~ DEL ID1MEiNSIONAINIJENliD DE UNA

11UR!B1NA HIDRUUCA, POR REDES
INIEURONAIL!ES PARA UNA Ml!NlCIENTRAL
Tesis pma ~SI gr.nio de::

IW'l'SliSJIER IElll CIENCIAS
IMEINClJON: UJ\iGEN'IER1A IMECAHICA
IES?.EQA'l.lll)A'IJ: ID1SEO llliE IMAG!J1NAS
-- --- - - - - - - - -
\ iCII1H Ei:Pf"H qp.q .q.~~~-, e\
IF.ig. 3.321Men de iingreso de dato~.

126
ln.~esar
H,IQ
Seleccin
'Turbina
P<otencia:: (P) HP, kW

Vd0cidad Especifica: (N:s) rpm
/~
lngr,esar
H.,IQ
JNO
Corr:ecto l>
SI
Rodete
D~h, DZ., DI., :z
Fig. 3.33 Diagrama de flujo del proceso realizado.
3.2.4.1 Seleccin y diseo de una turbina Francis Normal
Hacer doble clic en el tem 1028, ingresa ~o m o datos H = 20m, Q=

1..2m3/seg, el programa MERNA selecciona Turbina Francis Normal, como se ob-
serva en la figura 3.34. La funcin utilizada por el NeuroShell 2 es la siguiente:
. FN=SI(Y((Aitura)H=20;(Caudai)Q>=1 ,2;0<=1 ,4;(Potencia)P>=150;P<=750;(Veloci
dad Especfica)Ns>=125;Ns<=225); 10;0)
En el men de turbina Francis y en el tem 1028. haciendo doble clic. el
programa MERNA muestra las dimensiones de la turbina Francis Normal, selec-
cionada en el paso anterior; tal como se observa en la figura 3.35.
127
fig. 3.34 5e1eain de 1una turbina IF.rantis ~nonna1
.. ,_, Cfs :Slel:d!>:l f ) r - 9rfrons + r~oilon f ) - "9' Hb f, WtbRr Qrr._

lr.:l1;r.
_sn
rc....&il
_
~~~:~'Rd. ~C!fr.:lma -ru~::
rEf.rfrons
! 1 u DE TURRINA._FRANC!!
C.rfr.!Noo'mOI
.. ~~-
''"'" '"""""' .
-
1 '
--- -- ---
-~-
- --~ -
1
'T~
~
Selocttlnailo
...... -,.
"'
. O;lDl 11 lli_
.,_, ,....!.-.~
../!!. f.
.,_ '1IXlfJ.
nse 1
JL~
F~
JI>...
. ~ 1 1,, ,..
11\EXRoP.. O;lDl ~!
~-Jfi'Cinolsj~ :2!!2S31
.l! ~ t' 1:1
~4 . ;~~~
r~~
t\i.
r~_w:n.ni!O_!kW '!183194
Jl 1
~.J~s
mm
'l'IBS;'I:ID
r-
J: ~ 6,. ~a 1 ~~_;:;
o;~
!03Tasp'F.l G21_;'155 'N
:03'TasP'Ft1
:o3'1lasPFR_rmm
rwTasp'F.EJt!mm
rB-oaj01F.l_ITmn
~rD1FNmrm
~mm
:tln::Jd_m'!F~.!mm
-- '
1t7~_:sso
595;!1110
!1''2-
..
'N
N
S
'N :Y
-
r-'
{--
~1
~~<:~
1----~
1
1
~~
4
-. \
.... \
1
:n.mjn028 1 ll!rocesar llr ~. li liJi"-->

, _ _ ,Conixrs
... ,,~,~
~-.r-.
~1 ~- -~. -- tu - ----~--- .~.- -----~~-- ------
~
,... :11 1:.
IEinirnlr
~IP~
1=632
.1=632
=
IP.kw
1~83;'1911
1~83.-
.,
IN<
ln8!!,,11ll
1~8!1,1110
'
-
,,_.,
1-:a
ifWn
1~':;,
125:2"""'
!Pkw
_._~
.
_,.,.,.~
,,..
_,;'1!10_
~-'""
~~~
~
'Q..mi3s
ID;lDl
~-
~
ID;lDl
-
~-
i'D;lDl
J
_j
;Oll2'1 ~2010 nm 1-'
-
UD25 ~2010 nru
1m1o n.n
G027 1:2010
11
I2IJ.O
r:20m ~
p!DXl n.'
- -
Ag. 3 ..351DJmenSJones de una turbina IF.ranas 10orma'l. - .
128
3.2.4.2 Seleccin y diseo de una turbina Michell
Ingresar los datos del tem 484, haciendo doble clic, H =50 m, Q= 0.180
m3/seg, el programa MERNA selecciona Turbina Michell, como se observa en la
figura 3.36; el Manual de Mini y Micro centrales Hidrulicas [32], en la pgina 146
selecciona la misma turbina. La funcin utilizada por el NeuroShell2 es la siguien-
te:
M=SI\(((altura)H=50;(Caudai)Q>=O, 12;Q<=0,4;(Potencia)P>=30;P<=150;
(Velocidad Especfica)Ns>=40; Ns<=160); 10;0)
SELECCION DE TURBINAS PARA UNA t:<::NICENTRAL

-Altura~ VeLG __ ,~Ef.Francis~Ef.Helic~r.Turgo ~
Cauda~Ef. Petto~Ef. Kaplan~er.Michei~Ef. Tubular~
_,_
1TLII*lo : - Soloctim!lilo
:-uJH o;oro
~~~----~~-------E--------~
-21DH iS16 A
~~~CH
~s(l't!fba
o;ms
o;oro ....
_..,
2;211
.
...
~s!RiPida o;oro
PnmOis EEXtnl mipittn D;D'13
o;m
Helioe o;oro
.......
1!!!_-
U]IO
o;oro
o;oro "
11
P_jPI!tton_h n7BJ812
P 'Ptfurt1kW n28;zas 11
lltem , ..lM 11' ,.......,. Q1_,. ~-T- U ...,.,_ ~~ !U-
1\Verpor<Campo vJI-m '" J<lil.Choro;o!iton r~lf ,a,,.,_ ,

TAaACOO'PARATIVAf'ERNA ~-
1::::-P:t-o>----,-::IJ>-:-:icw---- --::::-INs-------,--,-:--::--::-----,co::P:t-o>-- ' IP:icw :kw
~-'llll'--:t.,----,%1'-.____
"'liNs
____ ______,
D:OOO D:OOO
o;ooo n;om o;ooo v
l~lltem~--------------------~'H~Im~------------------~-~~~-~
;,;; '6Dlll fo:32
.... 35 ;61)/0
1'0-0
'60!0
60!0
;!31 li(J!O 0:3
0010 0:3
0010 0:3
F.ig. 3 .36 Se1eocln de una turbina Nito'heU.
En el men de turbina Michell y en el tem 484, haciendo doble clic, el
programa MERNA muestra las dimensiones de la turbina Michell, seleccionada en
el paso anterior; tal como se observa en la figura 3.37. Las funcion~~ utilizadas
son las siguientes:

129
Vsai_C1_ms E342*RAIZ (2*9,8*A342) =

Dchorro_mm = RAIZ((4*Q)/(C1*PI()))*(POTENCIA(10;3))
02_Rd_mm = (1000*Ns*RAIZ(H))/K
01_Rd_mm = 0,66*02
Omed_mm = (02+01 )/2
Arod_B_mm_teta_60 = (98,8*Q*POTENCIA(1000;2))/(02*RAIZ(H)*91)
Arod_B_mm_teta_90 = (98,8*Q*POTENCIA( 1000;2) )/(02*RAIZ(H)*92)
Arod_B_mm_teta_120 = (98,8*Q*POTENCIA( 1000;2))/(02*RAIZ(H)*93)
IJ fu~bJO,! MH ne 1 f ~~,~
DIMENSIONAMIENTO DE TURBINA MICHELL
~
<Alura j'Sil:O ,v.J,:~. l.900;o 1c;s,,,lll ~.et 1$0:0 l-.ce3 [
1$510 ,_.fe2 190:0
-
'~l:o.lleliEI.cl'll:hl )lllirf. D jJiO f:oF.'DeXt ~
~~~
le
aiii~
r..,~~eT-
> ~~l'...!.TmiJ:60 'l4lj948

~.- ., ! > :eth_<a_tnrn_'lll '02;1107
1 :> PJI'IihljkW '55)817 1 > :Eti)_"!L11111JI20 m;896
! :> ~;, '.'"'~"> 1 > IAnXI 18 '11111 lblta IDO 11'1'111115 .
~
1 :> 'Dhorro.!JMI 1:1177115 ",. 'Aroll_F8~'1!111ll!lto_'90 ~mm
1
i :> 'JJ<lRll~ I<29Di1DD i :> -'Amil f8'1!111lblto_U2D i72;r197 1
:> 'DURii..Lmm ln9t862 1 :> "Nillbes_,;2 :23j81~
- '"
!
'"""'"""' ,,o: 1
""
=1~8'1
j:c.....,.
1[
I"'J 1-
Praoes2 ~-""""" t !JOV!!!or
Jv~ '1:
:un-,;1!
IBI- : -
-..-
-" - 1
,---~'MemoJ;rlilila"~"lJ!ll'.,.,.,_,nrr!ilila~-'-1!otf
:PIJ>
fm;;B74
77S;B7'
=
rpt,w
J'le5;B11
'55;817
INs
'!1!1;3119
"""""
-
!~"3
!Mdlotlo-11
t-!..:.m
IPI'c>
i1S"1J711
tm;;&73
'Pt.w
'!15lff7
'55;1<11
._
,fNs
""'""" Q.:mlls
"'IIPI'c>
11:000
ll:OOO
'!IQ>kw
11:000
ll;mo
-
ll;DIIO
ll;DIIO
"~82 :0 O!lB ,~ 1
1!83 :o n.~e
o 18
"!!115 :o DJlB ~
1
'186 ;o :2
-~87 'Sil:O Oi2
'1118 3D:O 0:2
'189 !il:O :o~z
'190 !il:O U2 1
'191 !il:o U:2 y 1
1
IF.ig. 3".'37 Dimensiones de una turbina Micbe11.
3.2.4.3 Seleccin y diseo de una turbina Pelton 1eh
Haciendo doble clic en el tem 93, ingresamos los datos H= 200m, Q=

0.1 m 3/seg, el programa MERNA selecciona Turbina Pelton 1eh, como se observa
en la figura 3.38. La funcin utilizada por el NeuroShell 2 es la siguiente:
Pelton 1ch = SI \i (H = 200; Q>= 0,03; Q<= 0,24; P>=35; P<=390;
Ns>=10; Ns<=30) ;10;0)
130
!Figura 3.38 Seleccin de una tulbina Pe1mn ld1.
En el men de turbina Pelton y en el tem 93, haciendo doble clic, el pro-
grama MERNA muestra las dimensiones de la turbina Pelton 1ch, seleccionada
en el paso anterior; tal como se observa en la figura 3.39. Las funciones utilizadas
son las siguientes:
dch_Pelton_1ch = (550)*RAIZ((Q/(RAIZ(H))))
Dr_Pelton_;mm = ((K*1000)*RAIZ(H))/N
Vr_Pelton_rpm=1 000*(60*Vt)/(Dr*PI())
Ancho_b_P1 ch=3,75*dch
Alto_h_P1ch =3,5*dch
Espesor_CP1 ch=1 ,5*dch
03_P1 Chmm=Dr+2*((3*h)/5)
Zc_Pelton1 Ch=0,5*(Dr/dch)+k
131
DIMENSIONM1ENTO DE TURBINA N:LTON
- :
'
!
"o>
"
! >
Jilledel-
4mitl>1bJ.P'!Ch
fb lh ll"l<h
:Espesorltll"!Ch
.Drll'l!lm
-
116;71'1
'EIJ,'93&
:34f87
;5B1Jdf[l)
1 >
: :> j"ll!;ll'20mn (l7l8/75'1 1
1 '> j:Dc IM121mn (f671!;52'1 1
1
"> J 2 t l - (:22111119 1
1 ::>JZLIP.I!ton>K!h (i26;57J 1
; > jll!h<l'l!lm..<..:h (:ll2;703 1
1 :> Jilhjl'l!lun~~Ch (:!!3,'125 1
IF.ig. 3.39 DimenSiones de una turbina Pe1ton 1dl.
3.2.4.4 Seleccin y dise.o de una turbina Kaplan
Haciendo doble clic en el tem 984, ingresamos los datos H= 25m, Q= 10

m 3/seg, el programa MERNA selecciona Turbina Kaplan, como se observa en la
figura 3.40. La funcin utilizada por el NeuroShell2 es la siguiente:
KAPLAN =SI IV
\ 1
(H = 2s '
a >= 6 s
' '
a <= 20
,
P >=11oo P<=4ooo
, '
Ns>=300 Ns<=600) 1oo)

' ' '
En el men de turbina Kaplan y en el tem 984, haciendo doble clic, el
programa MERNA muestra las dimensiones de la turbina Kaplan, seleccionada en
el paso anterior; tal como se observa en la figura 3.41. Las funciones utilizadas
son las siguientes:
Tas_C3_m/s = RAIZ (2*9,8*0,3*H)
Dcho_D3_mm = 1000*RAIZ ((4*Q)/(PI()*C3))
Drod_D2_mm=O, 98*03
Dcu_Dn_mm=D3*((0,25+(94,64/D3)))
Dme_D1 _mm=D2+(D2-Dc)/2
Arod_Bo_mm=(0,8*Q)/(0,9*D2*PI()*Cmo)*10"6
132
SELECCION DE TURBINAS PARA UNA MIMCENmAL

~ Val. G... ~Ef.Franclsi~Ef. Helic~f.TUI]O ~
AltUra
Ceuda~Et. Peno~ El. Kapla~Ef. Miche@!!!]Ef. Tubula~
ITdb!NI , IVM:Ir ~
'N
o;ooo
o;ooo
'N
0.:547 N
N
o;ooo 'N
TAaACOMPARATIVAMERNA ~~~
' IP:tlP IPJ<W : rNs IP'f1> ' 'Ns
.;;
::Z!IBD;52S D;Dif9 :omo
fH_:m
no:n
'.9115 ~25!0 nn:n
18.8
910
'.981 910
,go
f2510 .9m
~JO
lfiigura 3AO Se1eain de una turbina Kap1an.

l'J TES11 Df ..h~G1'iTEP v . .: ':, -,~- g,
D Tts "'"'<: ~.-:;;',1 -_- e ~

-- --
DIMENSIONAMIENTO DE TURBINA KAPLAN

IAillro j;;sm 1 \VOI.IR<>t. j'!ISOm 1
' .coufol lnnm 1 IEf.l~ 19lto -~
lfiig. 3A1 DimenSienes de una bobina Kap1an.

CAPTULO 4
RESULTADOS
4.0 .RESULTADOS
Los resultados obtenidos con la configuracin que presenta el NeuroS-

hell2 se pueden considerar como aceptables, posteriormente se probaron con
diferentes funciones de activacin y tiempo de prendizaje (modificando los tiem-
pos de parada); en el entrenamiento se observ que los valores que el NeuroS-
hell2 presenta por defecto son los mejores. En la tabla de datos que se le propor-
cionaron a la red, hay valores que cumplen los requisitos de seleccin, como tam-
bin hay otros que no cumplen estas condiciones; se procedi de esta forma para
ver si la red era capaz de generalizar ms y de ofrecer mejores resultados durante
el proceso de entrenamiento. Al culminar el estudio tenemos los siguientes resul-
tados:
4.1 RESULTADOS EN SELECCIN Y DISEO DE UNA TURBINA MI-

CHELL.
Ingresar los datos de H =50 m, q = 0,180 m3/seg, V,= 900 rpm y efi-
ciencia de la turbina 11 = 65%.
4.1.1 Mtodo Tradicio.nal
Utilizando las ecuaciones (2.1 ), (2.2) y (2.3) y comparando con los valores
de la tabla 1.1 y en el grfico de la figura 1.2, seleccionamos la turbina Michell.
134
Tabla 4.1 Seleccin de .la Turbina Michell.
Vel. Efic. Tipo Pot. Pot. Vel. Turb.

Altura Caudal
Rot. Turb. Turbina Turb. Turb. Espcif. Selec.
H Q n 11 Nombre Clase p p Ns
m m3/seg rpm HP KW rpm
50 0,180 900 0.70 Pelton 1 Ch 82,895 60,110 61,33 o
50 0,180 900 0,70 Pelton 2Ch 82,895 60,110 43,58 o
50 0,180 900 0,70 Pelton 4Ch 82,895 60,110 30,82 o
50 0,180 900 0,65 Michell 76,974 55,817 59,39 10
50 0,180 900 0,80 Francis Lenta 94,737 68,698 65,89 o
50 0,180 900 0,80 Francis Normal 94,737 68,698 65,89 o
50 0,180 900 0,80 Francis Rpida 94,737 68,698 65,89 o
50 0,180 900 0,82 Ka plan 97,105 70,415 67,70 o
50 0,180 900 0,85 Hlice 100,658 72,991 67,91 o
4.1.2 Mtodo MERNA

Ingresamos los datos indicados y el MERNA selecciona la Turbina Mi-
chell, como se observan en las figuras 4.2 y 4.3; el Manual de Mini y Micro cen-
trales Hidrulicas [32], en la pgina 146 selecciona la misma turbina .
. Arci'IYo Clalo Ver He,wnlertas
SELECCION DE TURBINAS PARA UNA MINICENTRAL

rAitura :::! Vel. 0 ... ~f. Francls~Ef. Hellce~t. TUfliO lill
J Caudal~f. Pellon~Ef. Kaplan~Ef. Mlchel~f. Tubular {IJ
Tlrl>m Ytlor
--- -- ---
~
- -
----
Polton1CH fJ35
Polbln2CH .772
""
Pelton4 CH
Franol Normtll
....... _,.
, 143
~ice
- --
_Pmtan_kW
""'
.895
~.110

.J
nem 1&1 1 ........, 10-z 0r-. 1- JI u...,... 1
....,.por Cerrpo [v JI Peten !eh HCUchorapekon i~l Blml""' 1
s.o .2
51!.0 .2
50.0 .18
50.0 . 18
;o.o .18
51!.0 0.18
481 50.0 .12
50.0 .12
.J
Fig. 4.1 Seleccin de una turbina Mitchell. Mtodo 1.
135
tlJ TfSIS 0[ t.IAGISl fR v. B ";-:.'"~:8'

Arawo _~- _v::__ ~~-------- --- -----------.. -------.. --------------------------------~
.._ - +
1 q.. SelocdM Petan t(;) Frlii'ICis K"'JJM ~ lti>ol ~ H6lce & r..nw r._
Fig. 4.2 Seleccin de una turbina Mitchell. Mtodo 2.
En la tabla 4.2 y 4.3 mostramos una comparacin en los resultados, en la

seleccin y dimensiones principales de la turbina; por el mtodo tradicional y por
el mtodo MERNA (mtodos 1,2 y 3,4) y la desviacin en los resultados que se
presentan. Al Ingresar los datos indicados el MERNA calcula las dimensiones
principales de la Turbina Michell, como se observan en las figuras 4.3 y 4.4.
Tabla 4.2 Comparacin de resultados: Seleccin de la Turbina Michell.

Mtodo Tradicional Mtodo Valores de Salida [(Mt- SM)/Mt]*100%
Php PkW Ns MERNA Php PkW Ns Php PkW Ns
76.974 55.817 59.39 Mtodo 1 76.974 55.817 59.338 0.000 0.000 0.000
76.974 55.817 59.39 Mtodo 2 76.974 55.817 59.338 0.000 0.000 0.000
76.974 55.817 59.39 Mtodo 3 76.974 55.817 59.338 0.000 0.000 0.000
76.974 55.817 59.39 Mtodo4 76.974 55.817 59.338 0.000 0.000 0.000
Tabla 4.3 Comparacin de resultados: Dimensiones de la Turbina Michell.

Mtodo Tradicional Mtodo Valores de Salida [(Mt - SM)/Mt]*1 00 %
Dchorro D2_Rd D1_Rd MERNA Dchorro D2..:.Rd D1_Rd Oc horro D2_Rd D1_Rd
y 87.786 290.699 191.861 Mtodo 3 76.974 55.817 59.338 0.000 0.000 0.000
87:786 290.699 191.861 Mtodo4 76.974 55.817 59.338 0.000 0.000 0.000
' .
136
j I)TJJlllt.)IWiliJ)J
-
Q; !?,ti
!
""" jso.o 1Vol. Rot. 900.0 es.~. m ~-61 mm.63 [: 1
rt
'Coudal ]El. "'<he! j65.0 jAI1y.a ~-62 I:J:oet.Dext ::
t;~
1
Tipo de Turbhl Resultado T1podeTurblno Resulada e '
c:o-
Df_lolchel.w
10,000
76,974
G : J Ech_e_nm 60
l > Edt_a_nm_90
41,948
62,907
( > ]P_I'idlel_kW ss,BI7 [ > Ech_e_nm_t20 83,1196
~ .. \o' -t
\
-~
G:JNs_lolchel 5'l,3BB L> 1Arod_B_rrm_teta_60 144,195
1L > f,lldlom>JMI
G:J.D2_Rd_lml
JB7,7BS
J290,700
w
l>
AnldJ!JMI_teta_90
Anld_B_Iml_teto_l20
96,130
n,rm
1
;L > '01..RdJMI r > 'Nolabes_Z
J191,B62 23,BI4
-
--
!tom~ ,_ Jo-2 0-. t - 11 u .....
JCOII'OOS vj J"'<hee lv] 1 Bimnar : -- 1
T.tllo~-Memo T.tllo~-por~ T.tllo~-porArrllRodi

DI_Rd Mtodo lld1orro D2_Rd %Ddlorro
DI_Rd %02_Rd %01 Rd _,
' lld1orro D2_Rd
- 11s1k2 --1,;;;;,;;--,- --m.- - -,;o;'.;..~;s,-..,;- ~-:oro--
'87.,;--- -- ]iso.sS9 -
87,796
ltem
.ar
_1290,699 191,8S2
--....:::'----- --------
Hm
.o
197.795 1290;100
-op.., - - --p;ooo---
1911JS2
Q_m3s
..12
(0,000 a,aaa 10.000
----
B2 .o .18 "
183 .o .lB
1184 .o .1B ~
485 .o .lB
186 50.0 .2
4B7 50.0 .2
488 50.0 .2
89 50.0 .2
~.o .2 V
. .
90
.
Fig. 4.3 D1mens1ones principales de la turbina Mitchell. Mtodo 3 .

Alu-o ~Vol. Rot. 1900.0 jes.1. m ~- 61 ~- 63 ~
Coudal ~EI."'<hee IJAI1y.a ~-62 ~.Dext []
Tipodeltnimt Resu!llldo rpo c1e rur~~~na Resultado
ITJ- lO,IXIO > Ed1_oJM1_60 41,94B
!CTIP--.w 76,974 > Ech_o_nm_90 62,907
; L > P_l4chef_kW 55,617 > Ed1_oJM1_120 83,896
1> Ns..}4chol 5'l,3BB > Anld_ft_mm_teto_ro 111,195
G:Jildlorro_mm JB7,7BS > ArodJUt~n_tete_90 96,130
1l > J:o2..RdJMI _1290,700 > AnldJ!_Jml_teto_l20 n,rm
G:]o1_Rdmm jl9l,B62 [DNo!obesJ 23,814
1temC) ,.,._ ~o-2 0-. 1 A!ffll' 1~ u..,.. JI

JCo!mas v! )rti>e! _ 1" 1 1 Bhri""' _
Na %860
12a.S14 jJ,aoa
1cc,1so _ss,1ao f72,as7 123.e1 - 144,192 ss,129 f72,as7 .3,814 p,Dil2 p.oo 10.001 p,aoa
114::~:;:1:::....--------------.~::H_Jn~o;.______ ---------..::-o~
.12
Q_m3s
. . . .--------------)
482 50.0 .lB
.lB
.1B
.1B
.2
.2
.2
489 so.o .2
.2
Fig. 4.4 Dimensiones principales de la turbina Mitchell. Mtodo 4.

137
4.2 RESULTADOS EN SELECCIN Y DISEO DE UNA TURBINA HLICE.
Ingresar los datos de H = 3.50 m, Q= 6 m 3/seg, Vr = 257 rpm y eficiencia
de la turbina 11 =85%;
4.2.1 Mtodo Tradicional
de la tabla 1.1 y en el grfico de la figura 1.2, seleccionamos la turbina Hlice.
Tabla 4.4 Seleccin de la Turbina Hlice.

Altura Caudal
m m3/seg rpm HP kW rpm
3,50 6,0 257 0.70 Pelton 1 Ch 165,789 120,221 838,13 o
3,50 6,0 257 0,70 Pelton 2Ch 165,789 120,221 592,65 o
3,50 6,0 257 0,70 Pelton 4Ch 165,789 120,221 419,06 o
3,50 6,0 257 0,65 Michell 153,947 111,634 807,64 o
3,50 6,0 257 0,80 Francis Lenta 189,474 137,395 896,00 o
3,50 6,0 257 0,80 Francis Normal 189,474 137,395 896,00 o
3,50 6,0 257 0,80 Francis Rpida 189,474 137,395 896,00 o
3,50 6,0 257 0,82 Ka plan 194,211 140,830 907,13 o
3,50 6,0 257 0,85 Hlice 234,868 170,313 822,74 10
4.2.2 Mtodo MERNA
Ingresamos los datos indicados y el MERNA selecciona la Turbina Hli-

ce, como se observan en las figuras 4.5 y 4.6; el texto de Motores Hidrulicos de
Quantz, en la pgina 180 selecciona la misma turbina.
En las tablas 4.5 y 4.6 mostramos una comparacin en los resultados, en

la seleccin y dimensiones principales de la turbina; por el mtodo tradicional y
por el mtodo MERNA (mtodos 1, 2 .Y 3,4) y la desviacin en los resultados que
se presentan.
138
SELECCION DE 1VRBINAS PARA UNA MINICENTRAL

rAI!ura ~Ve!. O... E:!JEf. Francls~Ef. Hellce~f. Turgo 0
iCaudal~f. PeHon~Ef.
..
Kaplan~Ef. Michel~f. TubularIJ
.
Tlrino Yu 5olecdonodo
-r-- --~---- ,... - - - - -.. - . - - - - - ~-A
loo '!!!-.
r.o-
........ 1100
.....
p_Pefton_..,
....
1100
93,A22 1r
_Petton_kW l0,269
_Frwdsft 221,D51
_Fnnols_W/
......
80,295
--
-~m_l'-9
_t<ape.n_kW eo;m
_HIIa._f"1l 23l,810 S
__MIIIMM __- .
_Michei.J'Ip ~79,606

~
........ kW 30
llem (1547 1 ProcHat
jverpcy~
TAllA COMPAAATTYA MERNA jtWce jv:

P!1> Pl:w 'Ns P!1> Pl:w Ns
123<.ssa 170,313 Me!odo 1 Jo.oo
j234,9Stl 170,313 1822,738 Me!odo2 lo.013
llem
E:~--------------------------E:~~----------------------------F.::~~----------------------------~.~
1553
1552
1551 .5 1.5
1550 .5 1.5
1549 .5 1.5
1548 .5 1.5
.
547
1546 .o 15.0
15!5 .o 5.0
Fig. 4.5 seleccin de Una turbina 'Hlice. Mtodo 1.
IIDmt~m.,fJlitlW!
- g.,'fl.'li.i
.. ..
DIMENSIONAMIENTO DE TURBINA HELICE

Mura ~Yel. Rot .
~~~ ,IllR
. Caudol 6.0
~~u
lEEr~
~cleTurl!lna
w _Holce_l1>
El. Hlce
-
.o 55.0
10~000
234,860
1170,310
822,718
~c1ermm..
[TIDrod_D2JMI
m Oclbo_Dn_}Ml
[TIOmed..01JM1
[TIN_Aiab_z
-
1271,782
473,696
sn,m
4,731
r
..
:
~
1 .L
1 H
.
1
1
S
.y
1
.
1
:o;_mn
--
11297,737 Q:][Ar_Bo_mn 468,075 1 ,.; (,.,(T
:
Item 11547
1-pcy~
1 I D - 0r-. 1
... : Figu'as
,_ ... <.....
"_](
11 u ......
Bimlnar
1
1
-~~~
.....:!_.
~/"~ . i
w//~~
~
)
~ ' ~% 1
i
-- - - - - --- ... -- - - 1
..
i
1
T~ Comporotiva Mema ( T<illla eon.>arotiva pcy ~ Tabla Comporotlva pcy aol
1 P!1> Pl:w Ns Mtodo P!1> Pkw Ns %1'11> .%Pkw %Ns
m,esa
;m ,esa
Item
1545
170,313
170,313
1022,738
1022,738
-
-3
!:fJTI
.o
J23<,em
J23A,ess
170;310
170,312
1022,?Ae
1022,792
15.0
9_m3s
Jo,OO&
Jo.oo
jo,D02
!o.oo
Jo.oo
Jo,oro
.....,
1546 .o 15.0
547 .5 .o
1548 .5 1.5
1549 .S 1.5
1550 .5 1.5
1551 .5. 1.5
1552 .s 1.5
1553 .5 1.5
1554 .5 1.5 'V
. .
F1g. 4.6 seleccin de una turbina Hlice. Mtodo 3 .
139
Tabla 4.5 COmparacin de resultados: Seleccin de la Turbina Hlice.
Mtodo Tradicional Mtodo Variables de Salida [(Mt SM)/Mt]*100%

Php Pkw Ns MERNA Php Pkw Ns Php Pkw Ns
234.868 170.313 822.74 Mtodo 1 234.870 170.314 822.729 0.001 0.000 0.001
234.868 170.313 822.74 Mtodo 2 234.870 170.314 822.629 0.001 0.000 0.013
234.868 170.313 822.74 Mtodo 3 234.860 170.310 822.748 0.004, 0.002 0.001
234.868 170.313 822.74 Mtodo4 234.866 170.312 822.762 0.001 0.001 0.003
Tabla 4.6 Comparacin de resultados: Dimensiones de la Turbina Hlice.
Mtodo Tradicional Mtodo Variables de Salida [(Mt - SM)/Mt]*1 00 %

Dehorro D2_Rd D1_Rd MERNA Dchorro D2_Rd D1_Rd De horro D2_Rd D1_Rd
1297.685 1271.731 872.713 Mtodo 1 1297.757 1271.782 875.727 0.004 0.004 0.002
1297.685 1271.731 872.713 Mtodo 2 1297.716 1271.759 872.726 0.002 0.002 0.001
Al Ingresar los datos indicados el MERNA calcula las dimensiones princi-

pales de la Turbina Hlice, como se observan en las figuras 4.7 y 4.8.
0}fSIS J( MAGISlfR v,B . , , . . . . , , ~~~
llJurbinflhcc ~~~
rr3
DIMENSIONAMIENTO DE TURBINA HELICE
~~~ l ~:
- -
Ak\ra Vel. Rot.
c.udol 6.0 Ef' Hl!lce . o 55.0
11podelll1!hl TlpodeluriiWI . S 1
'
~ ,,_,__,.,
~ 10,111111 > Dnx1Jl2.mm 1271,782
1
>
>
,._,_
p_Helice_kW
ZM,IIIO
11711,310
>
>
Dabo_On_mm
Dmed_DI.mm
473,696
ff12,7V
1r
1 1
VI 1
> 112,M > N_Aiab_Z 4,731 1 ~1
> OchoJ)3_mm ]1297,737 > Ar_Bo_mm 468,075 T .rr
nem ]15>47 1 ......... lo- ~r-. 1 Aunzv 11 u .... 1 ~--,1~ ~~
~/~
~
~ .;.]1 -1
'~
1ver por c..,_ f9ras Si minar 1
~
- - - .. - ... - ---
---
'
Tabla c..,_oliva Memal Tabla c..,_otlva por om..r-. 1 Tabla c..,_otlva por BOl
i OchoJ)3 Drod.P2 Dabo.Pn Omod.PI DchoJ)3 Drod_D2 Dabo_lln Cmed_DI %Ddlo_D3 %Drod_D2 'Y.oabo.Pn %ilmed.PI l
1297/385 1271,731 73- js72,713 .......... 1297,731 1271,782 i'73.SOO js72,727 Jo.ooo fo-
(om
Jopoo Jom
1297 ..... 1271,731 73- J972,713 1297,716 1271,'M9 1'73.... js72,721l Jom Jo.oo< 1<>.001
Rem H_m Q..m3

15'42 .o 12.0 A
1513 .o IS.O
1511 .o IS.O
IS>IS .o IS.O
15'46 .o IS.O
517 .5 .o
1518 .S !.S
15'49 S !.S
1550 .S !.S
1551 .S 1.5 v
. . .
Fig. 4.7 Dimensiones principales de la turbina Hlice. Mtodo 3
140
r]H~IS llf 1.\AC,I~lfR v.B ~~ ~
D 1 UJ bma t le he e ":"S "X

DIMENSIONAMIENTO DE TURBINA HELJCE '1
Altu'o
c.udol 6.0
~Yo!. Rot.
El. Hlce ~~-~
. o 55.0
Tipo del_, Remllldo

1 1:
S
1
~ r
> Orod_DZ mm 1271,782 '
1
~1
>
,_!(N
>
>
>
DaboJln..J!'TI
Dmed_Dl_rrm
N..f\lob..J
173,696
rrn,m
1,731
1r ,, 1
1
~
.1
> llllcho 03 mm 1 .rr
-
11297,737 1 > I>I.]Jo mm ..68,075
10-2 0r-. 1 ....... ~~..__,~~-

Item 11517 1 11 U!!f;! 1
~
lverporc.orc>os lvJ Ago.ros IHk v]l Bimlnar 1 ~~ '. i ~
~ _ ~ __ ,_
-~- - - --- ---
-
~

Tl!blo~l!ltvoMemoJ Tl!blo~l!ltvooorlllmer-.j Tl!blo~l!ltvoporOO
' No 00 Mtodo No 00 %No %00

.,731
4,731
Item
1512
4S8,1)72
j4S8,072
-
-3
H_m
.o
1',731
_]4,731
I'SS,D75
I'SS,D71
Q_m3s
12.0
l<l,OOO
10,000
0,000
0,000
...
1513 .o 15.0
15 .o 15.0
1515 .o 15.0
1516
517
1516
.o
S
.5
.
15.0
1.5
1519 .5 1.5
1550 .5 1.5
1551 .5 1.5 v
Fig. 4.8 Dimensiones principales de la turbina Hlice. Mtodo 4.
4.3 RESULTADOS EN SELECCIN Y DISEO DE UNA TURBINA PELTON

2CH.
Ingresar los datos de H =120m, Q =0.150 m 3/seg, Vr =1800 rpm y efi-

ciencia de la turbina 11 =85%.
de la tabla 1.1 y en el grfico de la figura 1.2, seleccionamos la turbina Pe/ton
.2ch.
Tabla 4.7 seleccin de la Turbina Pelton 2ch.
Altura Caudal
H Q n t1 Nombre Clase p p Ns
120 0,150 1800 0.85 Pelton 1 Ch 201.316 145.983 64.30 i
o
120 0,150 1800 0,85 Pelton 2Ch 201.316 145.983 45.47 10
0,85
120 0,150 1800 Pelton 4Ch 201.316 145.983 32.15 1
1
o
141
Tabla 4.7 Seleccin de la Turbina Pelton 2ch (cont).

Vel. Efic. Tipo Pot. Pot. Vel. Turb. Turb.
Altura Caudal
Rot. Turb. Turbina Turb. Turb. Espcif. Selec. Selec
H Q n T) Nombre Clase p p Ns
120 0,150 1800 0,65 Michell 153.947 111.634 56.23 o
120 0,150 1800 0,80 Francis Lenta 189.474 137.395 62.38 o
120 0,150 1800 0,80 Francis Nonnal 189.474 137.395 62.38 o
120 0,150 1800 0,80 Francis Rpida 189.474 137.395 62.38 o
120 0,150 1800 0,82 Ka plan 194.211 140.830 63.16 o
120 0,150 1800 0,85 Hlice 201.316 145.983 64.30 o
4.3.2 Mtodo MERNA
Ingresamos los datos indicados y el MERNA selecciona la Turbina Pelton

2CH, como se observan en las figuras 4.9 y 4.10; el texto de Motores Hidrulicos
de Quantz [31], en la pgina 203 selecciona la misma turbina.
' t. .;r,llUIJili; '~1!~

Altura .~ffi:~~ o..~~ Fra-;.cl~l:;ir Helice ss.o )t. ru"'o ~~
b. Tubular 93.0
-~
Caudal 0.15 f. PeHonBS.O Ef. Kapl.an 90.0 Ef. Mlchell65.0
T<ri>he V 5e!ecdonodo
..;.;.:1-CH ~ . p,OOO~ - -----
~~ ~ ~~-
;;..
~
-~ --~----.
-
.
~on2CH 1/JOO S
)Petton4 CH IJOO ;
fnonc;sL....
~~ -"l~ ro~~~~
1
fnonoi ..,.,.,. ,187
eF
~"""""
po7
'-
-
ancis Extra Rpida ,234
- ~~~~-
,139 N
"""'""
Hell~
......
_ _J'<>
' 1\rgo
IJOO
IJOO
IJOO
201,317 S .J
_Petton_kW
!tem 20Z 1 ..........

146983
10Pooeso2 0r-.
S
1 ........... 11 Umpiar_
:v
1
~ L-- ..
!veroorc"""" r~!- lch l"leu:horapekon Hf Blmlnar 1
,__.
TliBIA C<M'AAATIVA 1ERNA Petan .
-~--
! H _m____
Pi'c> Pboo Ns Mtodo Pi'c> Pb. Ns %Pi'c> '%Pboo
l201,31s ~ .. ---h4ii:s&3'~-!45.S.-.;..-;;;;;-- . ]201,31' --lido:;.3--.5;169 om opoo opoo ~:..=J. --:
201,316 146,883 f45,CSS """"'"'2 1201,318 1.t5,983 145- !OIJOO o,ooo !OIJOO :V
ltem H_m Q_m3JOII.
i4-- oo~o-~
.06 ;
200 100.0 .06
20Z 120.0 .15
ZOI 120.0 .15
zoo 120.0 .15
199 150.0 .o
198 150.0 .o
197 150.0 .o
v
196
. ., . 150.0
,
F1g. 4.9 Selecc1on de una turb1na Pelton 2CH. Metodo 1 .
En la tabla 4.8 y 4.9 mostramos una comparacin en los resultados, en la

seleccin y dimensiones principales de la turbina; por el mtodo tradicional y por
142
el mtodo MERNA (mtodos 1,2 y 3,4) y la desviacin en los resultados que se
presentan.
Q:rrSIS)lfi.\AGISJIR. v.B .: ,_,. - . . . . . P!]~~
. ~ Yersion 1 (_l. Selecdoo Pelen Frands +

---~---~----~-----------
g ~ \') Mchel "9' Hlce & TlbAar (1 r._

O_l'olton ~~~
DIMENSIONAMIENTO DE TURBINA PELTON :
.-e--
1Ahr ) v;,:;;;:-s Co.-.t. iJemst. c~~l
--
Peton-
1
i c.udal 0Ef.Peton @!Jemst.Rodete ~ 1
~i~~-
1
ll!odeTIII1*Ja ll!odeTurtma RestMado
![ > Pebn_1ch 0,000 > JAncho.J>.}'1ch 120,674
0 ~ III,GOD > _jAto_h P4ch 112,629

> Pebn_'kh 0,171 > J Espesor_t...l"kh 18,270
>
~wdi.U~~ ~ 1/~a;-
> P_Pebn~ 201,317 Dr_Peton 150,345
> P_f'etonJ<W 1'15,983 > Oc.PIOmn 720,662
M~ ~'t ~, ~
'L-
> Ns_f'eloo_ICh 32,152 > ~ 6t!,'ll1
0
>
INs~
Ns_f'eloo_<fCh
22,735
16,076
>
>
Oc_P<fOmn
Zc_f'elooiCh
(585,504
J17,<f99 ~-~~ :
~~-~-bf
> Ancho_b_Pich 241,349 > ~ lB,M '
> Ato)l_Pich 225,259 > Zc_f'eloo<fCh 120,997 1
Espesor_t_Pich > f6<1,360
>
......
96,539 dch_Peton..lch 1
> ,_..)1.1211h ~
m-.]IJ'Ida
0r~__t_P2d> ....-.-
IJQ.a >
> dch_f'eloo_1ch (32,180
. .
1
1
1
ltem
~1 - )0-..> ~T-.
... _ 11 u..,.. . 1
1
lvorpor(OifiiO v!Pettnlch "'JCuchorapelon vJI Blmfnw 1 '
-
.. -- -- __j
Tobla ~attva Mema ( Tobla ~oliva por Dmenslon 1Tobla ~oliva por Dmenslon Oi]
-
,
Php Pbo Ns Php Pbo Ns 'li.Php va.. %Ns J
'!201.318
1!201,318
ltem
,ZOO
145,993
145,983
!22,735
22,735
-- HJTI
12!1.0
1201.317
1201.317
145.983
145,983
!22.735
122.735
(0.001
(0.000
QJn3_.seg
.15
(O.ooo
0,000
lo.OOO
lo.ooo
201 120.0 .15

202 120.0 .15
203 100.0
- .06
-- YJ
Fig. 4.10 Dimensiones de una turbina Pelton 2CH. Mtodo 2.

pales de la Turbina Pelton 2ch, como se observan en las figuras 4.11 y 4.12.
Tabla R.S Comparacin de resultados: Seleccin de la Turbina Pelton 2ch.
Mtodo Tradicional Mtodo Variables de Salida [(Mt SM)/Mt]*1 00 o/o

201.316 145.983 45.469 Mtodo 1 201.317 145.983 45.469 0.000 0.000 0.000
201.316 145.983 45.469 Mtodo2 201.317 145.983 45.469 0.000 0.000 0.000
201.316 145.983 22.735 Mtodo3 201.317 145.983 22.735 0.001 0.000 0.000
201.316 145.983 22.735 Mtodo4 201.317 145.983 22.735 0.000 0.000 0.000
Tabla R.9 Comparacin de resultados: Dimensiones de la Turbina Pelton 2ch.
Mtodo Tradicional Mtodo Variables de Salida [(Mt SM)/Mt}*1 00 %

Dchorro , D_Rd De MERNA Dchorro D_Rd De Dchorro D2_Rd D1_Rd
45.509 450.350 641.488 Mtodo 3 45.509 450.345 641.487 0.000 0.001 0.000
45.509 450.350 641.488 Mtodo4 45.509 450.342 641.487 0.000 0.002 0.000
143
DIMENSIONAMIENTO DE TURBINA PELTON
Fig. 4.11 Dimensiones principales de la turbina Pelton 2ch. Mtodo 3.
~_l'olton . . , . ~~~
> JAncitoJ>_P1ch 120,674

> JAlo)l P1ch 112,629
[TI E5pesor_t_P1ch 48,270
[Der...PeRon 450,345
[D:Dc_p1Chmm 720,662
> ~ 641,.:7
> Dc_p4Chmm 1585,504
16,076 > Zc Peton1Ch 117,499
241,31-9 > ~ II,M
225,259 > Zc..}'ebln4Ch J20,997
96,539
llfoa
>
>
>
dch..}'ebln_1ch
~
dch_Peton 4ch
.....
164,360
132,180
Fig. 4.12 Dimensiones principales de la turbina Pelton 2ch. Mtodo 4.

144
4.4 RESULTADOS EN SELECCIN Y DISEO DE UNA TURBINA KA-

PLAN.
Ingresar los datos de H = 9 m, Q = 10 m 3/seg, Vr = 277 rpm y eficiencia

de la turbina ra =90%;
Utilizando las ecuaciones (2.1), (2.2) y (2.3) y comparando con los valores
de la tabla 1.1 y en el grfico de la figura 1.2, seleccionamos la turbina Kaplan.
Tabla 4.10 seleccin de la Turbina Kaplan.

Altura Caudal
m ml/seg rpm HP KW rpm
9 9 277 0.70 Pelton 1 Ch 828.947 601.105 474.672 o
9 9 277 0,70 Pelton 2Ch 828.947 601.105 335.644 o
9 9 277 0,70 Pelton 4Ch 828.947 601.105 237.336 o
'
9 9 277 0,65 Michell Banki 769.737 502.352 457.405 o
9 9 277 0,80 Francis Lenta 947.368 686.917 507.446 o
9 9 277 0,80 Francis Normal 947.368 686.917 507.446 o
9 9 277 0,80 Francis Rpida 947.368 686.917 507.446 o
9 9 277 0,90 Kaplan 1065.789 772.849 538.527 10
9 9 277 0,85 Hlice 1006.579 729.913 523.063 o
4.4.2 Mtodo MERNA
Ingresamos los datos indicados y el MERNA selecciona la Turbina Ka-
plan, como se observan en las figuras 4.13 y 4.14.
En las tablas 4.11 y 4.12 mostramos una comparacin en los resultados,
en la seleccin y dimensiones principales de la turbina; por el mtodo tradicional y
por el mtodo MERNA (mtodos 1,2 y 3,4) y la desviacin en los resultados que
se presentan.
145
!!'] HSIS 01 MAGI'mR v.e . . . . ~~~
D ..Selcccin de 1u,1hnas ~B~
Fig. 4.13 Seleccin de una turbina Kaplan. Mtodo 1.
~,TfSISilf MAGI\Tfll v,B . . , , ~~liD

Ata-a ~ \'el. Rot. 1257.0 1 Ef.tid. []
~
>
Coulal
>
>
.~
p~
D
ropo "" Turbina
P~..J<W
...
~
--Ef. Kag,
1,11111
.....!1157
_(m,9t3
s:ll,ltlt
~
>
>
>
>
n>t>rleTuri*Ja
Orod_D2Jml
OcuJlnJIWTI
llme.J)l_Jml
N_Aiob_Z
-
~- [:]
1296,352
563,343
929,873
6,097
1
-
> Dcho.P3Jml 11322,801 > Arod.]lo_Jml +49,137
1
llem 11329 1 1o-0-. [ IV 1( U!!!!!at 1
11
1ver por c..,._ v)Ro.ros lt:.o~on H t 1
~
Bimlmw
TAllA COK>ARATIVA foERNA TAllA COK>ARATIYA Dml TAllA COK>ARATIVA 80

P~ Pkw Ns M6todo P~ p.;. Ns %P~ 'Y,Pkw %Ns 1
l'n2.s lsas,192 lo. lo,ooo lo,ooo
1005,189 f772,849 538,227 .... _ . 1005,983 J!2m .J53Y28 (O}l09 0.1>04 _]O_.ooo
nem H_m QJn3s

.o
.o
.o
1o.e
10.0
1331 .o 10.0
10.0
15.0
15.0
15.0
120-0
120-0
:~::=-------------------------~~:~~--------------------------~--------------------------~l.v
.7
.7
Fig. 4.14 Seleccin de una turbina Kaplan. Mtodo 3.

146
Tabla 4.11 Comparacin de resultados: Seleccin de la Turbina Kaplan.
Mtodo Tradicional Mtodo Variables de Salida ((Mt SM)/Mt]*1 00 %

1065.789 772.849 538.227 Mtodo 1 1065.879 772.883 538.234 0.008 0.004 0.001
1065.789 772.849 538.227 Mtodo2 1065.862 772.877 538.237 0.007 0.004 0.002
1065.789 772.849 538.227 Mtodo 3 1065.957 772.913 638.192 0.016 0.008 0.006
1065.789 772.849 538.227 Mtodo4 1065.883 772.877 538.228 0.009 0.004 0.0000
Tabla 4.12 Comparacin de resultados: Dimensiones de la Turbina Kaplan.
Mtodo Tradicional Mtodo Variables de Salida [(Mt SM)IMt]*100%
Ochorro O_Rd Oc MERNA Ochorro O_Rd Oc Ochorro 02_Rd 01_Rd

1322.970 1296.511 563.369 Mtodo3 1322.801 1296.352 563.343 0.013 0.012 0.005
1322.970 1296.511 563.369 Mtodo4 1322.922 1296.466 563.365 0.004 0.004 0.001
pales de la Turbina Kaplan, como se observa en las figuras 4.15 y 4.16.
rJ Turbmtl Kaplan ~~rx

. Al\ra ~ 1257 .O 1 Ef. Hid. loo.o 1
1
rf i
.1
Yel. Rot.
caJdol [] Ef.KoPon ~ rw. o
0
~ de TuriJina Reaaado
~J.rl
c:',
~
' j 01 ,
~j;r.,,,
> Orod_ll2 mm 1296,352
> Dcu_Dn_nm 563,343
,y,
--~~~
> 1lme D1_pwn 929,673
> > N_Aiab_Z 6,097 '
--
-
> 11 1ld1o 03 lml 11322,~1 1 > Arod 8o mm 449,437
1 ,.,_
'~
Item 11329 1 O P,oceso 2 ~ Todos 1 ll !J1:)1w
~
03
1- por Cmc>os Hf9,ras \KoPon ... 1 Blrnlnar
tci
a
TAIIIA CotoFARATIVA MERNA TAllA CotoFARATIVA Dtn TABLA COMPARATIVA BO
ll<ho,.D3
1322,910
1322,910
Rem
Orod_l)2
12SS,G11
1298,611
Dabo_Dn
psa,ass
J563,36S
Dmed_D1
j929,9AO
j929,9AO --3
Mtodo
- H_~
Dcho_OO
1322,801
1322,922
Orod_D2
129S,352
129B,ASS
Dabo,Pn
f5S3,u3
j5s3,3S5
Dmed_D1
j929,873
j929,9:24
Q._m3s-
%Dcho_D3
0,013
%0rod_D2
I<J,012
IO.OOA
%Dabo_Dn
o,ooo
IO!Xl
%0med..D1
O!Xl7
101Xl2
1
1
.[326 9.0 .o "'

1321 .o .o
1328 .o .o
1329 .o 10.0
1330 9.0 10.0
1331 .o 10.0
1332 .o 10.0
1333 .o 15.0
1334 .o 15.0
1335 .o 15.0
1336 9.0 @.0
1337 .o zo.o 1,;;
3:l1l .n :1
Fig. 4.15 Dimensiones de una turbina Kaplan. Mtodo 3.

147
R HSIS 0[ /.IAGISlfR V 8 ~ ~
fl TUl bHM KdVIdn r.:-.~CF

AAllo[!J jZS7 .o 1 !:]
1
rt
f
.r-:p
Ve!. Rot. EI.Hd.
ca.tol ] El. Koplon [ill
Tlpod!!Tilllltta
-
~- ] .
Ftrl
~
> Drod_D2 mm 12'96,352 ~ :t, 01
> Dc:u On_nrn 5631343 ~ ~ t-
1
>
>. JIDclloJl3.JIIll
i.3
J13Z2,601 1
>
>
>
Ome_DI_rrm
N_Aiob_z
Arod.Jk>.JIIll
929,873
6,<H7
149,137
~
-~ tez
_.__
;JD2! Dor7.
~,
!
1
llem 1329 1 .......... 1 o-0-.
1- por ' - ~~]f'9sos !~:oPon

(~~ : :1~: il ~ \VD3 i
~ t a
1
1N_Aiob..Z
.BIJS?
:s,ll9<
llem
1326
1TAllA 1
Arod.Jk>.JIIll
19.49
19,449
-
l.........
~--
l.O
H_m
\60
,.....,
~fiob..Z
s,og1
Arod.Jlo.JIIll
1"".437
l.......
. QJn3s
1.0
%N.)\Iab_z
o,ooo
o,ooo
...,.., Rn
ID,oo3
to.oo
~ :
_...;
1327
1328
9.0
9.0 "o
I'J.O
1329 9.0 110.0
=
l3l
1_332
9.0
1.0
1.0
110.0
110.0
110.0
1333 ,o 115.0
1331 9.0 115.0
1335 9.0 115.0
13:10 9.0 <'~J. O
137 9.0 <'IJ.O
4.5 RESULTADOS EN SELECCIN Y DISEO DE UNA TURBINA FRAN-

CIS LENTA.
Ingresar los datos de H =100 m, Q =2.50 m3/seg, Vr =720 rpm y efi-
ciencia de la turbina q =80%.
de la tabla 1.1 y en el grfico de la figura 1.2, seleccionamos la turbina Francis
Lenta, como se observan en las figuras 4.17 y 4.18.
En las tablas 4.14 y 4.15 mostramos una comparacin en los resultados,
en la seleccin y dimensiones principales de la turbina; por el mtodo tradicional y
por el mtodo MERNA (mtodos 1,2 y 3,4) y la desviacin en los resultados que
se presentan. Al Ingresar los datos indicados el MERNA calcula las dimensiones
principales de la T~rbina Francis Lenta, como se observan en las figuras 4.19 y
4.~0.
148
Tabla R.13 Selea:in de la Turbina Frands Lenta.

Altura Caudal Selec.
Rot. Turb. Turbina Turb. Turb. Espcif.
H Q n TJ Nombre Clase p p Ns
-.
100 2,50 720 0.70 Pelton 1 Ch 2302.63 1717.76 109.26 o

100 2,50 720 0,70 Pelton 2Ch 2302.63 1717.76 77.26 1
o
100 2,50 720 0,70 Pelton 4Ch 2302.63 1717.76 54.63 1
1
o
100 2,50 720 0,65 Michell 2136.98 1594.19 105.25 o
100 2,50 720 0,80 Francis Lenta 2631.58 1908.27 116.80 10
100 2,50 720 0,80 Francis Normal 2631.58 1963.16 116.80 o
100 2,50 720 0,80 Francis Rpida 2631.58 1963.16 116.80 o
100 2,50 720 0,90 Ka plan 2960.53 2208.55 123.88 o
100 2,50 720 0,85 Hlice 2796.05 2085.86 120.39 o
4.5.2 Mtodo MERNA
Ingresamos los datos indicados y el MERNA selecciona la Turbina Fran-
cis Lenta, como se observan en las figuras 4.17 y 4.18.
,:
~..,,}<&~ Q,S'~
- . -- -- -- -----
'Mura
Caudal z.s 1 ~~el. o.~~~ Francl:~:f. Hell1:~~
f. Petton 10.0 El. Kaplan 90.0 Ef. Mlthel 65.0
Turgo r~
f. Tubular 93.0
-~
1
--
----
~ ..d!
-._.,_............
T..t>ha v.a Selecdonodo H,
~-1-T- -----<t
~sLern 8,71 S A
rm r--
Fnncls Normal
......... 718 -
[~
~ rm
j
rm
....... 1163
rm
rm
"""'"'
..,.,
.
/>19
p _Pdton_hp 2302,229
p _Petton_kW o, 1
__..,_....
669,582
1 1
~~
- Francf _hp 2630,900
Fnncis kW 1908,041
J2909,670
S
IN y ll '.1
0Pooeso2 -n u..,.. - --- ------ - ---- -- --- ---- -- . - --- '
- ---
~-
lb!m {244
Ve< por'"'- """"'""' v-..1c11 1" ICudlor petan ~~ 1 Biml,_ 1
--
'-
Pil>
~>G>.ora
~>G>.ora
Itero
Pkw
1906,269
1908,269
Ns
116,799
11B,7SS -2
H_m
TAaA CCM>AAATIVA IERNA
Pil>
JZG30_,900
12fl30,771
Pkw
jF<onci<
1908,1)41
1907,9G1
i"]
Ns
116,800
118,799
%Pil>
10,(123
joP31
QJnJJ'OO
%Pkw
(op12
joP1S
-
orm
orm
~~
;
fZ4a 100.0 .s A
~7 100.0 .S
46 100.0 .S
~S 100.0 .S
100.0 5
1243 100.0 .3
~z 100.0 .3 o
~1 100.0 .3
00,0 .J "
Fig. 4.17 Seleccin de una turbina Francis Lenta. Mtodo 1.
149
AtdWo CAiruo Yer Herramientas
;1 ~~.~~ 1 q;_-~ .-.;;~gFr.oos +~:oPon ~l'lehel ~tl!lc:-&~ 6~~
-~
1
DIMENSIONAMIENTO DE TURBINA FRANCIS
,720.0 1c. Fr.~ Fr.R~ ~-[ffjc. 1
Alu-a 1100.oj 1Yel. Rot.
Coudal Z.5 Ef. Fr.nis 80.0 c. Fr. Normal C. Fr. E. ~ zs.o
J 1
1
._........
Tll'blno Ytktr ~
FNonn"' ,114 '

.000
FExRaptcbl .000
P_Ffanols~ 1,183 ;1
P_Frrocls_kW 1908,353 N
Ns_Fnncls
03TaspfL mm
03TaspFN_mm
16,799
1,777
-
D3TaspFR_mm 155,579
03TUpFER mm ns.-
Drod_D1FL_mm
~
Drod_01FH_mm ~,oos
Drod_D1 FR_mm 15&J,B34 .;
nnliZ+I 1 Procesar n ~-- 1 o-~ ~Todos c~::::r

1 1v..-oor Conllos Vjfflr.:s Lerta !Y] 1 - 1_
TAllA COI"PARATIYA IERNA TASIA COI"PARATIYA DJ TASIA COMPARATIYA Bo
p,.,
Pll> Pb< Ns Ml!todo Pll> 1
2631fj79 1908.2S9
116,199
116,799
-
-3
2632$11
19118,353
1908,512
116,799
i1S,"199
Jo,ooa
J0.013
o.ooo
opoo
1
Z11
n-
lO
Z4Z
Z-43
Z-45
Z46
H_m
~.o
100.0
100.0
100.0
100.0
100.0
100.0
r=-------.j_
3.5
3.5
.5
- .......... ~ y
Fig. 4.18 Seleccin de una turbina Francis Lenta. Mtodo 2.
Tabla R.14 Comparacin de resultados: Seleccin de la Turbina Francis Lenta.
[(Mt- SM)/Mt]*100
Mtodo Tradicional Mtodo Variables de Salida
%
p hp Pkw Ns MERNA Php Pkw Ns Php Pkw Ns
2631.579 1908.158 116.799 Mtodo 1 2631.783 1908.353 116.800 0.023 0.012 0.000
2631.579 1908.158 116.799 Mtodo2 2630.771 1907.961 116.779 0.031 0.016 0.000
2631.579 1908.158 116.799 Mtodo 3 2631.783 1908.353 116.779 0.008 0.004 0.000
2631.579 1908.158 116.799 Mtodo4 2432.611 1908.512 116.799 0.039 0.013 0.000
Tabla R.15 Comparacin de resultados: Dimensiones de la Turbina Francis Lenta.
Mtodo Tradicional Mtodo Variables de Salida [(Mt - SM)/Mt]*1 00 %

D3Tasp D_Rd D2cor MERNA D3Tasp O_Rd 02cor D3Tasp D_Rd D2cor
599.578 724.938 602.207 Mtodo 3 599.574 724.939 602.204 0.001 0.000 0.000
599.578 724.938 602.207 Mtodo 4 599.579 724.939 602.210 0.000 0.000 0.000
150
WliMJIIIUiH!Smf& EL. Bt a a5 _as zp zp. e _tC u2 _u : ; _5:; :a t.waexunnyc:J4'!1i31

'
-'
.......
FNo<mal
,_
2831,783
1908.353
""-"'""" 11G,799 J
'1
!Drod. l1Fl-"'m
""'""" 1
''bfz-~-~~il
!!lver...-c.n-
5001)34
w
i"i5~0T:;; """~'~-
i~!Frond<lento 1"11 -a.- 1 _
l
TARA.< lf'ERNA] TABlA ~wr. AUO~ u \Bol
,ootosp t OZrod Dlrod 1_- ootosp llrod _%02rod _%1llrod
-- OZrod-
10.001_ JOIJOD ooo
!599,579 1=.:z1o JOoo JOoo ooo
to
lbim"
2'42
i213
H_m
-- -'
too.o ~-S
217 100.0 ~-5
Fig. 4.19 seleccin de una turbina Francis Lenta. Mtodo 3.
j ArdWo ClcUo Yer Horrorriertos __ _
~ ~ ~-~~~O Pelan gFr.- +Kopi,n f..d... "'.. _,. &'rlhlY-OT"'JJ --

_ DIMENSIONAMIENTO DE TURBINA FRANCIS ___ _
.,
At..__=.- too.o vd.-~.-ro.o c.f.-.L;t.' ~c--Fr.~ -@D
1
--'J
Coudol 2.s1 Ef. Frands so.o 1c. Fr. Normal ~c. Fr. E.~ 0 1
T<ri>no
FL.om
-:_ Sele<donodo
~
~:::.~~~~;:=======:0:0,~"~:=========:===========::1
FExftiPda fJIJO
E::-~Fnnci:=:=,,-_,-"'=----E2S3::;''c::783:------f.-------;;_j
P_FnJnciz_'W 1908,353 1
E""~-Frw>o~~~~===j"~"mii.P"j
~Fl_mm
03TaspFH_mm 1,777
D3TaspFR_mm 466,51'9
D3TupFER_mm 379,206
Drod_D1FL_mm
Drod_D1FN_mm
ii0C(01FR_mm
rf~244 1 A.ocesar 11 '"'"'ro,.;.._; 0~_-;c~--1

1! l ver oor c.n- vjjFrond<terto l"ll Elirmar )
.
~-- ~ ~
102,338
102,338
17,126
17,128
,__
...,_. 102,338
102,338
lNo
17,126
17,126
-
lollOD -
lollOD
IOIJOD
1
~------------~--~----~~~~~~--~------------------~
ltem H_m
~~~~~~~-2~~~~~i
10 ~-0
212 100.0 2.3
213 100.0 .3
100.0 .S
215 100.0 .s
216 100.0 .S
247
'"" -- - ..
100.0
,,.,_
Fig. 4.20 seleccin de una turbina Francis Lenta. Mtodo 4.

En la evaluacin de la seleccin de las turbinas y clculo de las dimensio-
nes principales, se han utilizado dos mtodos: el tradicional y la utilizacin del
MERNA que utiliza cuatro mtodos para la seleccin y dos mtodos para el clcu-
lo de sus dimensiones principales.
1. El sistema desarrollado est especialmente dirigido a resolver el problema de

la seleccin de turbinas hidrulicas, en aquellos casos en que no se encuen-
tre el experto o de simplificar los pasos previos de clculos para la seleccin
de estas turbinas hidrulicas. La experiencia demuestra que sta suele' set t:l'
situacin ms recomendable en los casos reales de seleccin de turbinas
hidrulicas para diferentes casos complejos.
2. Se presenta una alternativa viable para la generacin de energa elctrica en

base a fuentes renovables de energa en nuestro ,:pas, en especifico se ana-
,liz las mini ntrales.
3. Se presenta una metodologa general para la seleccin y diseo de las di-

mensiones principales de una turbina .P.i'at.ma mini-hidrulica, tomando como
base estudios previos realizados, teni~.hdo como variables de entrada el cau-
dal y la altura.
152
4. La investigacin y la dificultad en la recopilacin en archivos del nmero sufi-

ciente de proyectos reales, para abastecer al MERNA una base de datos fia-
ble (almacenada en formato Excel), amplia y homognea; esta base de datos
permitir al MERNA realizar estimaciones ajustadas y disponer de informacin
real acerca de la seleccin de turbinas y diseo de estas.
5. El entrenamiento del MERNA se realiz en el sistema de principiante y el sis-

tema avanzado. En el sistema avanzado, la red backpropagation genera un
archivo en e que ocupa 180kb, la red GRNN genera un archivo en e que
ocupa 1.9 MB, este archivo no es posible compilarlos directamente sin suce-
sivas divisiones del cdigo fuente.
6. Al ingresar los datos de H =20 m, Q =2 m 3/seg, Vr =720 rpm y eficiencia de

la turbina 11 =80%; el programa MERNA selecciona Turbina Francis Rpida,
como se observan en las figuras 5.1, 5.2, 5.3 y 5.4.
n TfSIS ll[ MAC.ISHR v.8 e~~~
D Sclcrdon de turhmas ~e'~

- -------
Fig. 5.1 Seleccin de una turbina Francis Rpida. Mtodo 1.

153
~nr.n, .:Lt3t:i
DIMENSIONAMIENTO DE TURBINA FRANCIS .02 ,,.
~--
.~. ~Yei.Rot. no.o c.Fr.lert.. ~c. Fr.!Upklo ~ 1

CbJdol 2.0 Ef. Frands 80.0 C. Fr. Normol 6.0 C. Fr. E. R;do 25.0
1
~1 V/.~ ! [
.~~"'/ ~-l;::-'
~: 1fl1
Tlrili>o Ytlor Selecdonodo f
FL.em
....
m
,
.
~
......
,'"""""' "'
IN
.,........
P_fnlnois_~
....
Op!JIJ
21..,..
S
,,
1:
1-
i
P_~-kW 00!1,320 ..l 1
aHi)-- -~~~~-:l
Ns_Fnnois ,.,,312
-
D3Taspfl_mm
D3TupFN_mm
03TaspFR_mm
.......
~321
1,903
S ~ o..-;t-
03"1'aspFER_mm
Dfod 01FL_mm
f!07,178
!537,'718
IN
IN -: l!l_"'f/-.1.
: ~---.-
---
/7 "j~-
Drod_D1FN_mm 1'86,881 IN
Drod_OtFR_mm J08,576 S

-
'nom !1042
lveroorc.rmos
1 Procesar 11 ~- 1o """'-2
l~ands lerta
erados
vlf '=11 ~1
o,
o,-- ,;;
TAllA CCM>ARATIYA I'ERNA TAllA COI'PARATIYA O TAllA COMPARATIVA Bo
p~
21,()53
21,()53
, Pkw
]300,323
J305,323
Ns
l34s.312
. J349,312
_.
......,_3
Mtodo Pf1>
I421P44
421,()51
. Pkw
1305::..0
1300,322
Ns
l34s.312
1349,310
vl1>
]o,(l02
IOIDl
%Pkw
lopo1
0,000
-
]o m
j01J01
~
!tem H.JI1 QJn3s
1041 20.0 .o
1042 1.0 Ul
1043 20.0 .o
10 20.0 .o
l1l<
., Jl
F1g. 5.2 Selecc1on de una turbma Franc1s Rap1da. Metodo 3

. . ,
.n
. ,
: ArdWo aloJo Yer HerrMlientas
le~> Q_~~
DIMENSIONAMIENTO DE TURBINA FRANCIS o. ,.
~vet.Rot. c.Fr:~. ~C.Fr.R/opldo ~
Aluro
c.udal 2.0
Tlrili>o
Ef. Frands 80.0
no.o
Vtlor
c. Fr. Normol C. Fr. E. R;do 25.0
J - .w~
1
e
......
,,,.,._
Selecdonodo
! 1
:-t .....
m IN ~ ---A..-_
i
,...... ,618 N
~ o,a
FExbpldll
P_Fnlnols_.f-4)
....
0,(0)
1,D44
S
, ~~~~~-/;~
0
1
1~ / ~- -".t:;';"'~
1- :
..l
P_fnlnoJs_kW ~,320 i
~~-~i=fSl-:l
Ns_Frwlols 1'49,312
:
-
D3T'UpFl_mm
03TaspFN_mm .......
fl01,903
;
D3TUpFR_mm ~321 S
- ,M ~---.-
~ 4.--lt-
n
D3TUpFER_mm f!07,178 IN
Drod_01Fl_mm !537,718
.. - .
Drod_DtFN_mm 1'86,881
"'
11<
+-~-
Drod_Dt FR_mm ~.:576 S ;t:
,ene.;, l042-1 Procesar )( ~.lo~~
~1 -
0Todos
lveroorc.rmos iiFCands lerta v 11 o,
J. ,z.. -'-
o,--
. "
TABLA COJ'II'ARATIVA ft'ERNA TABlA COMPARATIYA O TAfiA COfi'FARAnYA Bo
D3tasp D2rod 01rod Mtodo D3tasp Drod ' D2rod 'Yo03tosp 'Yo02rod %01rod
S<l9,331
S09,331
!tem
(409,576
408,576
408,576
408,576
-
-3
H.JI1
lros.321
"""'""'
408,576
408)175
14os,432
408,471
' QJn3s
(o,(l02
10,000
0,000
0,000
lo,ro5
10,()26
,,..-.
1041 20.0 .o
042 Ul
1043 20.0 .o
111 20.0 .o IV'
.n
""'
Fig. 5.3 Seleccin de una turbina Francis Rpida. Mtodo 4.
154
n TESIS f)f t.IAC.ISTER v.8 ~~CXJ

Archivo ~ Ver Herramientas
j ~ v..- 1 ~ 5elocdon Petan 9 Ffords + KllPor> ~ M<toel ~ Htce & TL~xl r._
DIMENSIONAMIENTO DE TURBINA FRANCIS .....

Alu-a ~Vei.Rot. r20.0 IC.Ff.Lerta ~c. Ff.Rpda ~ 1 1
Caudol ~ Ef. Frords 80.0 C. Ff. Normal ~C. Ff. E. Rjda 0 e
r..- Vlkx
-."""""'
Seleccionado
........ poo
E::::-:=o:------E;=-------f.------l~
.......... ,818
"""
""
P_Francls_llp ~1P4'
flS5
P_Franofs_lcW ~,320
Ns_Frtlnoi. 1>'9,312
~~=---~~----r.----~'
OOTaspFL_mm
D3TaspFN_mm 124,000
""',803
03'1"MpFR_mm
D3TaspFER_mm ~.178
Dtod_01FL_mm 1'37.716
Drod_01FN_mm i'OO.SS1
Drod_01FR_mm
. n0m f!CKZ 1 Procesar

Jvoroorcarroos
11 !\geg!t 1 0 .,;......,2
l"llFforcislerta
0 Todos
l"il ~1 -
IJ _,. _ J_ ,._
TABLA COI'PARATIVA f'ERNA 1TABLA COf'PARATIVAOj TAllA COI'PARATIVA 110 f
80 Na
13,011
- 13,011
13,011 10.000 10.000
1,_~em.,-.1 ----------,==H~:-m----------.,.~?m3s=----------, . . .
O<Z 1.8 .O
11>43 .o .o
104< .o .o
~ n
Fig. C.4 Seleccin de una turbina Francis Rpida. Mtodo 4.
Tabla 5.1 Seleccin: Comparacin de resultados.

METODO
MERNA
Variable Tradicional
Mtodo 1 Mtodo 2 Mtodo 3 Mtodo 4
Php 421.053 421.044 421.063 421.044 421.051

Pkw 305.323 305.320 305.327 305.320 305.322
Ns 349.312 349.317 349.316 349.312 349.310
Tabla 5.2 Desviacin de los resultados.

DESVIACION (%)
Variable (M1) Tradicional (M2) Tradicional (M3) Tradicional (M4) tradicional
Php 0.002 0.002 0.002 0.000
Pkw 0.001 0.001 0.001 0.000
Ns 0.002 0.002 0.000 0.001
En la tabla 5.1 mostramos una comparacin en los resultados obtenidos

por el mtodo tradicional y por el mtodo MERNA- (mtodos 1,2 y 3,4) y en la Ta-
bla 5.2 la desviacin en los resultados que se presentan.
155
En la tabla 5.1 observamos que en el clculo del nmero especfico de
revoluciones (Ns), los cuatros mtodos dan valores i.guales al mtodo tradicional,
tanto en seleccin como en el dimensionamiento de la turbina Francis, las desvia-
ciones se observan en .la Tabla 5.2.
En la Potencia en HP y en kW los cuatro mtodos realizados, tanto en
seleccin como en el dimensionamiento de la turbina Francis, las desviaciones
son del 0.001%.
En la tabla 5.3 mostramos una comparacin en los resultados en las di-
mensiones obtenidos por el mtodo tradicional y por el mtodo MERNA (mtodos
3 y4) y en la Tabla 5.41a desviacin en los resultados que se presentan.
Tabla 5.3 Comparacin de resultados.

Francis Rpida
MERNA
Mtodo 3 Mtodo4
D3tasp 609.331 609.321 609.334
D1rod 408.576 408.576 408.575
D2cor 665.839 665.822 665.844

DESVIACION (%)
Variable Mtodo 3 Tradicional Mtodo 4 tradicional
D3tasp 0.002 0.000
D1rod 0.000 0.010
D2cor 0.001 0.010
7. Al ingresar los datos de H =200 m, Q =1 m 3/seg, Vr =1200 rpm y eficiencia

de la turbina 11 = 70%; el programa MERNA selecciona Turbina Pelton 4ch,
como se observan en las figuras 5.5, 5.6, 5.7 y 5.8.

156
'!'] HSIS 0[ MAGISHR v.O C o ')('
rJ Selcccion de 1ur bmas r .. - r6"- X

-- ---
PI"C> Pl<w Ns
1842,105 133!:\i,799 ,239
1842,105 1335,788 ,239
ltem
128
127
126
25
124
123
122
~~-----------------------------t~:~~----------------------------~:~------------------------------1c
121
.Y
Fig. 5.5 Seleccin de una turbina Pelton 4ch. Mtodo 1.

r1. HSIS 0[ MAGISHR v. 8 '""": r~ ')(,
,--- r=-"~
I'J Pcllon .=..._ e ~-

> Ns..J'et<>n_ICh 68,118

> Ns..J'et<>n_Ch 48,"421
,.
>
AnchoJ>J>Ich 548450
> Alo_h_Pich 511,686
> Espesor_t_Pich 219j380
> Ancho_b_P2ch 3871812
> Altojl_P2ch 361,958
,. . Espesor_t_P2ch 155,125
ltem E}! ..__ 1o-2 ~T.... 1 - 11 u...,...

lv.rporc._, HPotonlch HCuchoro<don Hl e'"'""'
1 Pi"C> Pl<w Ns - Php

1fU2,10S 1335,788 .239 MQtodo 3 18t2,1S2 0,000
1842,105 133S,788 ,239 Mtlf:odo' 1842,132 0,000
124 1.0
25 1.11
126 .o 1.0
127 .o 1.2

157
OnsiSillMAGI\IlR vO -=-5-::.~
1l Pellon ,...._-~X
> Ns...Pelal_ICh
> Ns_Pel<ln_2Ch 48,121
>
_> Ancho_b__Plch 518,450
> Alto)l__Plch 511,886
> Esposor_t__Plch 219,380
> Ancho_b_P2ch 387,812
C2:J Alto_h__P2ch 361,958
Esposar _t__P2ch 155, 125
ltem :JI - - 1o Pooeso2 ~ Tos 1- 11 u ........

jv...,..c...,. Hll'eton1ch __ HCuch.Yopeloo ... e;m1-
743,191
743,191 -
- 0,000
0.000
LO
1.0
LO
.o 1.2

O 11\l~lll 1.\A(ol\llll vll ~~')(
> Ns_Peton.)Ch 48,421

>
> Ancho_b__Pich 518,450
> Alto)l__P1ch 511,886
> Esposor_t__P1ch 219,380
> Ancho_b__P2ch 387,812
> Alto)l__P2ch 361,958
> Esposar _t_P2ch 155,125
Jtem :::]1- 1O Poooso2 ~ r-. 1 ..,._ 11
109,690
109,690
Zc
16,901
16,981 --
' Mtodo
,913
,913
109,690
109,690
2c
16.001
16,981
Q_m3JOO
124 LO ~.:
25 .e
126 .o 1.0
127 .o 1.2

158
por el mtodo tradicional y por el mtodo MERNA (mtodos 1,2 y 3,4) y en la Ta-
bla 5.6 la desviacin en los resultados que se presentan.
METO DO
MERNA
Tradicional
Variable Mtodo1 Mtodo 2 Mtodo 3 Mtodo4
Php 1842.105 1841.905 1842.409 1842.105 1842.105
Pkw 1335.788 1335.712 1335.904 1335.788 1335.788
Ns 34.239 34.239 34.239 34.239 34.239
Tabla 5.6 Desviacin de ,los resultados.
DESVIACION (%)
M1 Tradicio- M2 Tradicio M3 Tradicio M4- Tradicio
Variable
nal nal nal nal
Php 0.011 0.017 0.003 0.001
Pkw 0.006 0.009 0.002 0.001
Ns 0.000 0.000 0.000 0.000
En la tabla 5.6 observamos la desviacin de los resultados, en el clculo
del nmero especfico de revoluciones (Ns), los cuatro mtodos dan los mismos
resultados que el mtodo tradicional, cuyas desviaciones son del 0.000%. En la
Potencia en HP y en kW los mtodos 3 y 4 del dimensionamiento de la turbina
Pelton 4ch tienen una desviacin del 0.003% y 0.001% respectivamente.
En la tabla 5.7 mostramos una comparacin de los resultados en las di-
3 y 4) y en la Tabla 5.8 la desviacin de los resultados que se presentan, obser-
vamos que los mtodo 3 y 4 se obtienen las mismas desviaciones.

159

Pelton 4ch
MERNA
Mtodo 3 Mtodo4
Dch 73.127 73.127 73.127
Dr 436.059 436.049 436.047
De 743.181 743.181 743.178

Pelton 4ch
DESVIACION (%)
Oeh 0.000 0.000
Dr 0.000 0.000
De 0.000 0.000
8. Al ingresar los datos de H =100m, Q = 0.5 m 3/seg, Vr = 1800 rpm y eficien-

cia de la turbina q = 80%; el programa MERNA selecciona Turbina Francis
.-Normal, como se observan en las figuras 5.9, 5.10, 5.11 y 5.12.
[! HSIS ll[ /.\AGISHR v.6 11:" r'f!8J
rJSeh~cc:Jondeturhlnns ~~~
Ns
130.000
130.000
-
....._,
Mel-2
H_m
100.0
100.0
1011.0
100.0
100.0
..
.3
100.0 .15
100.0 .15
100.0 .15
DO. .1
Fig. 5.9 seleccin de una turbina Francis Normal. Mtodo 1.

160
[l! TfSIS lll t.IAGISHR v.8 ~~~
rJ ianm
- -
-:--"'e IX
Abolloo.o lvel.Rot.
C<Miol 0.5
11eoo.olc.Fr.L<roto
Ef. Fronds 80.0 C. Fr. Nonnol
~c. Fr.RApido
~C. Fr. E. Rpido
~
0
J
Volor
b:~:;~~=~~.~.---------~~1------------f.N~------------4 1
r.~~kwd~~.~-~~-------E~~.~~----------~-------------11
P_franols_kW 381,.857
03'T'MpFL_mm ZS8,141
03TBspFH_mm
03TUpFR_mm ~,742
03TupFER_mm 169,687
[)rod_01Fl_mm ~1.299
Drod_D1 FN_mm
: -----~~-~~-~--~-~--0-l _ ,- - - -
Pi-o>
026,316
224
Plw
1381,so&
Ns
130,0SS
-
TAllA COI'PARATIVA OERNAJI TAllA COI'PARATIVA D TAII.ACOI'PARATIVA Bo
...,_.
-3
H.Jil
100.0
Pi-o>
!=.:m
52S,333
p., Ns
130,000
' QJn3s
.3
0,001
O,oo2
1
225 100.0 .4
226 100.0 .S
227 !00.0 .6
228 !00.0 .7
229 100.0 .9
230 100.0 1.0
~
Fig. 5.10 Dimensiones de una turbina Francis Normal. Mtodo 3.
rJ TfSJS llf t.IA.JSifR V 8 ~_:!''::::: ~

: Arctwo CSoJo Ver Herramientas
l21oncis ~~~-
Alu-o
.C<Miol 0.5
1100.0 1Vel. Rot.
Ef. Fronds 80.0
11800.01 C. Fr.~. ~C.
C. Fr. Nonnol
Fr. Roldo
~C. Fr. E. Roldo
~
0
1 D~
Volor
,......
Tlri*lo
,000
"
~==~~----
'"""""'
::.::;::::-:::----------f~------------f.:~------------4:
FRllpichl
FEx~ct.
~~~~------~~~--------~------------~
,000
,001
!
1
P_Fn!nols_tp
""'~
~~~~-------f~~----------~-------------1 '
P_Fntnois_I(W 381,607
30,000
e::-::::::::=:=---------1:~::7-----------+."~------------4"'
Ns_Fnlnols
03TftspFL_mm 268,141
D31'HpFN_mm
D3TaspFR_mm 203,742
D3TaspFER_mm 169,687
Orod_01FL_mm 301,299
Orod_D1FN_mm
Dtod_D1FR_mm 228,939 l o_,
------- -----------------------------
TAllA COI'PARATIVA OERNAII TAllA COI'PARATIVA Di! TAllA COI'PARATIVA Bol
i D3tas) ' D2rod Dlrod - D:ltosp %Dirod

272,255 lo.ooo jo,ooo lo.ooo
10.000 10.000
ltem H.Jil
224
225
226
100.0
100.0
!00.0
..
.3
.S
227 100.0 .6
228 !00.0 .7
229 100.0 .9
230 100.0 1.0
= ~-
Fig.S.ll Dimensiones de una turbina Francis Normal. Mtodo 4.

161

~.,loo.o lvei.Rot.-um.o,c.Fr.t.erl. ~c. Fr. Rpida ~ -~
Coudol 0.5 Ef. Fronds 80.0 C. Fr. Normol ~C. Fr. E. R6pdo ]
N _.
~==~~==~====~ N
r.::=::::::;:=.:::-----E'=:-------E--------i' 1
"'
S
~iii.nlm 1 Proces!r H Aom" fo~2- 0r-. ~~

(vorOOtc:a-s \vllFron:islerlta vj( Ein*>or 1
-
TA81.A COI'I'ARAllVA f'ERNA 1TA81.A COI'I'ARAllVA O11 TIIA CoWARATivA Bo
-
80 Na Mtodo 80 Na
143,119
3,119
nom
22<1
16,808
16,989
-
-3
H_m
100.0
f43,119
143,119
16,989
10,989
Q_m3s
.3
om
om
225
126
100.0
100.0 "
5
?Z1 100.0 .6
2Z8 100.0 .7
229 100.0 .9
230 100.0 1.0
Fig. 5.12 Dimensiones de una turbina Francis Normal. Mtodo 4.

por el mtodo tradicional y por el mtodo MERNA (mtodos 1 ,2 y 3,4) y en la ta-
bla 5.1 O la desviacin que se presentan en los resultados obtenidos.
MTODO
MERNA
Tradicional
Variable Mtodo1 Mtodo2 Mtodo 3 Mtodo 4
Php 526.316 526.333 526.164 526.324 526.333
Pkw 381.654 381.660 381.596 381.657 381.660
Ns 130.586 130.586 130.586 130.586 130.586
Tabla 5.1 O Desviacin de los resultados
Francis Normal
DESVIACIN (%)
Variable M1 Tradicional M2 Tradicional M3 Tradicional M4 Tradicional
Php 0.003 0.029 0.002 0.000
Pkw 0.002 0.015 0.001 0.002
Ns 0.000 0.000 0.000 0.000
162
revoluciones (Ns), los cuatro mtodos dan el mismo valor que el valor calculado
en el mtodo tradicional, sus desviaciones son del 0.000%. En la Tabla 5.10 la
Potencia en HP y en kW los mtodos 3 y 4 tiene una desviacin del 0.002% y
0.001% respectivamente.
En la tabla 5.11 mostramos una comparacin en los resultados de las di-
3 y 4) y en la Tabla 5.12 la desviacin en los resultados que se presentan; asi-
mismo observamos que con el mtodo 3 se obtienen las desviaciones ms bajas.
Francis Normal
MERNA
Mtodo 3 Mtodo4
DJtasp 242.292 242.292 242.293
Drod 272.254 272.255 272.254
D2cor 244.623 244.623 244.624
Francis Normal
DESVIACIN (%)
Variable Mtodo 3- Tradicional Mtodo 4 - tradicional
D3tasp 0.000 0.000
Oroe~ 0.000 0.000
D2cor 0.000 0.000
9. Al ingresar los datos de H =50 m, Q = 0.2 m 3/seg, Vr = 1200 rpm y eficiencia
de la turbina 11 = 65%; el programa 'MERNA selecciona Turbina Michell, co-

mo se observan en las figuras 5.13, 5.14, 5.15 y 5.16.
163
Ardivo C8co Ver Herr-os

r~ ;~--;-~ Solee~0 Pelon g~;.~ + Ka!m ~-.el "\)' Hlce f> Tlb.Wo T;.--
. jj;,!.IUJ1ll,

[MUra ~ VeL G... ~i: Fr;n~I~]Bo.OlEtH;"I~e65.0"1r: ;:;;~-;; ~ ~
'Caudal~r. PeHon~Er. Kaplan-;i.Oler.Michel~l. Tubular~
'""""' . -~ . ...; . .. - Selecdonodo - . 1
9,103
........ m
---"' ~.10!1
P_Kaplan_hp 118..21
_ ..oMI_~
t....... kW
......
12p11
122,388
.s
111
1 - . I0Poooso2 0.- 1- 11
1-PI-c>-----Pkw------Ns--------- - ---;.., Pb.

Blmna-
TAaACOWAAAnYAMERNA
Ns
1
/Michel (v]
----.,.,-,-...,-----.,.,-.,..kw-----...,..------,l
----
.. :=----..,=-=-=,::-.---....=:,...:::----r:-...,.-,-,,..---=ao,;->s-C----162.:;~.1l":1::9---r.::..:":,...::::----.,_lo-::m~---j"T:oo:-i:,Doo~'----.o::'m~----,,,
=::-:....
80,526 G21J19 83,409 Matado 2 190,526 1621l19 83,469 !OPD1 om om
i~~~---------------------~~;.~~m-------------------------~~~~~~~----------------------,A
~4~~---------------------~~~~---------------------f.o~.3-------------------~-- .
~ ~ 2
't90 :;n.o ""'
;ea so.o 0.2
~ so.o .2
86 so.o .2
.o
Fig. 5.13 Seleccin de una turbina Michell. Mtodo 1.
Ardivo C8aJo ... Herranlertos
: -
#Jl!U:!llirl>i~llifli!lll .~1~~
-- -
DIMENSIONAMIENTO DE TURBINA MICHELL - . 1
Alu-o JYei.Rllt.
Coudol [O Ef. Michel
j1200.ol Csal. <1>
01>krf.o
~- e1 Jm. 63 !::
IY-62 ~-Oext iJ
..
1
.0 1
1
~
B
""' de TUII*lll Re!Uiado n>Gdel- Resllltado 1
[~]r.n_.JTI11_60 ~ 1
EEr; 10,(0)
~fdl_OJTI11_90
31,461
ex,
..
112
' '
1L >
o>
> p)'lcholl_l-c>
P_folchel_kW
85,52<>
)62,019 L > jrdl OJTI1l_l20
47,181
62,=
~--
'
i
EE~JTI!l--_60
NsJ4chel 83,468 213,622 1
~
1
1[ Od-o-TOJTI!l 192,53-1 ..P.JTfllJ:eto_'lO 142,414
1
IL > D2_Rd.JTfll 1218,1125 _8JTI1l_lota_l20 106,811
1L > L > JNo!abes_z
-
Dl.ftdJTIIl f143,896 22,360
1
..
1 ID- 0--1 ....... 11 Umpia

!l
llem 190
v_; '
learoos !"] ;;e 1 Biminl!lr' .. --- 1
1
r-c..,_ottvoMemo T-(..,_otlvo pot Dtnenslon 1T - (..,_otlvo pot An<h Rod
Pilo Pkw Ns ' Mtodo Pilo Pkw Ns %Pilo %Pkw %Ns
......
8!1,526
Rem
486
1621ll9
S2,019
ro,...
sa,...
-
l-3
H_m
SO:o-
J8!1,026
_1!15;20
~P19
JG2p19
183,468
_lll3,4Ge
~m3s
.2
jom
om
jom
0,000
jom
om
"
1
'
.2
~-
487
488 ~.0 .2
489 ~-0 .2
~90 oo.o 2
491 ~.o .2
192 ~.0 .3
493 ~.0 .3
494 .3
~- .3
495
. ~- . '"
Fig. 5.14 Dimensiones de una turbma Michell. Mtodo 2 .
164

Atura IJvei.Rot. l1200.0lCsoi-'" ~-61 ~-63
0- 62 ~- 0ext 1".:
--
:]El. Mchel !] flirr.o
- --
ulol
ll>odeT,_ TIPOdeTurtina
10,000 > J Edl_a_nm_60 31,461
~
> P_McheljJ 85,526 > JEch_a_nm_90 17,161
> pJ'Ochel_kW 162,019 > JE<h_a_nm_l20 62,922
> ~"'~- 83,466 > 'Arod_6_nm_tota_60 213,622
Jlrrl 192,531 > ,'Arod.JIJ~rr>_teta 90 142,414
> JI02_Rd_nm 1216,025 > Arod.JI_nm_tota_l20 106,911
> JlDI_RdJirrl 1143,696 > Nalabes..J 22,360
Jtem 1190 n ,_ !D"'oooso2 0r-. [ ......,.. 1: u...,.. 11

ICMoos ., IMichel )~ ! a'"'""' 1_
oc--:oOchorro-=--~-~c-02:-:'0:_R,.,.d_ _-r.;;.~~..::-!,...;d---,-'II.Ochorro=;;c.;.--,, -%02

: Ochorro , 02..Rd
'i2,5:..-~ ~j21B,Q25
OI_Rd
143,... -3
Mtodo
("2,53-t 218,Q25 1 ~~ (o,ooo 0 000
~..Rd==. ____ ,:::c,_:',:;:::::I..Rd~--u
__ _IO,l-
S2,G34 l219,o2G 143,99G ....odo 4 (92,534 210P26 143,G9G 0,000 0,000 ,000
ltem H_m ~~ 1
485 .o
~---------------------~~--------------------------i~:~~------------------------~~A'
487 .o
488 .o .2
489 .o .2
~90 .o .2
491 .o .2
492 50.0 .3
493 50.0 .3
494 50.0 .3
495 50.0 .3
Fig. 5.15 Dimensiones de una turbina Michell. Mtodo 3.
~~~-~ --~-~~~~~ - --- -------~~-- --~--- . ~--- ------

q.. Selecdon G Petan @ Francls +KoPon {.) ltiel "\."' tt!lce ~ TtbJar Q TU"QO
.. - ----
('.. .q. YOfslool
lilliJn)W.oOjJ,[J .. ..
oa.~:~~
DIMENSIONAMIENTO DE TURBINA MICHELL "" -

1
~
Atura r l1200.o1Cso1 ... ~-61 ~-63 : ij
#:}
lso.o . Vd. Rot.
1
- --
ulol :]El.- [] flirr. o D.m. ez J:oel Oext j 1
-~
,._,o de Turbln8 ,._,. de Turlllnl B
rH~_;p
lO,IlXI L > JlE<h OJ!rr1_60 31,461 f- 112 1
i1
~
C2:] Edl_OJ!rn 90 47,181
.. \Q
85,526
> JPJ'Ochel_kW j62,019 > Edl_l!i.}TI'n_l20 62,922 '1. 1
> 1Ns_Mdlel 83,466 > Arod_B nm_teta_60 213,622 1
~
> fiOchorro_nrn J92,531 > Arod.J1Jirrl_teta_90 112,414 1 !
> J02..RdJirrl 1218,025 > Arod_BJ!rn_tota_l20 106,811
!
> JiOI.}td_nrn 1143,696 C2:)No1abes..J 22,360 1
-
ltem 1490 1 " ' - !O"'oooso2 0r-. 1 ..,_ ll Urrpia !
ICMoos vi !Michel 1": 1 Blninw : - -- --- ... ----
i
Tebla~atlvaMemal Tebla~atlvapor~j T""'~atlvapor Anc!lRod
Na ~
B60 890 , B120 -860- 890 8120 Na %1160 %890
-1
-
-~ lii"..ro ----...,_ 3 "io-:xn
%8120 pp;o--
-
l213.s2i---2',4
,213,622 142,414 106,811 122,360
- .j213,S22
J213,604
142,414
142,408
106.011
106,807
j2z,360
J22,360 .....
fo:xxJ to.ooo
IO,DD5 O,D03
-~
:xxJ
ltem H.Jil :~~
486 ~-0 .2 A
487 ~-0 .2
486 ~-0 .2
489 50.0 .2
~90 .2
491
492
""""
~-0
so-o
.2
.3
493 so-o .3
494 ~-0 .3
495 50.0 .3 .,
.
Fig. 5.16 Dimensiones de una turbina Michell. Mtodo 4
165
por el mtodo tradicional y por el mtodo MERNA (mtodos 1,2 y 3,4) y la desvia-
cin en los resultados que se presentan.
METO DO
MERNA
Tradicional
Variable Mtodo 1 Mtodo 2 Mtodo 3 Mtodo4
Php 85.526 85.526 85.526 85.526 85.526
Pkw 62.019 62.019 62.019 62.019 62.019
Ns 83.468 83.468 83.468 83.468 83.468
Tabla 5.14 Desviacin de los resultados
Michell
DESVIACION (%)
Variable M1 Tradicional M2 Tradicional M3 Tradicional M4 tradicional
Php 0.000 0.000 0.000 0.000
Pkw 0.000 0.000 0.000 0.000
Ns 0.000 0.000 0.000 0.000
En las tablas 5.13 y 5.14 observamos que en el clculo del nmero es-
pecfico de revoluciones (Ns), los cuatro mtodos dan el mismo valor que el calcu-
lado por el mtodo tradicional, sus desviaciones son del 0.000%. En la Potencia
en HP y en kW los cuatro mtodos dan el mismo resultado al valor calculado por
el mtodo tradicional, sus desviaciones son del 0.000%.
En la tabla 5.15 mostramos una comparacin de los resultados de las di-
3 y 4) y en la Tabla 5.16 la desviacin en los resultados que se presentan; obser-
vamos que las desviaciones son del 0.000%.

166
Michell
MERNA
Mtodo 3 Mtodo 4
Ochorro 92.534 92.534 92.534
D2Rd 218.025 218.025 218.025
D1Rd 143.896 143.896 143.896
Michell
DESVIACIN (%)
Ochorro 0.000 0.000
D2Rd 0.000 0.000
D1Rd 0.000 0.000
1O. Al ingresar los datos de H =8 m, Q =4.0 m /seg, Vr =600 rpm y eficiencia

3
de la turbina 11 =85%; el programa MERNA selecciona Turbina Hlice, como

se observan en las figuras 5;17, 5.18, 5.19 y 5.20.
Ard1lvo CScUo Y Herr.....-.tos
: '-" Yersbl 1 <"? 5elecdon O P<ton l/e) Fr..-.cis +KaPon ('1 l'lchel iJ" tt!lce & TtbJor Q r_,

1Altura~l8.0Tv;;;. o~~ J6iiQ.O!Ei. Fmncis!i.Ql Ei Helice~iT~rgo~= ~
1 caudal~!. PeHon~Ef. Kaplan~Ef. Michel~f. Tubular m

~~-~---.~~--- -- ~ --- ~ '
Joe ID~ !~
~-
UbiJ ~~-------~--------~
,OfXI
_Petton_kW 13,726
_frwlcis_kW 244,259
:::::::: :: 1
Umoiw .J
91mlnw J
~---- ----~------- -~:-"'---- ~ ---------,.:~~--------- --~A

1369 .o .o
1368 .o .o
1367 .o . o
1366 .o
1365 .o .o
13M .o .o
1363
Fig. 5.17 Seleccin de una turbina Hlice. Mtodo 1.

167
j\ jverpor~ jVj ;~.. jHlce~- ~~~~ Blm,_ )

~: . .;_f - ~ ..- L ~

. -.-
Toblo
P_l-c>
~'
1
roo!
P'!l> fpk,;,
'1259.521-
1259.520
.-Ns
ISU,878
lee3.672
QJn3s
,~
10,002
10.001
~
10.001
lo.ooo
-
10.002
lo.D02
H_m_, - .&0. ~ -"

1'361 13.0 r...-J
1'362 li.o
f8,0 1'1.0
365
'367
1'368
1'369 B.O rs.o
1370 B.O ;.o
Fig. 5.18 Seleccin de una turbina Hlice. Mtodo 3.
fl Turb!na UJtce ~~&1

w~oiMe'Nsot4PinEN'To rusiN'A lfLci:"-~~O- - oe 0
1
)!rR
-- :
:1
!Alur ~v~.R. ~~- ~
--
,,
;Clludal 4.0 Ef.Hlco 85.0 .o 55.0

1 H
. S 1
-~TOO*Io
TJPGdeT..-
~r~
--
~ )Pjlelco_kW
>
>
>
>
. >
Drod_D2_mm
DoAxU>n_mm
Dmod,.P!_mm
N_jllab_Z
0+4J495
312,097
578,294
'1,630

r 1
~
1'
1
1
~
.cr .
1
1
1
1
> 'n.m m""' )86!,7.JJ l > "'Bo_mm 311,602 "J'f'

l~r--,~~ ~~:;o-/,-::
~---~--'- ~-~--~-=- ~
\V.
nom 1'366 1 - o - 2 ~Todos -11 u ......
1-por~ H Rgwas IHlce ...JI Si minar 1

"/~~ ~
1~%
. - - -- --- - ---- - --- -. --
--
i Tobla ~atlva _,., Tobla ~atlva por Dmenskln Tobla ~atlva por 110
. Ocho_OO 1 Orod_D2 1 Dobo_Dn 1 Dmod_D! ; Mtodo Ocho_OO 1 Orod_02 1 Dobo Dn ' Dmod DI 'II.O<ho_OO f %Drod~D2 'Y.Oabo_Dn 1 %Dmed_O!
-fiii,..,., ')312,D97=~
su,..O
-
-3 lo.oo l,ooo lo.(m
1
861,724 I312,D98 [578,284 as1,130 0,001
801,724 fa&- 1312::000 !=,284 loo1,730 o..,... !oz_,oo-; 510,204 lo.001 lo,001 0,000 lo,ooo
nom H_m 'Q..m3s

1'361 .o .o A
1'362 .o .o
1'363 .o 4.0
1'364 .o '1.0
1'365
306
1'367
.o
.o
.
.o
4.0
1'368 .o .o
1'369 .o .o
!370 .o .o .'v
Fig. 5.19 Dimensiones de una turbina Hlice. Mtodo 3.
168
r! liSIS ll! MAGISHR v 8 ~~~
0 Turbina Hohco r;- ~ex

DIMENSIONAMIENTO DE l\JRBINA HELICE 1
Ahr ~Ve!. Rot. ]Ef. Hd. [:]
CoOOal ~Ef.Hlce ~.a ~
TlpadeT- - TlpadeT- -liCia 1
> Orod..P2JIIIl 114'1,495
> DaixJJ)nJIIIl 312,097
> Orned.P1JIIIl 578,29i
> > Nj\lob_.Z 4,630
> romo oo ""' (861,730 1 > Ar.J!oJIIIl 311,602
ltom 11366 l "'"""""' 10Proceso2 0Tos ( ........ 11 Umpl,.. J
... !paroone.-., T-~-parBO
BO Mtodo No BO
1,630 l311.ro2
l311,1l02. ..,._._ J4,630
l311.ro2
_1311,1l02
;m
o;m
IOtm
o;m
ltern H_rn
11361_ l.O 1.0 .....
11362 8.0 ~.o
11363 8.0 ~.o

11364 8.0
11365 8.0 40
1306 o.o
1367 8.0
1368 l. O
l. O
1370 l.O 1.;;
Fig. 5.20 oro. ;6n de una turbina Hlice. Mtodo 4.
por el mtodo tradicional y por el mtodo MERNA (mtodos 1,2 y 3,4) y enlaTa-
bla 5.18 se muestran la desviacin en los resultados que se obtienen.
Hlice
MERNA
Tradicional
Variable Mtodo 1 Mtodo2 Mtodo 3 Mtodo4
Php 357.895 357.895 357.900 357.887 357.898
Pkw 259.525 259.525 259.526 259.521 259.525
Ns 843.658 843.650 843.722 843.676 843.672
revoluciones (Ns), en los cuatro mtodos se han calculado valores casi idnticos
al mtodo tradicional; y en la Tabla 5.18 las desviaciones son del 0.001% y
0.008% en los mtodos 1 y 2 (MERNA).

169
En el clculo de la Potencia en HP y en kW, los cuatro mtodos del MER-
NA dan valores casi idnticos al valor calculado por el mtodo tradicional, siendo
la desviacin del 0.001%, como se observan en las Tablas 5.17 y 5.18.
Tabla 5.18 Desviacin de los .resultados
Hlice
DESVIACIN (%)
Variable M1 Tradicional M2 Tradicional M3 Tradicional M4 tradicional
Php 0.000 0.001 0.002 0.001
Pkw 0.000 0.001 0.001 0.000
Ns 0.001 0.008 0.002 0.002

mensiones obtenidas por el mtodo tradicional y por el mtodo MERNA (mtodos
3 y 4), observamos que las dimensiones halladas por los mtodos 3 y 4, son casi
idnticas a los valores calculados por el mtodo tradicional.
Hlice
MERNA
Mtodo 3 Mtodo 4
Dchorro 861.724 861.730 861.730
Drod 844.490 844.495 844.495
Dcub 312.098 312.097 312.097
Dmec~ 578.294 578.294 578.294
En la Tabla 5.20 se muestran la desviacin de las dimensiones calculadas

de la turbina Hlice por los mtodos 3 y 4 es del 0.001%.
Hlice
DESVIACIN (%)
Dchorro 0.001 0.001
Drod 0.001 0.001
Dcub 0.000 0.000
Dmec~ 0.000 0.000
11. Al ingresar los datos de H =15 m, Q =15.0 m 3/seg, Vr =257 rpm y eficiencia
de la turbina 11 = 90%; el programa MERNA selecciona Turbina Kaplan, co-
mo se observan en las figuras 5.21, 5.22, 5.23 y 5.24.
170
J1!<l!O!llrr-.!>
-- - -- ---- - --
IOL ~- ~
SELECCION DE 1\IRBINAS PARA UNA MINICENTRAL
r:a~~:~~:~:~
Altura t5.o
Penon 7tl.O Ef. Kaplan 90.0 El. Micha~~~ Tubular~
Ve l. o ... 257.0 Francls eo.o Ef. Hellce es.o
r_ f_ Turgo 75.0 -
Caudalt5.o r_
.1 f
.r-
T..tlm YPlar Selocdonodo
..~~"""""
_
He! loe
TLtMAw
~
,000
10,000
.000
.000
.000
N
S
N
N
"'
'
1 F'l.;! 1
-~~ ~
D1
...-go .000 n.~ .

_PeftonJ>p
_Pwtton_kW
2012,224
1502,700 - ~1 )f
_Franols_hp
_frw'lds_kW
2368.207
1'717,360 N ~ ,, : "'
~ VDJ.
_K.p.-._hp 2664,170 S
1932 006
--~ kW
S
_Helloe_hp lz<1S,190 1M
_Hirlloa_kw
.........,
182.t,S8ot
"' ...--
., '
~ ~7 1
1tem uso 11 I0Pocosc2 0Todos ( 11 u~.,.
1 ---- --~ --- - - - - . -~- ----
Yor por COI11lO l" iiPeton !eh .,)Molla Hl Blmlnat 1
-~----------- ~-- ----------------

TAlLA C<M'ARATIYA MERNA lt:oo~on H ----------------
Ptc> Pkw Ns - Ptc> Pl<w Ns %P te> %1' kw %Ns
2GS<I,474
2GS<I,474
1154
1153
nom
1932,122
1932,122
1449,391
1449,391
-
...odo1
H_m
15.0
15.0
12GS<1,170
J21184,071
1932,006
1931,968 .......
449,404
~.0
(0,011
10,015
Q_m3JOQ
15.0
0,006
10.000
(O,Q03
,D02 v"'
,.
1152 15.0 15.0 _,
1151 15.0 15.0
uso 15.0 5.0
11'19 15.0 10.0
11'111 15.0 10.0
1147 15.0 10.0
s.o "'
Fig. 5.21 seleccin de una turbina Kaplan. Mtodo 1.
: - -
I!J~,J!ai Q.~~
-. --
DIMENSIONAMIENTO DE 1\IRBINA KAPLAN
rt
1
~
l
~~iE
Alao Yel. Rot. 1
257.0
EB-
Coudol 0
Tipo d e l -
p <..,Ion_"<>
[ > ]Pj(oplon_kW
-
10,(0)
Ef, Koplon
2661:.,277
J1932,809
~-
>
>
>
ropodoT-
Drod_D2_nm
Ocu_On.JMl
Ome_Ot_rrm
AnQ. o
55.0
~-
1397,'159
656,809
1027,143
~ IF'I~!
~ ~cr:;,-
Dt
1
~ '~
L > Jl"'-ao~on +49,398 > N.}Jil>J 6,523
-
[ > ]Dcho_OO_nm 11'125,976 > Arod_eo.JMl %5,290
nem luso 1
"
1 o - 2 0 r.... 1 ....... 11 U!!f!ar 1 .

HA<uros ~i
~
1ver "'" ' - " ' IMopa 1 Blrri,.- 1 1
1
-
+7 - - ---
1
-
---~-~-- ~- ----~---
1
TAllA C<M'ARATIYA MERNA TAllA C<M'ARATIYA Oim 1TAllA C<M'ARATIYA

1 eol
! p~
1!2664,474
2684,-474
ltem
Pkw
1932,122
1932,122
Ns
U9,391
U9,391 --
- H_m
Ptc>
12BSS.277
12ss4;=
Pkw
1932,1109
1931,812
Ns
1449.398
1449,398
QJn3<
V
o,oso
(O,Q03
te> %Pkw
!IJ,IXlS
(0,013
%Ns
(0,001
(O,D02
1146 15.0 .o
1147 15.0 10.0
"'
1148 15.0 10.0
1149 15.0 10.0
liSO 15.0 15.0
1151 15.0 15.0
1152 15.0 15.0 ~
1153 15.0 15.0

1154 15.0 .o
1155 15.0 .o
1156 15.0 20.0
;;,
'-"
Fig. 5.22 seleccin de una turbina Kaplan. Mtodo 3.
171
Arclm> C61ruo Ve< Herramientas

f~;~v.,...;,;-1~(j,~
:
O ,;;;, g FroncJs + Ko!Mn f) ltilel ~ H6b & Ttb..lar O Turoo
@~.m
--- --- Q,~ t3
DIMENSIONAMIENTO DE TURBINA KAPLAN '
[] 1 ff.Hd. ~
1
rt- 1
--
Alura Vol. Rot. f2S7.0
!
-
~
11 ~~~~'
Caudal !] ff.KIJ!llM ng.a
0 2
Tt>o de Turblnll Tt>o de Turblnll
> Kaplao 10,00) [_ > Orod_p2JM1 1397,i59 . el, j i 01
T f kapian 1'41 2'666,2n l > Dcuj)n_nm 656,11)9
~ ~ r-
> P_Ko!MnJ<W J1932,809 L> --
Dme 01 nm 1021,143 Dwn.
> ~Y:aolon .... 396 ITJ N.,PJlbJ. 6,523
~ A ),
> Ocha.Jl3JT111 j1i25,976 r > Arod_Bo_rrm 165)290
-~ ~e, j 02
luso 1 , _ ID-~-
~ Yo~
!l
Item
1.... por C<lrcx>s fvlfiguoas lMopa

1 'Yy
vj 1
u~
BlmiMr :
1
~ t.,
.- .. -- --- ------ - - -
TABLA COMPARATIVA f'ERNAj TABLA COMPARATIVA DOn j TABLA COMPARATIVA BOJ
' Ocha.Jl3 Orod_p2 Da.Ooj)n Dmed_D1

........
Mtodo Ocha.Jl3 Orod_D2 Do.baJ)n
,.,.,...
Dmed_D1 %Dcho_D3 %Drod_p2 %Daboj)n
~~
U2S,()4S
1426,046
Item
ll46
1397=
1397=
so&,831
JS56,831
1021,179
1027,179
- HJII
15.0
1........
1426,0SS
1397,459
1397,545
so&,909 1021,143
1027,196
QJn3s
.o
ro.oos
oxn
ro.-
10.001
ro-
10.000
ro-
10.001
A
1
ll47 15.0 10.0

'll4B 15.0 10.0
ll49 15.0 10.0
JlSI) 15.0 15.0
ll51 15.0 15.0
ll52 15.0 15.0
ll53 15.0 15.0
ll54 15.0 .o
ll55 15.0 20.0
llS6 15.0 20.0
1;;-
. . . . 2
F1g. 5.23 D1mens1ones de una turbma Kaplan. Mtodo 3

5
' Arclm> C6lruo V Herramiortas
r~ Ver-1 <? Selocdon 0~ g;~ +~-""-~

.. ~- &T~ 6~;:;;
@~.m Q.~~
----- -- -- ----
:
Alura :J Ve!. Rat. f257.0 f ff.Hid. ] 1
rt- 11
--
1
-
''
1 ~l.l-= l
. Caudal
0 ff.Ko!Mn ~ ng.a
0 !
,_
wr......,
fl>adeTUI1>Irul
10,(0) L>
1lpa de Turbina
JOrod_02_nm 1397,459 i c;'l:., J D1
ITJ~
ITJ p_l(aplanJ<W
Ko!Mn_ll' Zh66,2n u:Jocu_on-""'
[ > ]Dme..01JT111
656,809
~ ~ r-o.h
.T.4),
j1932,809 1027,143
ITJ[Ns_<aplan 4i9,398 L > JN_AiabJ, 6,523
ITJI Ocha.Jl3_nm J1425,976 ~Arod_jlaJTIIl 465,290
-~, ~Cz i 02
'
.....,_
~ Yo~
Item fusa_ 1 1o-~r- 1 !!2:~ 11 U~ar
1.... por C<lrcx>s ..

vjf9Jas 'Mapa ; 1 Si mina" IJ
1
! i
---
~- - - - -t.,- - -i -
-- - --- - ~- -
.-
f TABLA COMPARATTVA fo5lNAI TAllA COM'ARATIVA lll'n 1TAII.A COM'ARATIVA 00 1
--
1 N_Aiab_Z
ltem
1116
Arod_eO_Irm
fCB5,307
cso,307
I'W:ado
--
Mo!odo3
H_m
15.0
19-
s-
N_Alab_Z Arad_llo_nm
ol65,290
ol65,307
! Q.Jn3s
.o
%N_Alab
ro.ooo
10.000
z %Arod_Bo_mm
ro ....
JQpXl
,,."
J
ll~7 15.0 10.0

ll4B 15.0 10.0
ll49 15.0 10.0
-
ll50 15.0 5.0
ll51 15.0 15.0
ll52 15.0 15.0
ll53 15.0 15.0
ll54 15.0 !Q.O
ll55 15.0 !Q.O
llS6
.tJ51
15.0
,._, ~- ...
b

172
Kaplan
MERNA
Tradicional
Variable Mtodo 1 Mtodo 2 Mtodo 3 Mtodo4
Php 2664.474 2664.170 2664.071 2666.277 2664.382
Pkw 1932.122 1932.006 1931.968 1932.809 1931.872
Ns 449.391 449.404 449.399 449.398 449.398
Tabla 5.22 Desviacin de los resultados
Ka plan
DESVIACION (%)
Variable M1 - Tradicional M2 - Tradicional M3 Tradicional M4 - tradicional
Php 0.011 0.015 0.068 0.003
Pkw 0.006 0.008 0.036 0.013
Ns 0.003 0.002 0.001 0.002
Ka plan
MERNA
Variable Tradicional Mtodo Mtodo
3 4
Dchorro 03 1426.046 1425.976 1426.068
Drod D2 1397.525 1397.459 1397.545
Dcubo Dn 656.831 656.809 656.833
Dmed D1 1027.178 1027.143 1027.186
Kaplan
DESVIACIN (%)
Variable Mtodo 3 - Tradicional Mtodo 4 - tradicional
Dchorro 03 0.005 0.002
Drod D2 0.005 0.001
Dcubo Dn 0.003 0.000
Dmed D1 0.003 0.001

mens!pnes obtenidas por el mtodo tradicional y por el mtodo MERNA (mtodos
3 y 4). En la Tabla 5.24 se muestran la desviacin de las dimensiones calculadas
de la turbina Kaplan por los mtodos 3 y 4.
RECOMENDACIONES
1.- Incrementar la base de clculos reales, a fin de que la red neuronal realice
estimaciones ms confiables.
2.- Realizar el entrenamiento utilizando mayor nmero de neuronas, superio-

res a las 30 neuronas que se han utilizado, e incrementar el tiempo de en-
trenamiento de la red.
iur n..:n: -~o:
-':""""""'~
''"'-~
Ei]e !rafn t!eiP
Complexit}l (sets defaults): Neurons and Learning:
O Very simple @ CompleK Learning rate: lo.l _j lnputs: 112 1
O CompleK and very noisy Momentum: 10.1 1

J
Outputs: IJ.Q_J
. Set nu~b;r of Hidde~ N~u;on~ to Def~uli j
Pattern Selection:
O Rotational @ Random Hidden neurons: !Jo J
Automatically S ave Training on: Learning Time:

(hhh:mm:ss)
O best training set i:fu!.!!.I~t~!i.fl O no auto save 000:00:10
There are 239 training patlerns. There are 75 test pattems.

Learning Epocm: j980_ Calibration lnterval: l2oo 1
Last Average Error: 10.1954032 Last Average Error: 10..2770118

Min. Average Error: 10.1_ 449691 Min. Average Error: 10.2262864.
Epochs Since Min: j15 -- Events since min: 12400
IIM01e comp!eK a~chitectures. and inJCatOIS ~ possible outside the u"'!l"""" ~ System.
174
3.- El entrenamiento de la red debe seguir procesos especficos ajustados al

problema en particular, lo que incluye examinar y determinar un factor clave
como lo es la condicin de parada adecuada a cada caso.
4.- Mejorar el diseo de la red neuronal y la definicin de la topologa radica en

la habilidad que posteriormente tenga para clasificar patrones en la(s) ca-
pa(s) intermedia(s), donde reside la verdadera "cocina" donde los datos
que ingresan en la capa de entrada se relacionan entre s, de modo que las
salidas numricas resultantes en la capa de salida sean una representacin
de conocimiento adquirido por la Red Neuronal.
5.- Realizar afinamientos para que el rendimiento de la red neuronal dependa

de los datos, arquitectura y tipo de aprendizaje. Por lo que se debe des-
arrollar heursticamente el anlisis para cada una de las etapas de diseo
deJa red.
REFERENCIAS BIBLIOGRFICAS
[1] D. ACKLEY, G. HINTON, T. SEJNOWSKI. "Un algoritmo de aprendizaje

para la mquina de .Boltzmann" Cognitive Science, vol.9, pp.147-169,
1985
[2] LB. ALMEIDA. "Una regla de aprendizaje para perceptrn asincrnica

con comentarios en un ambiente de combinatoria". IEEE 1st lnt. Conf. on
Neural Networks, vol.2, pp.609-618, San Diego, CA, 1987
[3] LB. ALMEIDA. "Backpropagation en perceptrn con comentarios" Neura/

Computers (R. Eckmiller, C. von de.ar Malsburg, eds) NATO AS/ Ser., pp.
199-208, New York: Springer Verlag, 198.
[4] M. AYOUBI, R. ISERMANN. "Modelo basado en la deteccin de fallas y

diagnstico con redes neuronales y la aplicacin de un turbocompresor".
IFAC Artificial lntelligence in Real-Time Control, AIRTC'94, Valencia,
Spain, 1994
[5] A.R. BARRON. "Propiedades estadsticas de la redes neuronales artificia-

les" Proc. of the 28th Conference on Decision and Control, pp..280-285,
1989
176
[6] A.R. BARRON. "La regularizacin de la complejidad con la aplicacin de

redes neuronales artificiales" Nonparametric Functional Estimation and
Related Topics (G. Rousses, ed.), pp.561-576, 1991
[7] A.R. BARRON. "Las Redes Neuronales" Proc. of the Seventh Ya/e Work-
shop on Adaptive and Leaming Systems, pp. 69-72. New Haven, CT: Ya/e
University, 1992.
[8] D. BARSCHDORFF. "Comparacin entre las redes neuronales y la clsi-

ca Decis.in de Algoritmos" Fault Detection, Supervision and Safety for
Technical Processes. IFAC Symposia Series, no.6, 1992
[9] E.B. BAUM, D. HAUSSLER. 'Tamao de red de generalizacin vlida"

Neural Computation 1, pp. 151- 160, 1989.
[10] BAREI, J. (1989). "Desaffollo de la Turbina tipo Banki para micro centra-
les por parte de EDEL CA". Departamento de Micro centrales de EDELCA.
Caracas - Venezuela.
[11] BRACAMONTE, E. (1996). "Diseo de un sistema de Energa Elctrica

para las Unidades Fronterizas de las Fuerzas Armadas Nacionales". Tra-
bajo de Investigacin no publicado. Maracay - Venezuela.
[12] DIMITRI P. BERTSEKAS. "Notas sobre la programacin no lineal y Dis-

creta -Momento Control ptimo" MIT, CA, July 1979.
[13] M.BIANCHINI, P. FRASCONI. "Aprender sin los mnimos locales en fun-

cin de Redes de Base Radial" IEEE Trans on Neural Networks, vo/.6,
n0.3, 1995
177
[14] S.A.BILLINGS, C.F.FUNG. "Recurrent Radial Basis Function Networks for

Adaptive Noise Cancellaton" Neural Networks, vol.8, no.2, pp.273-290,
1995
[15] A. BLUMER, A. EHRENFEUCHT, D. HAUSSLER, M.K.WARMUTH.

"Leam ability and the Vapd - Chervonenkis Dimenson" Joumal of the As-
sociation for Computing Machinery 36, pp. 929-965, 1989
[16] D.S. BROOMHEAD, D. LOWE. "Multivariate functional interpolation and

adaptive networks Complex Systems 2, pp.321-355, 1988
[17] E.BURATTINI, G.TAMBURRINI. ~ neural knowledge representation for

diagnostic expert systems" Artificial Neural Networks, T. Kohonen, K. Ma-
kisara, O. Simula, J. Kangas (Editors) Elsevier Science Pub/isher
B. V.(Norlh Ho/Jand), 1991
[18] P. BURRASCANO. "Leaming vector quantization for the probabilistic

neura/ network" IEEE Trans. on Neural Networks, vo/.2, pp.458-461, Ju/y
1991
[19] T.L. BURROWS, M.NIRANJAN. "The use of feed-forward and recurrent

neural networks for system identification CUED 1 F-INFENG 1 TR-158, De-
cember 1993
[20] T. CACOULLOS. "Estimation of a multivariate density". lnst. Statist. Math.,

vol. 18, no. 2, pp. 179-189, 1966
[21] G.A. CARPENTER, S. GROSSBERG ~ massively para/le/ architecture

for a self organizing neural pattem recognition machine" Computer Vision,
Graphics and image Processing 37,pp. 54-115, 1987
178
[22] F. DE CUADRA GARCA [Cuadra, 1990. "El problema general de la opti-

mizacin de diseo por ordenador: aplicacin de tcnicas de ingeniera de
conocimiento" Tesis Doctoral. E. T. S. de Ingenieros Industriales. Universi-
dad Pontificia Comillas. 1990.
[23] S. CHEN, S. BILLINGS. [Chen & Billings, 1989] ''Estimador Recursiva del
error de prediccin de parmetros para .los mode.los no .lineales". lnt. J.
Control49 (2), pp. 569-594.
[24] S.CHEN, S.BILLINGS, P.GRANT [Chen et al., 1990] "Nonlinear system

identification using neural networks': lnt. J. Control, vo/.51, no.6, pp.1191-
1214
[25] S.CHEN, C.F.N.COWAN, P.M.GRANT [Chen et al., 1991]"0rthogonal

least squares leaming algorithm for Radial Basis" Function Networks IEEE
Trans. on Neural Networks, vol.2, no.2, pp.302-309, 1991
[26] M. Chow, R. N. Sharpe, J. C. Hung. [Chow et al., 1993]. "Sobre la aplica-

cin y diseo de redes neuronales artificiales para la deteccin de la falla
de un motor" IEEE Trans. on Industrial Electronics, vol.40, no.2, pp.181-
196, April1993.
[27] G. CYBENCO [Cybenko, 1989]. ~proximacin de superposicin de una

funcin sigmoidea Matemticas de Control, Seales y Sistemas 2",
pp.303-314 Springer Verlag, New York lnc., 1989
[28] DAMITHA, K. RANAWEERA, G.KARADY [Damitha et al., 1993] "Power

System Static Security Analysis using Radial Basis Function Neural Net-
work"ESAP'93, pp.272-274
[29] GEORG E E.P. BOX, GWILYM M. JENKINS. "Anlisis de series tempora-

les.: la previsin y controi"Holden- Day Jnc., CA, (Revised Edition) 1976.
179
[30] Quantz L. (1992) "Motores Hidrulicos" Construccin y clculo de las ins-

talaciones modernas de fuerza hidrulica. L. Quantz. Editorial Gustavo Gi-
l, SA
[31] ITDG Per (1995) "Manual de Mini y Micro centrales Hidrulicas" Una gua
para el desarrollo de proyectos. lntermediate T echnology Development
Group, ITDG-PER
[32] Juan Cevallos Ampuero [33], "Aplicacin de Redes Neuronales para

Optimizar Problemas Multi respuesta en mejora de la Calidad"
[33] Gustavo Ovando, Mnica Boceo y Silvina Sayago [34], "Redes Neuro-
nales para Modelar Prediccin de Heladas"
[34] Patricia Gonzlez Serrano, "Simulacin Tcnico- Econmica Del Merca-

do Elctrico Espaol"
[35] Hernndez Lpez Leonor, "Desarrollo de una metodologa para la pre-

diccin y optimizacin de emisiones contaminantes y consumo en moto-
res Diesel de automocin mediante redes neuronales artificiales"
[36] Rodrguez R., Jorge Enrique, "Redes Neuronales Artificiales para la cla-
sificacin de Imgenes Satelitales"
[37] Gonzlez Garca, Ismael, "Control Neuronal De Un Generador De Induc-

cin Para Generacin Elica"
[38] Martnez Estudillo, F. J. y Hervs Martnez, C. "Modelo no lineal basado

en redes neuronales de unidades producto para clasificacin. Una aplica-
cin a la determinacin del riesgo en tarjetas de crdito".
180
[39] Gonzlez Serrano, Patricia. "Departamento De Sistemas Energticos,
Simulacin Tcnico- Econmica Del Mercado Elctrico Espaol"
[40] Antonio Muoz, San Roque. "Aplicacin De Tcnicas De Redes Neuro-

nales Artificiales Al Diagnstico De Procesos Industriales"
[41] MATAIX, C., (1975), Turbo mquinas hidrulicas: turbinas hidrulicas,

bombas y ventiladores, ICAI.
[42] Wilfredo Jara T. (1998). Mquinas Hidrulicas" Fondo Editorial INIFIM.

Instituto de Investigacin de la Facultad de Ingeniera Mecnica.
[43] ESA, A., HOLLMN, J., SIMULLA, 0., VESANTO, J., (1999), Process
Monitoring and Modeling using the Self-Organizing Map., lntegrated Com-
puter-Aided Engineering, Vol. 6, Nro 1, pp. 3- 14.
[44] TSUGUO NOZAKI, "Gua para la Elaboracin de Proyectos de Pequeas

Centrales Hidroelctricas destinadas a la Electrificacin Rural del Per"
Julio de 1968.
[45] TSUGUO NOZAKI, "Gua para la Elaboracin de Estudios Preliminares de

Factibilidad de Proyectos de Pequeas Centrales de Mediana o Grande
Capacidad en el Per" Enero de 1969.
[46] IIVARINEN, J., RAUHAMAA, J., VISA, A., (1999), "Unsupervised Seg-
mentation of Surface Defects, Workshop of Texture Analysis in Machine
Vision", Oulu, Finland, June 14-15, pp. 53 - 58.
[47] KOHONEN, T., (1997), Self-Organizing Maps, Springer-Verlag
[48] SARRATE LANA 1., ALBRECHT K.: La escuela del tcnico Mecnico.
Hidrulica. Motores hidrulicos y bombas. Editorial Labor, S. A. Barcelo-
na. Madrid. 1951.
ANEXO A
NEUROSHELL 2
A.1 NEUROSHELL 2
NeuroShell 2 es un programa del software que imita la habilidad del cere-

bro humano para clasificar los modelos o tomar predicciones o decisiones basado
en la experiencia del pasado. El cerebro humano confa en los estmulos neur~
les mientras la red neural usa 'los juegos de los datos. NeuroShell 2 le permite que
construya problema personalizado sofisticado, que resuelve las aplicaciones sin
programar.
NeuroShell 2 y el cerebro pueden resolver problemas que no pueden re-

solverse por el software de la computadora convencional escritos en un modo pa-
so a paso. Simplemente como el cerebro, sin embargo, no se garantiza que las
redes neurales dar siempre una respuesta completamente correcta, sobre t~. ~i
los modelos estn de alguna manera incompletos o contradictorios.
A.2 INICIO EN EL NEUROSHELL 2.
Ingresar en el men Todos los Programas y seleccionar NeuroShell 2,

hacer clic en el icono "cerebro" de NeuroShell 2 que ha sido colocado cuando se
instalo el programa; tal como se observa en la figura A.1. El men Principal de
182
NeuroShe/1 2 ser mostrado. Note que una barra de men muy angosta esta so-
bre y desligada de la pantalla de aviso NeuroShell 2.
Fig. A.l Men principal.
A.3 DESIGNACIN DEL PROBLEMA.
Cada problema se refiere a una aplicacin neuronal. Durante varias eta-

pas del procesamiento del problema, NeuroShell 2 construir diferentes archivos
asociados con la aplicacin. Los nombres de los todos los archivos empiezan con
el mismo nombre del problema (mximo de 8 caracteres) y terminan con diferen-
tes apropiadas extensiones.
A.3.1 MEN DE ARCHIVO (file):
Seleccione "file" (archivo) en la barra de Men y aparece el men mostra-

do en la figura A.2, en donde puede seleccionar crear un nuevo problema (New
Problem) o abrir un problema existente (Open Problem).
NewProblem
Open Problem ..
Save Problem
Save ProblemAs ..
Transfer info to another problem ..
O:\NSHB.L2\BEGTRAIN
O:\NSHELL2\FRANCIS\FRANCIS
C:\NSHELL2\EXAMPLES\LINES
C:\NSHELL2\EXAMPLES\5AOOLE
Fig. A.2 Barra de men archivo (file).

183
A.3.1.1 Nuevo Problema.
Si se selecciona la opcin New Problem, aparece el men mostrado en la

figura A.3; este men le permite empezar un nuevo problema en NeuroShell 2,
escribiendo el nombre del problema o el nombre del archivo de descripcin del
problema. (DSC).
Setect a path and name the problem or d~E3
Nombre de archivo: Carpetas: Aceptar

111 d:\mhell2
Cancelar
ABOUT.EXE 10 d:\
BEGTRAIN.EXE eNSHEU2
BEGTRN32.EXE Red...
BPPROC.EXE CJ EXAMPLES
BPTRAIN.EXE D Francis
BPTRN32.EXE Cl GIFS
CONTRIB.EXE
CHANGES.HLP .=.1 ~-~
Guardar como archivo de Uridades:
jAU Files r:J 3 liad: DISK1_VOL? _El
~~~---- ~--
Fig. A.3 Barra de men de la opcin: New Problem.
Seleccionar el directorio examp/es, luego ingresar el nombre del archivo

a trabajar, por ejemplo Francis.dsc: Presionar Aceptar; tal como se observa en la
figura A.4.
Select a path and name the problem or .d~s~~~:EJ'
Nombre de archivo:
l~ran~~:~q -~ J
Carpetas:
d:\nshell2\examples
Aceptar
1
Cancelar
SPIRAL.PAT '.A (Od:\ 'l ....
1
TURBINA1.C (Q NSHELL2 Red...
TURBINA1.DEF
fj-EXAMPLES 1
turbinal.dsc
TURBINA1.fig
TURBINA1.FLA :...:...J
i
TURBINA l.MMX
I_URBI!'J~1)-l01 :.:J El
Guardar como archivo de Unidades:
IAII Fi!_e: !"; 'J ~ ~ - 3 1la d: DISK1_VOL2 8
- ~-" . - -= ~--
Fig. A.4 Barra de men al seleccionar: examples.

184
A.3.1.2 Abrir Problema
Si selecciona la opcin Open Problem, aparece el men mostrado en la

figura A.5; le permite seleccionar un problema existente en NeuroShell 2, por la
seleccin asociada al archivo de descripcin previamente gravado .
. ij~'lt~
Nombre de archivo: Carpetas: Aceptar
IR d: \nshel12\examples
Cancelar
ELECTRIC.DSC ..... (Qd:\ ...
LINEASl.OSC (C, NSHELL2
LINES.DSC Red ..
NYSE.DSC ~ E><AMPLES
REALTY.OSC
SADOLE.OSC r:; Slo lectura
SPIRALOSC
turbinal.dsc ~ d
Mostrar archivos de tipo: Unidades:
10~. Files (".dsc} -~,3 1la d OISK1_\[OL2 3
- -- -----
Fig. A.S Barra de men al seleccionar la opcin: Open Problem.
Puede seleccionar marcando el archivo o tipeando su nombre, no es ne-

cesario tipiar su extensin; por ejemplo turbina1, tal como se observa en la figura
A.6.
Nombre de archivo: Carpetas: Aceptar ]

!~urbinaldsc . d:\nshell2\examples
Cancelar J
ELECTRIC.DSC (Qd:\
LINEAS1.DSC (C, NSHELL2 Red .... J
UNES.OSC
~ E><AMPLES
NYSE.OSC
REALTY.OSC
SAOOLE.OSC C Slo lectura
.. .
SPIRAL.DSC
Mostrar archivos de tipo: Unidades:

1Dese. Files (".dscL .. ::.::J 1la d: OISK1_VOL2. 3
Fig. A.6 Barra de men al seleccionar turbina1.
185
Al seleccionar el archivo turbina1, presionar Aceptar, y aparece el men

mostrado en la figura A.7. Puede aadir o cambiar la descripcin del problema en
cualquier momento que la caja de descripcin del problema este mostrada.
File Edit Utility Options Help
Beginner"s Advanced Runtime

Neural Neural Facilities
Networks Networks
l
Train and apply
~
Train and apply
~
Create runtime
a simple net complex versionsof
architecture architectures trained nets
Problem Description
: : : : : : ejemplo de ofioefio de luobinas o;po

Francis. Se basa en datos tomados de la prctica
~
..J
Double dick icons to execute; single click before selecting help. 1
11
Fig. A.7 Ventana del men principal.
A.3.2 VENTANA DEL MEN PRINCIPAL.
La ventana del Men Principal brinda la opcin de usar el NeuroShell 2 en

tres diferentes maneras: el Sistema de Principiantes, el Sistema Avanzado, y
el Sistema de Tiempo de Ejecucin; tal como se observa en la figura A.7. Estos
tres sistemas son construidos de subprogramas llamados "mdulos" y cada mdu-
lo es representado por un icono. La mayora de usuarios debern empezar prime-
ro con el Sistema de Principiantes.
Para usar un mdulo, doble clic del botn izquierdo del ratn sobre el
icono que representa ese mdulo. Para recibir ayuda sobre cmo usar un mdu-
lo, clic simple sobre el icono y luego seleccione Contexto Actual (current con-
text) desde el Men de Ayuda (Help); tal como se observa en la figura A.S.
186
li
Trainand~
a snple net
lllchiecture
Problem Oescription
~~:::~de mse de~ tipo

Francis. Se basa en datos tomados de la prctica
~
A.3.3 EL SISTEMA DE PRINCIPIANTES.
Para usar el mdulo el sistema de principiantes, doble clic del botn iz-
quierdo del ratn sobre el icono del "triciclo" que representa ese mdulo y que
se observa en la figura A.7; y aparece el men mostrado en la figura A.9. Cuan-
do un grupo de iconos aparece en la pantalla, el orden de operaciones a trabajar
es desde la izquierda a la derecha. Si los iconos aparecen en una columna, traba-
.je desde arriba hacia abajo. Note que puede no tener que usar todos los iconos
que aparecen en la pantalla de forma de crear una aplicacin red neuronal. Mu-
cho de los mdulos son opcionales dependiendo sobre el tipo de aplicacin que
este creando.
Problem Build Applp Problem

Input Neural Nevral Output
Netwotlt Netwmlr.
S] + ~ + ~ + 8iJ
FieExport
File lmport Define Applyto

lfll'Js/ File
Outputs
Data
Enll)l
) ~
Attach
Eumine
Data
Test Set Oul>JI
El<llact Fie
m
Leamng
187
A.3.4 EL SISTEMA DE AVANZADO.
Para usar el mdulo el sistema de avanzado, doble clic, del botn izquier-
do del ratn sobre el icono de la "bicicleta" que representa ese mdulo y que se
observa en la figura A.7, y aparece el men mostrado en la figura A.10. Cuando
un grupo de iconos aparece en la pantalla, el orden de operaciones a trabajar es
desde la izquierda a la derecha. Si los iconos aparecen en una columna, trabaje
desde arriba hacia abajo.
'
File Options Help
Problem Pre Build Apply Post Problem

Input Network Neural Neurat Network Output

Network Network
'
ABC
.-~ 8jJ
+ 123 " + ~ + + _,
+
,
File lmport Variable i
Symbol Define Contrib File Export
Translate Graphs

lnputs/ ution
Outputs FactOIS
ITHBI
!.m
FELSE ~
Data
Entry Rules
.
Test Set
ti
Apply to
Custom
Examine
Data
Extract File ITHEII
~ ~
!.m
FEL:E -
Custom
Design ~ Rules
PTintouts
.AA Attach 123
~:. ~' .. ..- ..
Va~iable
Graphs
m
Lea~ning
-
Output
Fae
,.
ABC
Symbol
Translate
l! ranslale text to numerics in the cunent pa~tem fae -- .

_j
. 1 .
Ftg. A.10 Menu del ststema de avanzado.
A.3.5 SISTEMA DE TIEMPO DE EJECUCIN.
Para usar el mdulo el sistema de tiempo de ejecucin, doble clic del

botn izquierdo del ratn sobre el icono del "atleta" que representa ese mdulo y
que se observa en la figura A.7, y aparece el men mostrado en la figura A.11.
Cuando un grupo de iconos aparece en la pantalla, el orden de operaciones a tra-
bajar es desde la izquierda a la derecha. Si los iconos aparecen en una columna,
trabaje desde arriba hacia abajo.
188
. ------ -_ .. ,
~ ~~l311tabxy~ ~': 1
1
File Help
sr;;R
OLL
@ 8
Mak.e Source
DEF Fe Code
Generator
1!hese ~~ns w~n p~me t~-~e runtime serv~rs _ -- --- -

1
.
F1g. A.ll Men del sistema de avanzado
Si seleccionamos haciendo doble clic del botn izquierdo del ratn en la
opcin "hacer el archivo en def' (Make DEF File) aparece el men mostrado en la
figura A.12; doble clic del botn izquierdo del ratn en la opcin "generador del
cdigo fuente" (Source code generador) aparece el men mostrado en la figura
A.13.
-1'-00~~~~'illll.l!~ L-Jo x
ftl! ~at.. H~
Cod9,.1atian Fk 0:\NSHE Ll2\EXAMI'I.ES\ELECTRIC.FIG

1
OLLOefmonfie: O:\NSHELL2\EXAMI'LES\ELECTRIC.OEF
- ~-
__j
~~~ 1-ICilfx
Fle Help
~
~
Mako
DEF F"""
ato!
~ lhe <t,mmic ink lbtOIY serve~ wti\ELECTRI~

1
______J
., -
Fig. A.12 Opc1on Make def file.
189
Fig. A.13 Opcin Source code Generator.
A.4 Opciones del Men Principal
NeuroShell 2 ofrece varias opciones del men principal las cuales permite
trabajar con archivos dentro de NeuroShell 2 y con programas externos.
A.4.1 Men de Archivo (File)
Esta opcin permite nuevo, abrir, gravar, gravar como y transferir informa-
cin a otro problema, dentro de ,la caja de edicin de texto que muestra la des-
cripcin del problema, (File mostrado en la figura A.14).
Tr..-.ferWotn....,,.problem.
O:~
0:~1
0:~
D:\NSiti12\EXAI'PClRIC
D:\l6fi12\ElCAI'ITIJU!!NAl , on
PIIOBI.EM
Fig. A.14 Opcin del men principal: File.
1. Nuevo Problema: Permite empezar un nuevo problema en NeuroShell 2 por el

tipeo del nombre del problema los archivos de descripcin de los problemas
(.DSC).
190
2. Abre Problema: Permite seleccionar un problema existente por la se-

leccin del archivo de descripcin asociado. Puede seleccionar el archivo tipea
sus nombres. Si tipeo esto, la extensin DSC no es requerida.
3. Grabar Problema: Graba el archivo de descripcin para el problema

actual bajo el mismo nombre que entro cuando creo el problema.
4. Grabar Problema Como: Graba el archivo de descripcin para el pro-

blema actual bajo un nuevo nombre entrado. Tendr la oportunidad de copiar to-
dos los otros archivos en el problema existente dando a ellos el nuevo nombre.
5. Transfiere informacin a otro problema: La opcin transfiere permite

seleccionar alguno todos los archivos desde el actual problema de NeuroShell
2 y copia ellos a otro problema. Esta opcin es til cuando desea crear una apli-
cacin similar al problema actual y desea hacer uso de los archivos existentes,
. .
pero con otro nombre de problema. Cuando selecciona la opcin Transfiere, una
pantalla mostrar una lista de los archivos disponibles de NeuroShell 2 para el
problema existente.
A.4.2 Men de Edicin (Edit)
Esta opcin permite cortar, copiar, y pegar datos dentro del la caja de edi-
cin de texto que muestra la descripcin del problema; (edit mostrado en la figura
A.15).
~~~~~
.-c;;-a;:;x- i
Runtime
)::J
Advanced
Neutal FacililiM
Netwmb
i
~
Tran and appbo
~
Troin and appbo
~
Create runtime
a~nel versiomol
,.clileclure """""""
orclitectures bained net
:
Problem Description
Thio is lhe UNES problem from NeuroShelll ~
which we have inoported inlo NemoShell 2. lt is '
a!rea<tl trained to rec<rJze fine l<egmenl ..,_.
PROBLEM
In this problem we have taught NemoShell to
~-
.
recognize - of 5 fine . . _ have ........ . :
!New:::~;_::;;~=-me ~-. ~
Fig. A.lS Opcin del men principal: Edit.
191
A.4.3 Men de Utilidad (Utility)
Esta opcin permite ejecutar un programa externo, editar un archivo ex-

terno con Excel, editar un archivo de texto (opcin mostrada en la figura A.15).
''!'},NeuroShe112-0:~
Ale EditJu.y_~~--- -------
Begi Execute Externa! Program .. ' ::::;R=_::;:_::::::;--
.!=-
Nt Prrt 1ntem111 Rle... Facililies

Net'
1 View !rtemal Rle... ~
Edi:IntemaiRie... .~
T1,;n Edl Intemal Rle wth ExceL Creale nrne
: Edi Intemal Rle wth Q.JottroPro... Ye!siom of
"' J Edi !rtemal Fie wth l-2-3... ! boined nets
- Edl Text Ale wth Notepad...
Attodl Intemal Files.
~
whir
Delete Ale...
Renome Re ...
~~-
1
ltis

aire_ Slart Ale Monogcr shapes .

1
In lirio problem - have taughl N@UI05hel lo

recognize wNch uf 51ine m_. have been
entered inlo lhe 1 O input neurons. The ahapes are .J
Fig. A.15 Opcin del men principal: Utility.
1. Ejecuta Programa Externo: Si se desea usar un programa externo

que genere data para el uso con el NeuroShell 2, por ejemplo. Esta opcin "shell
out" a otro programa que se escoja: Imprimir, ver, editar los archivos internos de
NeuroShell 2. Estos 2 mdulos para hacer la impresin, visin edicin.
2. Edita Archivo Interno con Excel, Quattro Pro, 1-2-3: Seleccionado

estas opciones empezara la ejecucin del programa seleccionado y carga del ar-
chivo NeuroShell 2 dentro de ese programa. Los archivos de patrones de Neu-
roShell 2 (y algunos archivos internos) estn en formato de hoja de clculo que
puede ser cargado por cualquier programa de hoja de clculo convencional.
3. Editar un Archivo de Texto con Notepad: Este es una rpida mane-

ra de visualizar un archivo de texto. Use esto para ver archivos ASCII si desea
importar tiene para exportar archivos ASCII por ejemplo.
4. Aadir Archivos Internos: Use esta opcin para combinar "engo-

mar'' dos archivos juntos. Puede desear usar esta opcin para crear un simple
archivo que contenga los patrones de la rede de entrenamiento (.archivo PAT) y la
predicciones o clasificaciones de la red (archivo OUT).Esta opcin puede tambin
ser usada para aadir nuevos patrones al conjunto de datos de entrenamiento.
192
5. Elimina Archivo: Use esta opcin para borrar un archivo.
6. Renombrar Archivo: Use esta opcin para cambiar el nombre de un

archivo.
7. Administrador de Inicio de Archivos Use esta opcin para ejecutar

.el Administrador de Archivo del Windows.
8. Restaura desde Archivo de Patrones de Respaldo: Antes de que

'los mdulos NeuroShell 2 Traslado de Smbolos y reglas de proceso un archivo
de respaldo copia es hecho con la extensin OLD Esta opcin restaure el antiguo
archivo OLD que el caso que no quiera el proceso que resulte de Traslado de
Smbolo Reglas
A.4.4 Men de Opciones (Options):
Esta opcin permite minimizar sobre un nuevo mdulo, colocar color de

fondo, seleccionar su propia hoja de clculo (opcin mostrada en la figura A.16).
Mnini2e on New Morule

Set BackGro..-.d Color o Facilities
Select Datagrid Program .. o
TrM*lg mode: 32-bit
li
Trainand~ Create rtrlime
a sinple net ve!sionool
architecttMe ~.r.ed net
Problem Description
~his is the UNES problem lrom NeuroSheD 1 :J-
which we have imported into NeuroSheD 2. lt is
abead_p trained to recognize fine oegment ;hapes
PROBLEM
In this problem we have taughl NeuroSheD lo
recognize which of 5 fine mapes have been
entered inlo the 1 O input netJJOn$. The ohapes are ~
Fig. A.16 Opcin del men principal: Options.
1. Minimiza sobre Nuevo Modulo: esta opcin automticamente minimizar

las ventanas existentes cuando haga doble clic sobre un icono para abrir
un nuevo mdulo.
2. Pone Color de Fondo: Esta opcin permite seleccionar un diferente color

de fondo.
3. Selecciona Datagrid: Esta opcin permite seleccionar su propia hoja de

clculo.
ANEXO B
CDIGO GENERADOR POR NEUROSHELL 2
8.1 PROGRAMA C GENERADO POR NEUROSHELL2
8.1.1 SELECCIN DE TURBINAS: MTODO 1.
r lnsert this code into your C program to tire the C:\NSHELL2\EXAMPLES\TURBINA\SELTURB\SELTURB

network */
r This code is designed to be simple and fast for porting to any machine */
r Therefore all code and weights are inline without looping or data storage */
r which might be harder to port between compilers. */
#include <math.h>
void Fire_SELTURB(double *inarray, double *outarray)
{
double netsum;
double feature2(78);
r inarray [O) is H_m */ r outarray [10) is Ns_Pelton_1Ch */

r inarray [1] is Q_m3_seg */ r outarray [11] is Ns_Pelton_2Ch */
r inarray [2) is Vei_Rot.n_rpm */ r outarray [12] is Ns_Pelton_4Ch */
r inarray [3) is Ef_Pelton */ r outarray [13] is Ns_Francis */
r inarray [4] is Ef_Francis */ r outarray [14] is Ns_Kaplan */
r inarray [5) is Ef_kaplan */ r outarray [15) is Ns_Helice */
r inarray [6) is Ef_Helice */ r outarray [16) is Ns_Michell */
r inarray [7) is Ef_Michell */ r outarray [17] is Pelton_1ch */
r outarray [O] is P_Pelton_hp */ r outarray [18) is Pelton_2ch */
r outarray [1] is P_Pelton_kW */ r outarray [19) is Pelton_4ch */
r outarray [2] is P_Francis_hp */ r outarray [20) is FLenta */
r outarray [3) is P_Francis_kW */ r outarray [21] is FNormal */
r outarray [4] is P_Kaplan_hp */ r outarray [22] is FRapida */
r outarray [5) is P_Kaplan_kW */ r outarray [23) is FExRapida */
r outarray [6] is P_Hlice_hp */ r outarray [24] is KAPLAN */
r outarray [7] is P_Helice_kw */ r outarray [25] is HELICE */
r outarray [8] is P_Michel_hp */ r outarray [26) is Michell */
r outarray [9) is P_Michel_:kW */
194
if (inarray[01< 3) inarray[01 = 3; netsum += inarray[2) * 1.409892;

if (inarray[01> 300) inarray[01 = 300; netsum += inarray[3] * -4.477066E-03;
inarray[01 = (inarray[01 - 3) /297; netsum += inarray[41 * .1462783;
netsum += inarray[5) * -.1350169;
if (inarray[11< .03) inarray[11 = .03; netsum += inarray(61 * -6.497696E-02;
if (inarray[11> 20) inarray[1] =20; netsum += inarray[7] * -9.201331E-03;
inarray[11 = (inarray[1]- .03) /19.97; feature2[21 =1/ (1 + exp(-netsum));
if (inarray[21< 225) inarray[21 = 225; netsum =6.803522;

=
if (inarray[2]> 2500) inarray[21 2500; netsum += inarray[O) * .4219669;
=
inarray[21 (inarray[21 - 225) /2275; netsum += inarray[1 1* -.16891 09;
netsum += inarray[21 * 2.1 05579;
if (inarray[3]< 70) inarray[3] = 70; netsum += inarray[31 * -7.252114E-02;
if (inarray[3]> 71) inarray(31 = 71; netsum += inarray[4) * 6.913358E-02;
inarray[31 =(inarray[31 - 70); netsum += inarray[51 * -.2128941 ;
netsum += inarray[61 * .2924742;
if (inarray[4)< 80) inarray[41 = 80; netsum += inarray[7] * -.2945067;
=
if (inarray[4)> 81) inarray[41 81; =
feature2[31 1/ (1 + exp(-netsum));
inarray[4] =(inarray[4] - 80);
netsum = 6.753985;
if (inarray[51< 80) inarray[51 = 80; netsum += inarray[OJ * 1.885692;
if (inarray[5)> 81) inarray[51 =81; netsum += inarray(1) * 1.842216;
inarray[5] = (inarray(5]- 80); netsum += inarray(2) * 1.223961;
netsum += inarray[3] * -1.913511E-03;
if (inarray[6)< 85) inarray[6] = 85; netsum += inarray(4] * -8.332469E-02;
if (inarray[6]> 86) inarray[6] =86; netsum += inarray[5] * .2890683;
=
inarray[61 (inarray[61 - 85); netsum += inarray(61 * -.188815;
netsum += inarray[7] * -3.608204E-02;
if (inarray[7)< 65) inarray[7) = 65; feature2[41 =1/ (1 + exp(-netsum));
if (inarray[7)> 66) inarray[7) = 66;
inarray[7] =(inarray[7] - 65); netsum = 12.53918;
netsum += inarray(O] * -10.48725;
=
netsum 4.012454; netsum += inarray[1) -11.54977;
netsum += inarray[01 * -6.006174; netsum += inarray[2] 1.307204;
netsum += inarray[11 * -43.81947; netsum += inarray(31 .1760155;
netsum += inarray[21 * -.1946824; netsum += inarray(4] .2139927;
netsum += inarray[3] * .0976806; netsum += inarray[5) 7.199012E-02;
netsum += inarray[41 * .237138; netsum += inarray(6] .237431 ;
netsum += inarray[5) * .2687429; netsum += inarray[7] 4.71511E-03;
nefsum += inarray[6] * .2696768; feature2[5] = 1/ (1 + exp(-netsum));
netsum += inarray[7] * -.1725181;
feature2[0] = 1/ (1 + exp(-netsum)); netsum += feature2[70] * -.1061427;
netsum += feature2[711 * -5.131286E-02;
netsum =-4.58809; netsum += feature2[72] * -.1983506;
netsum += inarray[O] * 1.996068; netsum += feature2[73) * -.1868874;
netsum += inarray[1] * 124.5476; netsum += feature2[74] * -.4420827;
netsum += inarray(2] * 3.064328; netsum += feature2[75) * 7.672975E-03;
netsum += inarray[31 * -.2312784; netsum += feature2[76] * -.3880841;
netsum += inarray[4) * .1737816; netsum += feature2[77] * .0171786;
netsum += inarray[5) * -.2647328; outarray[13] =1/ (1 + exp(-netsum));
netsum += inarray[7] * -.1068545; netsum =-.1555729;
feature2[11 = 1/ (1 + exp(-netsum)); netsum += feature2[0] * -.2053683;
netsum += feature2[1] * .2608078;
netsum = 6.691545; netsum += feature2[2) * .2242703;
netsum += inarray[01 * 1.241722; netsum += feature2[3) * .4026024;
netsum += inarray[1 1* 1.124249;
195
if (inarray[O)< 3) inarray[O] = 3; netsum += inarray[2] * 1.409892;

if (inarray[O]> 300) inarray[O] =300; netsum += inarray[3]" -4.477066E-03;
inarray[O) = (inarray[O] - 3) /297; netsum += inarray[4] * .1462783;
netsum += inarray(5] * -.1350169;
=
if (inarray[1]< .03) inarray(1] .03; netsum += inarray[6] * -6.497696E-02;
if (inarray[1]> 20) inarray[1] = 20; netsum += inarray[7] * -9.201331E-03;
inarray[1) = (inarray(1]- .03) /19.97; feature2[2] =1/ (1 + exp(-netsum));
if (inarray[2]< 225) inarray[2] = 225; netsum =6.803522;

if (inarray[2]> 2500) inarray[2] = 2500; netsum += inarray[O] * .4219669;
inarray[2] = (inarray[2] - 225) /2275; netsum += inarray[1] * -.1689109;
netsum += inarray(2] * 2.105579;
if (inarray[3]< 70) inarray[3] = 70; netsum += inarray(3] * -7.252114E-02;
if (inarray(3]> 71) inarray[3] = 71; netsum += inarray[4] * 6.913358E-02;
inarray[3) = (inarray[3] - 70); netsum += inarray(5) * -.2128941;
netsum += inarray[6) * .2924742;
if (inarray(4]< 80) inarray[4] = 80; netsum += inarray[7) * -.2945067;
=
if (inarray[4]> 81) inarray[4] 81; feature2(3] =1/ (1 + exp(-netsum));
inarray[4] = (inarray[4]- 80);
netsum = 6.753985;
if (inarray[5)< 80) inarray(5] =80; netsum += inarray[O) * 1.885692;
if (inarray[5]> 81) inarray[5] = 81; netsum += inarray[1) * 1.842216;
inarray[5) = (inarray(5] - 80); netsum += inarray[2] * 1.223961;
netsum += inarray[3] * -1.913511E-03;
=
if (inarray[6]< 85) inarray[6] 85; netsum += inarray[4) * -8.332469E-02;
if (inarray[6]> 86) inarray(6] = 86; netsum += inarray[5) * .2890683;
inarray[6] =(inarray[6] - 85); netsum += inarray[6] * -.188815;
netsum += inarray[7] * -3.608204E-02;
if (inarray[7)< 65) inarray[7] = 65; feature2[4) =1/ (1 + exp(-netsum));
if (inarray[7]> 66) inarray[7) = 66;
inarray[7] = (inarray[7) - 65); netsum = 12.53918;
netsum += inarray[O] * -1 0.48725;
=
netsum 4.012454; netsum += inarray[1) * -11.54977;
netsum += inarray[O] * -6.006174; netsum += inarray(2) * 1.307204;
netsum += inarray[1] * -43.81947; netsum += inarray[3] * .1760155;
netsum += inarray[2] * -.1946824; netsum += inarray[4] * .2139927;
netsum += inarray[3] * .0976806; netsum += inarray[S) * 7.199012E-02;
netsum += inarray[4] * .237138; netsum += inarray[6] * .237431 ;
netsum += inarray[5] * .2687429; netsum += inarray[7] * 4.71511E-03;
netsum += inarray[6] * .2696768; feature2[5] = 1/ (1 + exp(-netsum));
netsum += inarray[7) * -.1725181;
feature2[0] = 1/ (1 + exp(-netsum)); netsum += feature2[70] * -.1 061427;
netsum += feature2[71] * -5.131286E-02;
netsum =-4.58809; netsum += feature2[72) * -.1983506;
netsum += inarray[O] * 1.996068; netsum += feature2[73) * -.1868874;
netsum += inarray[1] * 124.5476; netsum += feature2[74] * -.4420827;
netsum += inarray[2] * 3.064328; netsum += feature2[75) * 7.672975E-03;
netsum += inarray[3) * -.2312784; netsum += feature2[76] "-.3880841;
netsum += inarray[4] * .1737816; netsum += feature2[77] * .0171786;
netsum += inarray(5) * -.2647328; outarray(13] = 1/ (1 + exp(-netsum));
netsum += inarray[6] * .225602;
netsum += inarray[7] * -.1 068545; netsum =-.1555729;
feature2[1] = 1/ (1 + exp(-netsum)); netsum += feature2[0) * -.2053683;
netsum += feature2[1] * .2608078;
netsum =6.691545; netsum += feature2[2) * .2242703;
netsum += inarray[O] * 1.241722; netsum += feature2[3] * .4026024;
netsum += inarray[1] * 1.124249;
196
netsum += feature2[4)* -.1994831; netsum += feature2[61] * 4.834981 E-02;

netsum += feature2[5] * -.0486236; netsum += feature2[62] * 3.131916;
netsum += feature2[6] * .2696616; netsum += feature2[63] * .1450535;
netsum += feature2[7] * -.2318429; netsum += feature2[64) * 4.637285E-03;
netsum += feature2[8] * .2153651; netsum += feature2[65] * 3.128135E-03;
netsum += feature2[9] * -.2137569; netsum += feature2[66] * .2952096;
netsum += feature2[1 O] * .1337688; netsum += feature2[67] * 1.010071;
netsum += feature2[11] * .5015489; netsum += feature2[68] * .1 034905;
netsum += feature2[13] * -1.231483; netsum += feature2[70] * -.1386881;
netsum += feature2[14] * .0879225; netsum += feature2[71) * -.1696001;
netsum += feature2[15] * .3611635; netsum += feature2[72] * -.1984208;
netsum += feature2[16] * .1297449; netsum += feature2[73) * -1. 750844E-02;
netsum += feature2[18] * .2323795; netsum += feature2[75) * 6.660113E-02;
netsum += feature2[20] * .3078803; netsum += feature2[77] * -2.748005E-02;
netsum += feature2[21] * .1831245; outarray[14] =1/ (1 + exp(-netsum));
netsum += feature2[22] * .4989658;
netsum += feature2[23] * -.3631028; =
netsum -5.550731 E-02;
netsum += feature2[24] * -3.055629E-02; netsum += feature2[0] * -4.636625;
netsum += feature2[25] * 6.689677E-02; netsum += feature2[1] * -6.37167;
netsum += feature2[26] * -.5139582; netsum += feature2[2] * -.1827714;
netsum += feature2[29] * .3670477; netsum += feature2[5)* -.4341631;
netsum += feature2[30] * -.41 00025; netsum += feature2[6) * -1.234118;
netsum += feature2[31] * -.4820666; netsum += feature2[7) * .3693337;
netsum += feature2[32] * 3.317787E-02; netsum += feature2[8] * -.8373896;
netsum += feature2[34] * -.0832167; netsum += feature2(10] * -9.694033E-02;
netsum += feature2[35] * -2.446911; netsum += feature2[11] * 1.551679;
netsum += feature2[37] * .1542605; netsum += feature2[13] * 1.045563;
netsum += feature2[42] * -1.317804E-03; netsum += feature2(18] * 6.292721;
netsum += feature2[45] * -6.674092E-02; netsum += feature2[21] * -.3656001;
netsum += feature2[46)* -.2284631; netsum += feature2[22] * 2.119214E-03;
netsum += feature2[47] * -5.233391E-02; netsum += feature2[23] * .5620463;
netsum += feature2[51] * .1724207; netsum += feature2(27] * .4734852;
netsum += feature2[52)* -.2348868; netsum += feature2[28] * -.8577573;
netsum += feature2[53) * 8.358204E-02; netsum += feature2[29] * 7.188172;
netsum += feature2[54] * -.2854364; netsum += feature2{30] * .689226;
netsum += feature2[55] * -.1852949; netsum += feature2[31] * 3.624709E-02;
netsum += feature2[56) * -9.729192E-02; netsum += feature2[32] * -2.749696E-02;
netsum += feature2[57] * 3.33165; netsum += feature2[33] * .2428257;
netsum += feature2[58) * -4.549921; netsum += feature2[34] * 2.180475E-02;
netsum += feature2[59] * .475064; netsum += feature2[35] * -2.921005;
netsum += feature2[60] * -.1053541;
197
netsum += feature2[36] * .1493925; if (outarray[1]> 3506.444) outarray[1] =

netsum += feature2[37] * -3.669127E-02; 3506.444;
netsum += feature2[38] * -.6756941;
netsum += feature2[39] * .3548143; outarray[2] = 5478.947 * (outarray[2]- .1) 1
netsum += feature2[40] * -.5055785; .8 + 47.36842;
netsum += feature2[41] * .9162754; if (outarray[2]< 47.36842) outarray[2]=
netsum += feature2[42] * -.1983868; 47.36842;
netsum += feature2[43] * .3392236; if (outarray[2]> 5526.316) outarray[2] =
netsum += feature2[44] * 2.872041E-02; 5526.316;
netsum += feature2[45] * -6.022549E-02;
netsum += feature2[46] * -.9783021; outarray(3] = 3973.016 * (outarray(3]- .1) 1
netsum += feature2[47] * .4780843; .8 + 34.34884;
netsum += feature2[48] * -.3050171; if (outarray[3]< 34.34884) outarray(3] =
netsum += feature2[49] * 8.886951E-02; 34.34884;
netsum += feature2[50] * .7122769; if (outarray[3]> 4007.365) outarray(3] =
netsum += feature2[51] * -.9858402; 4007.365;
netsum += feature2[52] * -.5086016;
netsum += feature2[53] * 4.51 0923; outarray(4] = 5478.947 * (outarray[4J- .1) 1
netsum += feature2[54] * .5051236; .8 + 47.36842;
netsum += feature2[55J * .9749169; if (outarray[4]< 47.36842) outarray[4] =
netsum += feature2[56] * -.7045599; 47.36842;
netsum += feature2[57] * -2.779886; if (outarray[4]> 5526.316) outarray[4] =
netsum += feature2[58] * 2.155971; 5526.316;
netsum += feature2[59] * -1.1749;
netsum += feature2[60] * .204671; =
outarray(5] 3973.016 * (outarray(5]- .1) 1
netsum += feature2[61] * .3816415; .8 + 34.34884;
netsum += feature2[62] * 2.812952; if (outarray(5J< 34.34884) outarray[5J =
netsum += feature2[63] * .2510594; 34.34884;
netsum += feature2[64] * -3.901409; if (outarray[S]> 4007.365) outarray(5]=
netsum += feature2[65] * -2.839547; 4007.365;
netsum += feature2[66] * -.9092724;
netsum += feature2[67] * 1.929407; outarray(6] = 5821.381 * (outarray[6]- .1) 1
netsum += feature2[68] * -.8316443; .8 + 50.32895;
netsum += feature2[69] * -.3394692; if (outarray[6]< 50.32895) outarray(6] =
netsum += feature2[70] * .2312422; 50.32895;
netsum += feature2[71] * .2223419; if (outarray[6J> 5871.71) outarray[6]=
netsum += feature2[72] * 2.239259; 5871.71;
netsum += feature2[73] * -.2155613;
netsum += feature2[74] * .4760993; outarray[7] =4221.33 * (outarray(7] - .1) 1.8
netsum += feature2[75J * 6.282055E-04; + 36.49564;
netsum += feature2[76] * -1.235251; if (outarray[7]< 36.49564) outarray[7] =
netsum += feature2[77] * 2.217366E-02; 36.49564;
=
outarray[26] 1/ (1 + exp(-netsum)); if (outarray[7]> 4257.825) outarray[7J =
4257.825;
outarray[O] = 4794.079 * (outarray[OJ- .1) 1 =

outarray[8] 4451.644 * (outarray(8]- .1) 1
.8 + 41.44737; .8 + 38.48684;
=
if (outarray[O]< 41.44737) outarray[O] if (outarray[8J< 38.48684) outarray[8J =
41.44737; 38.48684;
if (outarray(O]> 4835.526) outarray[O] = if (outarray[8]> 4490.131) outarray[8] =
4835.526; 4490.131;
outarray[1] = 3476.389 * (outarray[1]- .1) 1 outarray(9] = 3228.075 * (outarray(9]- .1) 1

.8 + 30.05523; .8 + 27.90843;
=
if (outarray[1]< 30.05523) outarray[1] if (outarray[9]< 27.90843) outarray[9] =
30.05523; 27.90843;
198
if (outarray[9]> 3255.984) outarray[9] = if (outarray[16]< 7.728415) outarray[16] =

3255.984; 7.728415;
if (outarray[16]> 1825.667) outarray[16] =
outarray[10] = 1886.564 * (outarray[10]- .1) 1825.667;
/.8 + 8.020156;
if (outarray[10]< 8.020156) outarray[10] = outarray[17) = 10 * (outarray[17]- .1) 1.8;
8.020156; if (outarray[17]< O) outarray[17] =O;
if (outarray[10]> 1894.584) outarray[10] = if (outarray[17]> 10) outarray[17] = 10;
1894.584;
=
outarray[18] 10 * (outarray[18]- .1) /.8;
outarray[11] = 1334.002 * (outarray[11]- .1) =
if (outarray[18]< O) outarray[18] O;
1.8 + 5.6711 06; =
if (outarray[18]> 10) outarray[18] 10;
if (outarray[11]< 5.671106) outarray[11] =
5.671106; outarray[19] = 10 * (outarray[19]- .1) /.8;
if (outarray[11]> 1339.673) outarray[11] = if (outarray[19]< O) outarray[19] = O;
1339.673; if (outarray[19]> 10) outarray[19] = 10;
outarray[12] =943.2818 * (outarray[12]- .1) =

outarray[20] 1O* (outarray[20] - .1) 1.8 ;
1.8 + 4.010078; if (outarray[20]< O) outarray[20] =O;
if (outarray[12]< 4.010078) outarray[12] = if (outarray[20]> 10) outarray[20] = 10;
4.010078;
if (outarray[12]> 947.2919) outarray[12] = outarray[21] = 10 * (outarray[21]- .1) /.8;
947.2919; if (outarray[21]< O) outarray[21] = O;
if (outarray[21]> 10) outarray[21] = 10;
outarray[13] =2016.821 * (outarray[13]- .1)
1.8 + 8.573907; outarray[22] = 1O* (outarray(22] - .1) 1.8 ;
if(outarray[13]< 8.573907) outarray[13] = if (outarray[22]< O) outarray[22] = O;
2025.395; outarray[23] = 10 * (outarray[23]- .1) /.8;
if (outarray[23]< O) outarray[23] =O;
outarray[14] =2016.821 * (outarray[14]- .1) if (outarray[23]> 10) outarray[23] = 10;
1.8 + 8.573907;
if (outarray[14]< 8.573907) outarray[14] = =
8.573907; =
if (outarray(24]< O) outarray[24] O;
if (outarray[14]> 2025.395) outarray[14] = =
2025.395;
outarray[25] = 1O* (outarray[25] - .1) 1.8 ;
outarray[15) = 2078.891 * (outarray[15]- .1) if (outarray[25]< O) outarray[25) =O;
1.8 + 8.837781; if (outarray[25]> 10) outarray[25] = 10;
8.837781; =
outarray[26] 10 * (outarray[26]- .1) 1.8;
if (outarray[15)> 2087.729) outarray[15] = if (outarray[26]< O) outarray[26] = O;
=
outarray[16) 1817.939 * (outarray[16]- .1) }
1.8 + 7.728415;
}
8.1.2 SELECCIN DE TURBINAS: MTODO 2.

1* lnsert this code into your C program to fire the C:\NSHELL2\TURBINA2\SELTURB\SELTURB network */
/* This code is designed to be simple and fast for porting to any machine */
/* Therefore all code and weights are inline without looping or data storage */
/* which might be harder to port between compilers. */
#include <math.h>
199
void Fire_SELTURB(double *inarray, double *outarray)

{
double netsum;
double feature2(17];
double feature3[17);
double feature4[17];
/* inarray(O] is H_m */ /* outarray(1 O] is Ns_Pelton_1 Ch */

/* inarray[1] is Q_m3_seg */ !* outarray[11] isNs_Pelton_2Ch */
/* inarray(2] is Vei_Rot.n_rpm */ !* outarray(12] is Ns_Pelton_4Ch */
/* inarray(3] is Ef_Pelton */ /* outarray[13] is Ns_Francis */
/* inarray(4] is Ef_Francis */ !* outarray[14] is Ns_Kaplan */
/* inarray(5] is Ef_kaplan */ /* outarray[15] is Ns_Helice */
/* inarray[6] is Ef_Helice */ !* outarray[16] is Ns_Michell */
/* inarray[7] is Ef_Michell */ /* outarray[17] is Pelton_1ch */
/* outarray[O] is P_Pelton....:hP */ /* outarray(18] is Pelton_2ch */
/* outarray(1] is P_Pelton_kW */ /* outarray[19] is Pelton_4ch */
/* outarray[2] is P_Francis_hp */ /* outarray[20] is Flenta */
/* outarray(3) is P_Francis_kW */ /* outarray(21] is FNorrnal */
/* outarray[4] is P_Kaplan_hp */ /* outarray[22] is FRapida */
/* outarray(5] is P_Kaplan_kW */ /* outarray[23] is FExRapida */
!* outarray(6] is P_Hlice_hp */ !* outarray[24) is KAPLAN */
/* outarray[7) is P_Helice_kw */ /* outarray[25] is HELICE */
/* outarray(8] is P_Michel_hp */ !* outarray[26] is Michell */
/* outarray[9) is P_Michel_kW */
if (inarray(O]< 3) inarray(O] = 3;
if (inarray(O]> 300) inarray(O] = 300; netsum =-9.278794;
inarray[O] =2 * (inarray(O]- 3) /297 -1; netsum += inarray[O] * 2.130964;
netsum += inarray(1] * -55.63792;
if (inarray[1)< .03) inarray[1) =.03; netsum += inarray[2] * -.9635499;
if (inarray[1]> 25) inarray(1] = 25; netsum += inarray[3] * 9.032338;
inarray[1] = 2 * (inarray(1]- .03) /24.97 -1; netsum += inarray[4] * 8.896361;
netsum += inarray[5) * 8.764627;
if(inarray[2]< 225) inarray(2] = 225; netsum += inarray[6] * 8.981965;
if (inarray(2)> 2500) inarray(2] = 2500; netsum += inarray(7] * 9.249156;
inarray[2] = 2 * (inarray(2]- 225) /2275 -1; feature2[0) = exp(-netsum * netsum);
if (inarray(3]< 70) inarray(3] = 70; netsum =-.3356453;

if (inarray[3]> 71) inarray[3] = 71; netsum += inarray[O] * -13.81011;
inarray[3] =2 * (inarray(3] - 70) -1 ; netsum += inarray(1] * 6.950732;
if (inarray(4]< 80) inarray(4] = 80; netsum += inarray[3] * .488485;
if (inarray(4]> 81) inarray(4] =81; netsum += inarray[4] * .164n17;
inarray[4] = 2 * (inarray(4]- 80) -1; netsum += inarray[5] * .6168813;
=
if (inarray(5]< 90) inarray(5] 90; netsum += inarray(7] * .6266463;
=
if (inarray[5]> 91) inarray[5) 91; feature2[1) =exp(-netsum * netsum);
=
inarray[5] 2 * (inarray[5] - 90) -1;
netsum = 9.219331;
if (inarray(6]< 85) inarray{6] = 85; netsum += inarray[O] * -3.278037;
if (inarray[6]> 86) inarray[6] =86; netsum += inarray[1] * 58.98454;
inarray[6] =2 * (inarray[6]- 85) -1; netsum += inarray(2] * .2089272;
if (inarray[7)< 65) inarray(7] = 65; netsum += inarray(4] * -9.568002;
if (inarray(7]> 66) inarray(7] = 66; netsum += inarray(5] * -9.28n02;
inarray[7] = 2 * (inarray(7] - 65) -1 ; netsum += inarray[6] * -9.459937;
200
netsum += inarray[7] * -9.373599;

feature2[2] = exp(-netsum * netsum); netsum = 3.438163;
netsum += inarray[O) * 5.135822;
netsum = .1123975; netsum += inarray[1] * 17.4249;
netsum += inarray[O] * -6.405803E-06; netsum += inarray[2) * 1.359593;
netsum += inarray[1] * -2.665343E-06; netsum += inarray[3] * -3.269688;
netsum += inarray[2] * 8.860962E-06; netsum += inarray[4] * -3.337133;
netsum += inarray[3] * .2087619; netsum += inarray[5) * -3.452521;
netsum += inarray[4] * 2.793559E-02; netsum += inarray(6) * -3.259282;
netsum += inarray[5] * -4.532864E-02; netsum += inarray[7] * -3.270801;
netsum += inarray[6] * -5.941014E-02; feature2(8] = exp(-netsum * netsum);
netsum += inarray[7) * -1.956329E-02;
feature2[3] = exp(-netsum * netsum); netsum = .1490578;
netsum += inarray[OJ * .2590984;
netsum = -.526773; netsum += inarray[1] * 8.684754E-02;
netsum += inarray[O] * -1 0.89583; netsum += inarray[2] * 5.173325E-03;
netsum += inarray[1] * 2.047482; netsum += inarray[3] * .2684744;
netsum += inarray[2] * 4.889545; netsum += inarray[4) * -.1996794;
netsum += inarray[3] * .5687325; netsum += inarray[5) * .2253343;
netsum += inarray{4] * .7594013; netsum += inarray[6) * -.2272567;
netsum += inarray[5] * .5337099; netsum += inarray[7] * -.1379637;
netsum += inarray[6] * .6190051; feature2(9] = exp(-netsum * netsum);
netsum += inarray[7) * .5608106;
feature2[4] = exp(-netsum * netsum); netsum =-.1414636;
netsum += inarray[O) * -10.45879;
netsum = -4.651912; netsum += inarray[1] * 9.712525;
netsum += inarray(O] * -38.8163; netsum += inarray(2] * 1.198444;
netsum += inarray[2] * 7.97945; netsum += inarray(4] * 4.029226E-02;
netsum += inarray[3] * 4.463066; netsum += inarray[5) * .1389309;
netsum += inarray[4] * 4.650092; netsum += inarray(6] * -.1334005;
netsum += inarray[6] * 4.749206; feature2[10] = exp(-netsum * netsum);
feature2[5] = exp(-netsum * netsum); netsum = -.9075661;
netsum += inarray[O) * 6.72969;
netsum = -8.031471; netsum += inarray[1) * -10.79017;
netsum += inarray[O] * -50.96907; netsum += inarray(2) * -3.983727;
netsum += inarray[2] * .9734847; netsum += inarray[4] * 1.118063;
netsum += inarray(3] * 8.087894; netsum += inarray[5] * 1.172194;
netsum += inarray[4] * 8.236326; netsum += inarray[6] * 1.323785;
netsum += inarray(5) * 8.2223; netsum += inarray[7) * 1.001575;
feature2[6] = exp(-netsum * netsum); netsum = -2.070767;
netsum += inarray(O] 4.011036;
netsum = -2.913704; netsum += inarray(1] -16.54174;
netsum += inarray(O] * -33.56334; netsum += inarray[2] -1. 735263;
netsum += inarray[2] * 4.7988; netsum += inarray[4) * 1.935186;
netsum += inarray[3] * 3.132398; netsum += inarray[5) * 2.011906;
netsum += inarray[4] * 3.302194; netsum += inarray[6] * 1.9181 06;
feature2[7] = exp(-netsum * netsum);
201
netsum =-9.889485E-02; netsum += inarray[1] * 8.064013;

netsum += inarray[O] * -13.41075; netsum += inarray[2) * -2.175391 E-02;
netsum += inarray[1] * 10.21087; netsum += inarray[3] * -1.160581;
netsum += inarray[2] * 2.568665; netsum += inarray(4] * -1.152956;
netsum += inarray[3] * 3.812202E-02; netsum += inarray(5] * -.8810059;
netsum += inarray[4] * .2268677; netsum += inarray[6] * -. 756901;
netsum += inarray[5] * -8.617245E-02; netsum += inarray[7] * -.8113878;
netsum += inarray[6] * .11723; feature3[1] =tanh(netsum);
feature2[13] =exp(-netsum * netsum); netsum =-.6663667;
netsum += inarray(O] * .4558362;
netsum = 7.889425; netsum += inarray(1] * .1165736;
netsum += inarray[O] * -1.025794; netsum += inarray[2] * .3560349;
netsum += inarray(1] * 51.23505; netsum += inarray[3) * .7350841;
netsum += inarray[4] * -8.004015; netsum += inarray[6) * .685376;
netsum += inarray[5] * -7.816721; netsum += inarray(7] * .3365965;
netsum += inarray[6] * -7.909219; feature3(2] =tanh(netsum);
netsum += inarray[7] * -8.186836;
=
feature2[14] exp(-netsum * netsum); netsum = -.8741248;
netsum += inarray[O] * -12.54293;
netsum = -1.587871; netsum += inarray[1] * -.9860775;
netsum += inarray[O] * -10.33541; netsum += inarray(2] * 4.973096;
netsum += inarray[1] * -1.428747; netsum += inarray[3) * 1.054954;
netsum += inarray[6] * 1.252591; =
feature3[3] tanh(netsum);
feature2(15) = exp(-netsum * netsum); netsum = .43859;
netsum += inarray[O] * -.2645646;
netsum = -.193417; netsum += inarray[1] * -.7133281;
netsum += inarray(O] * 2.251587E-03; netsum += inarray[2] * -.3505348;
netsum += inarray[1] * -1.502392E-03; netsum += inarray[3) * -.8587748;
netsum += inarray[2] * -8.304471 E-03; netsum += inarray[4] * -.8542516;
netsum += inarray[3] * -8.312319E-03; netsum += inarray(5] * -.5260545;
netsum += inarray[4] * .2180088; netsum += inarray(6] * -.370869;
netsum += inarray(5) * -.2585248; netsum += inarray[7] * -.6366007;
netsum += inarray[6] * -.2890495; =
feature2[16] =exp(-netsum * netsum); =
netsum -.1514026;
netsum = -.5446295; netsum += inarray(1] * 5.89672;
netsum += inarray[O] * .6374514; netsum += inarray(2] * .7242751;
netsum += inarray(1] * .6920365; netsum += inarray[3] * -4.399207E-02;
netsum += inarray(2] * .3369457; netsum += inarray[4) * 2.897635E-02;
netsum += inarray(4] * .4213045; netsum += inarray[6] * 2.682449E-02;
netsum += inarray[5] * .4851378; netsum += inarray[7] -.022238;
netsum += inarray[6] * .45811 05; feature3[5) =tanh(netsum);
feature3[0] =tanh(netsum); netsum =-3.995313;
netsum = 1.193857; netsum += inarray[1] * -22.62037;
netsum += inarray[O] * 1.641722;
202
netsum += inarray[21 * 2.595698; netsum += inarray[41 -.6061106;

netsum += inarray[3] * 4.176915; netsum += inarray[5] * -. 7596001 ;
netsum += inarray[41 * 3.853969; netsum += inarray[61 * -.7474791;
netsum += inarray[51 4.041949; netsum += inarray[7] * -.8009327;
netsum += inarray[61 * 4.285523; feature3[11] =tanh(netsum);
=
feature3[61 tanh(netsum); netsum = -1.634588;
netsum += inarray[01 -17.37486;
netsum = .5269387; netsum += inarray[11 3.547589;
netsum += inarray[01 * -9.609886E-02; netsum += inarray[21 2.052678;
netsum += inarray[11 * -.6702701; netsum += inarray[31 * 1.930658;
netsum += inarray[2] * -.3882791; netsum += inarray[4] * 1.845392;
netsum += inarray[51 -.7362946; netsum += inarray[7] * 2.183632;
netsum += inarray[61 * -.3472958; feature3[12] =tanh(netsum);
netsum += inarray[7] -.7998279;
feature3[7] = tanh(netsum); netsum =-9.631815E-02;
netsum += inarray[O] * .3820803;
=
netsum .9592593; netsum += inarray[1 1 -3.812609;
netsum += inarray[01 .6862443; netsum += inarray[21 -5.872171;
netsum += inarray[11 9.207538; netsum += inarray[31 -3.980106E-02;
netsum += inarray[21 -.1581 033; netsum += inarray(41 -1.262406E-02;
netsum += inarray[31 -1.504784; netsum += inarray[5] * .1630763;
netsum += inarray[41 -1.542509; netsum += inarray[61 * .231212;
netsum += inarray[51 -1.291986; netsum += inarray[7] * .126016;
netsum += inarray[61 -1.00055; =
netsum += inarray[7] -1.462338;
feature3[8] =tanh(netsum); netsum = 1.853561;
netsum += inarray[01 5.926773;
netsum = .4774549; netsum += inarray[1 1* 11.271 09;
netsum += inarray[01 * 4.897983; netsum += inarray(21 * -1.580979;
netsum += inarray[11 * 4.841372; netsum += inarray[3)* -1.549403;
netsum += inarray[21 * -.3125938; netsum += inarray[4]* -1.962914;
netsum += inarray[31 * -.8938413; netsum += inarray[51 * -1.550027;
netsum += inarray[4]* -.8496583; netsum += inarray[6] * -1.760502;
netsum += inarray(5]* -.5408561; netsum += inarray[7] * -1.985259;
netsum += inarray[61 -.7457334; feature3[14] = tanh(netsum);
netsum += inarray[7] -1.029791;
feature3[91 = tanh(netsum); netsum = 3.581756;
netsum = 7.919343; netsum += inarray[1]* 21.23032;
netsum += inarray[01 9.217402; netsum += inarray[21 * 4.738927E-02;
netsum += inarray[11 41.68781; netsum += inarray[3] * -3.675248;
netsum += inarray[21 1.930244; netsum += inarray[41 * -3.487715;
netsum += inarray[31 -7.840027; netsum += inarray[5] * -3.29634;
netsum += inarray[41 -7.859685; netsum += inarray[6] * -3.712868;
netsum += inarray[5]* -7.954023; netsum += inarray[7] * -3.266392;
netsum +"' inarray[61 -7.981675; feature3[15] =tanh(netsum);
netsum += inarray[?J -8.037846;
feature3[10] =tanh(netsum); =
netsum -2.656711 E-02;
netsum += inarray[01 .2916313;
netsum = .7268276; netsum += inarray[11 1.117193;
netsum += inarray[O]* -.426102; netsum += inarray[2]* .3886688;
netsum += inarray[11 * -.584038; netsum += inarray[3]* .2945068;
netsum += inarray[21 -.1223907; netsum += inarray[41 * .3311472;
netsum += inarray[3] * -.3087343;
203

netsum += inarray[6] * -8.800162E-02; feature4[4] =1 - exp(-netsum * netsum);
feature3[16] =tanh(netsum); netsum =2.346058;
netsum = .3890214; netsum += inarray[1) * -34.7388;
netsum += inarray[O] * 3.036166; netsum += inarray[2] * -5.455485;
netsum += inarray[1] * .9331115; netsum += inarray[3] * -2.306767;
netsum += inarray[2] * -.209792; netsum += inarray[4] * -2.129963;
netsum += inarray[6] * -.1493222; feature4[5) = 1 - exp(-netsum * netsum);
netsum += inarray[7] * -.4112692;
=
feature4[0] 1 - exp(-netsum * netsum); netsum = 5.319527;
netsum = 5.366681; netsum += inarray[1) * 31.75972;
netsum += inarray[O] * 40.16782; netsum += inarray[2] * .884829;
netsum += inarray[2] * -5.302598; netsum += inarray[4] * -5.498423;
netsum += inarray[3] * -5.653204; netsum += inarray[5) * -5.446029;
netsum += inarray[4] * -5.613995; netsum += inarray(6] * -5.16186;
netsum += inarray[6] * -5.572027; =
feature4[6) 1 - exp(-netsum * netsum);
netsum += inarray[7] * -5.56393;
feature4[1] = 1 - exp(-netsum * netsum); netsum =-.4315916;
netsum += inarray[O] * 8.665919E-02;
=
netsum .7021881; netsum += inarray[1] * .3110738;
netsum += inarray[O] * 1.341746; netsum += inarray[2] * .5757611;
netsum += inarray[2] * 4.117766; netsum += inarray(4) * .2672513;
netsum += inarray[4) * -1.002733; netsum += inarray[6) * .5837115;
netsum += inarray[6] * -1.101477; =
feature4[7] 1 - exp(netsum * netsum);
netsum += inarray[7] * -1.07348;
feature4[2] = 1 - exp(-netsum * netsum); netsum = 1.374799;
netsum += inarray(O] * 13.65605;
netsum += inarray[O] * -1.357019; netsum += inarray[2] * -5.266515;
netsum += inarray[2] * .3162687; netsum += inarray[4] * -1.440267;
netsum += inarray[6] * -1.148869; feature4[8] =1 - exp(-netsum * netsum);
netsum += inarray[7] * -1.447849;
feature4[3] =1 - exp(-netsum * netsum); netsum = 1.610957;
=
netsum -2.897003; netsum += inarray[1) * -1.670251;
netsum += inarray[O] * 2.300158; netsum += inarray[2] * -.9508961;
netsum += inarray[1] * -19.50001; netsum += inarray[3]* -1.496588;
netsum += inarray[4] * 2.993273; netsum += inarray(6] * -1.554744;
netsum += inarray[6] * 3.098715; feature4[9] =1 - exp(-netsum * netsum);
204
netsum = .3727364; netsum += inarray[1) * -.6207746;

netsum += inarray(O] * -.1 080832; netsum += inarray[2) * -2.762791;
netsum += inarray[1] * -.3784903; netsum += inarray[3) * -2.250782;
netsum += inarray(3] * -.512477; netsum += inarray[5) * -2.100881;
netsum += inarray[6] * -.4042488; feature4[15) =1 - exp(-netsum * netsum);
netsum += inarray[7] * -.2496439;
feature4[10] =1 - exp(-netsum * netsum); netsum = .7315203;
netsum += inarray[O) * -7.771874E-02;
netsum =-.5800024; netsum += inarray[1) * 9.509701E-02;
netsum += inarray[O] * -15.35357; netsum += inarray[2) * -.1093585;
netsum += inarray(1] * -16.49053; netsum += inarray[3) * -.7124208;
netsum += inarray[2] * -.2846282; netsum += inarray[4] * -.7139043;
netsum += inarray(3] * .3137432; netsum += inarray[5) * -.5349607;
netsum += inarray[4] * .4418969; netsum += inarray[6) * -.4433709;
netsum += inarray[6] * .8445359; feature4[16) = 1 - exp(-netsum * netsum);
feature4[11] =1 - exp(-netsum * netsum); netsum = -.1594291;
netsum += feature2[0) * 9.982102E-02;
netsum = 1.078498; netsum += feature2[1) * 9.853359E-02;
netsum += inarray(O] * -14.58774; netsum += feature2[2) * 1.160011 E-02;
netsum += inarray[1) * 16.51487; netsum += feature2[3) * -7.884867E-03;
netsum += inarray[2] * -.351595; netsum += feature2[4) * 5.041399E-02;
netsum += inarray[3) * -1.332972; netsum += feature2[5] * -7.010787E-02;
netsum += inarray[4) * -1.048703; netsum += feature2[6) * -1. 703526E-03;
netsum += inarray[5) * -1.221178; netsum += feature2[7] * -4.624376E-02;
netsum += inarray[6) * -1.066221; netsum += feature2[8] * 3.095055E-02;
netsum += inarray[7] * -1.290772; netsum += feature2[9] * .1534905;
feature4[12] =1 - exp(-netsum * netsum); netsum += feature2[10] * 7.450251E-02;
netsum += feature2[11] * 2.583472E-02;
netsum = -1.358942; netsum += feature2[12) * 9.738775E-02;
netsum += inarray[O) * -3.852341; netsum += feature2[13) * -5.756174E-02;
netsum += inarray(1) * -3.067793; netsum += feature2[14) * -6.894302E-02;
netsum += inarray(2] * -5.765327; netsum += feature2(15) * -.0865636;
netsum += inarray[3) * 1.077273; netsum += feature2[16) * 4.068426E-02;
netsum += inarray[4] * 1.420844; netsum += -.1389937;
netsum += inarray[5) * 1.373874; netsum += feature3[0] * .275925;
netsum += inarray(6) * 1.017596; netsum += feature3[1) * .7789719;
netsum += inarray[7] * 1.260324; netsum += feature3[2) * -9.393725E-02;
feature4[13] =1 - exp(-netsum * netsum); netsum += feature3[3) * -.1160613;
netsum += feature3[4] * -.2673727;
netsum =-.5035008; netsum += feature3[5] * -.3569014;
netsum += inarray[O) * -5.019427E-02; netsum += feature3[6) * 6.152876E-02;
netsum += inarray[1) * .4097015; netsum += feature3[7) * -.2406653;
netsum += inarray[2) * .2812212; netsum += feature3[8) * .6653302;
netsum += inarray[3) * .664559; netsum += feature3[9] * .8707212;
netsum += inarray(4) * .5329266; netsum += feature3[10] * -2.595287E-02;
netsum += inarray[5] * .3536009; netsum += feature3[11) * -7.001323E-02;
netsum += inarray[6] * .3595358; netsum += feature3[12] * -.1434766;
netsum += inarray[7) * .6405866; netsum += feature3[13] * 2.249397E-02;
=
feature4[14) 1 - exp(-netsum * netsum); netsum += feature3[14) * -.2505375;
netsum += feature3[15] * 1.133528;
netsum = 2.45554; netsum += feature3[16] * .284638;
netsum += inarray(O] * 18.59668;
205
netsum += .1000453; netsum += feature4[0] * -.5865219;

netsum += feature4(01 * -.5823139; netsum += feature4[11 * 6.878597E-02;
netsum += feature4[11 * .0685712; netsum += feature4[21 * .3076231;
netsum += feature4[31 * .1658631; netsum += feature4(4] * .1612958;
netsum += feature4[41 * .1620492; netsum += feature4[51 * 3.025419E-02;
netsum += feature4(51 * .0302265; netsum += feature4[61 * -9.807137E-02;
netsum += feature4[61 * -9.756247E-02; netsum += feature4[71 * -.2508459;
netsum += feature4[7] * -3.317256E-02; netsum += feature4[81 * -.19026;
netsum += feature4(8] * -.1874768; netsum += feature4[9] * 1.629992;
netsum += feature4[91 * 1.631775; netsum += feature4[101 * -.3105591;
netsum += feature4[10] * -3.060556E-02; netsum += feature4[111 * -1.302134;
netsum += feature4[11] * -1.299931; netsum += feature4[12) * -1.178028E-02;
netsum += feature4[121 * -1.186932E-02; netsum += feature4[131 * -6.479353E-02;
netsum += feature4[131 * -6.463331E-02; netsum += feature4[141 * 2.258279E-02;
netsum += feature4[14] * -.156519; netsum += feature4[151 * .1061629;
netsum += feature4[15] * .1 06286; netsum += feature4[16] * -6.916831E-02;
netsum += feature4[161 * -.2376102; outarray[1] = 1/ (1 + exp(-netsum));
outarray[01 = 1/ (1 + exp(-netsum));
netsum = .1985629;
=
netsum -6.428884E-02; netsum += feature2[0] * 9.914069E-02;
netsum += feature2[01 * .1 000523; netsum += feature2[1] * 9.673495E-02;
netsum += feature2(1] * 9.855926E-02; netsum += feature2[2] * 9.303743E-03;
netsum += feature2[21 * 1.133594E-02; netsum += feature2[3] * -.2547946;
netsum += feature2(31 * 8.363542E-02; netsum += feature2[4] * 4.962596E-02;
netsum += feature2[4] * 4.975718E-02; netsum += feature2[5] * -6.961165E-02;
netsum += feature2[5] * -7.038063E-02; netsum += feature2[6] * -6.79n03E-04;
netsum += feature2(6] * -2.697068E-03; netsum += feature2[7) * -.0459341;
netsum += feature2[7] * -4.650452E-02; netsum += feature2[8] * 3.090797E-02;
netsum += feature2(81 * 3.121 076E-02; netsum += feature2[91 * -8.292437E-02;
netsum += feature2[9] * .1 075884; netsum += feature2[10] * 7.472249E-02;
netsum += feature2[101 * 7.464791E-02; netsum += feature2[11] * 2.802641E-02;
netsum += feature2[11 1* 2.642348E-02; netsum += feature2[121 * 9.646337E-02;
netsum += feature2[12] * 9.723803E-02; netsum += feature2(131 * -5. 711888E-02;
netsum += feature2[13] * -5.719874E-02; netsum += feature2[14] * -6.988299E-02;
netsum += feature2(14] * -6.903163E-02; netsum += feature2[15] * -8.478034E-02;
netsum += feature2(15]* -8.605916E-02; netsum += feature2[16] * 7.623917E-02;
netsum += feature2[16] * -4.550292E-02; netsum += -.18998;
netsum += -.352198; netsum += feature3[0] * .3716987;
netsum += feature3(0] * .2160453; netsum += feature3[11 * .7722573;
netsum += feature3[1] * .7n6144; netsum += feature3[2] * -.2041326;
netsum += feature3[21 * .1321614; netsum += feature3[3) * -.1159883;
netsum += feature3(3] * -.1147544; netsum += feature3[4] * -.2287805;
netsum += feature3(4] * .205361; netsum += feature3[5] * -.3508427;
netsum += feature3[5] * -.3554764; netsum += feature3[61 * 6.650011 E-02;
netsum += feature3[6] * 6.118999E-02; netsum += feature3[7] * .1780408;
netsum += feature3(9) * .8721535; netsum += feature3[10] * -2.626068E-02;
netsum += feature3[101 * -2.623136E-02; netsum += feature3[11]" 1.342634E-02;
netsum += feature3[11 1* -.4207377; netsum += feature3[12] * -.1453275;
netsum += feature3[121 * -.1436497; netsum += feature3[13] * 2.584079E-02;
netsum += feature3[141 * -.2498246; netsum += feature3[15)" 1.141873;
netsum += feature3[151 * 1.134554; netsum += feature3(161 * .4249638;
netsum += feature3[161 * .2000191; netsum += -.1526113;
netsum += -1.270332E-03;
206
netsum += feature4[0) * -.5860531; netsum += feature4[11 * 6.891977E-02;

netsum += feature4[11 * 6.803294E-02; netsum += feature4[21 * .3050192;
netsum += feature4[31 * .1825872; netsum += feature4[4] * .1582266;
netsum += feature4[51 * .0297163; netsum += feature4[61 * -.1031753;
netsum += feature4[61 * -.1 064095; netsum += feature4[7] * -.1259796;
netsum += feature4[81 * -.184821; netsum += feature4[91 * 1.627391;
netsum += feature4[91 * 1.633342; netsum += feature4[101 * -.3509837;
netsum += feature4[1 O] * -5.600537E-Q2; netsum += feature4[11] * -1.303012;
netsum += feature4[11 1* -1.294336; netsum += feature4[12] * -1.154152E-Q2;
netsum += feature4[121 * -1.171703E-02; netsum += feature4[131 * -6.571095E-02;
netsum += feature4[131 * -6.570626E-02; netsum += feature4[141 * -.1654664;
netsum += feature4[151 * .1 063571; netsum += feature4[16] * .0751171;
netsum += feature4[16] * -.2105135; =
outarray[3] 1/ (1 + exp(-netsum));
outarray[21 =1/ (1 + exp(-netsum));
=
netsum .2015459;
netsum = -.3908116; netsum += feature2[01 * .0987739;
netsum += feature2[11 * 9.762753E-Q2; netsum += feature2[21 * 8.385834E-03;
netsum += feature2[21 * 9.700065E-Q3; netsum += feature2[3) * .2482599;
netsum += feature2[31 * 4.165382E-Q2; netsum += feature2[41 * 4.948243E-Q2;
netsum += feature2[4) * 4.816473E-02; netsum += feature2[5] * -6.930164E-02;
netsum += feature2[51 * -7.062761E-02; netsum += feature2[6) * 9.54523E-05;
netsum += feature2[7) * -4.681948E-02; netsum += feature2[8) * 3.083443E-02;
netsum += feature2[81 * 3.176474E-Q2; netsum += feature2[9] * -.1761675;
netsum += feature2[9) * -.1045747; netsum += feature2{10] * 7.476703E-Q2;
netsum += feature2[101 * 7.504913E-02; netsum += feature2[11 1* 2.880708E-02;
netsum += feature2[11] * 2.865907E-02; netsum += feature2[121 * 9.609863E-02;
netsum += feature2[121 * 9.644988E-02; netsum += feature2[13) * -5.704242E-02;
netsum += feature2[131 * -5.629505E-Q2; netsum += feature2[141 * -7.027869E-Q2;
netsum += feature2[14) * -6.967079E-Q2; netsum += feature2[15) * -8.413721E-02;
netsum += feature2[151 * -8.418839E-Q2; netsum += feature2[16] * -.1651714;
netsum += feature2[161 * 1.503857E-02; netsum += -2.817038E-03;
netsum += -.1721451; netsum += feature3[01 * 4.778834E-03;
netsum += feature3[1] * .7715641; netsum += feature3[21 * 2.340295E-02;
netsum += feature3[21 * .0468402; netsum += feature3[31 * -.1163804;
netsum += feature3[31 *- .1124184; netsum += feature3[41 * -.2041107;
netsum += feature3[41 * -.1858345; netsum += feature3[5] * -.348613;
netsum += feature3[5) * -.3495999; netsum += feature3[61 * 6.873964E-02;
netsum += feature3[6) * 6.304035E-02; netsum += feature3[71 * .1158195;
netsum += feature3[7] * .1234029; netsum += feature3[81 .6612103;
netsum += feature3[9] * .8721729; netsum += feature3[10] * -2.633168E-Q2;
netsum += feature3[10) * -2.696152E-02; netsum += feature3[11) * -.1492229;
netsum += feature3[11) * .1084971; netsum += feature3[12J * -.146102;
netsum += feature3[12] * -.1449545; netsum += feature3[13J * .0270249;
netsum += feature3[13] * 2.403444E-02; netsum += feature3[141 * -.2441584;
netsum += feature3[14] * -.2461066; netsum += feature3[15) * 1.145192;
netsum += feature3[15] * 1.140569; netsum += feature3[161 * .5164756;
netsum += feature3[16) * .1114481; netsum += -.3051459;
netsum += 6.324437E-02; netsum += feature4[0] * -.5864208;
207
netsum += feature4[2]* .309004; netsum += feature4[3) * .1765742;

netsum += feature4[3] * .1890782; netsum += feature4[4) * .1591887;
netsum += feature4[8] * -.1828259; netsum += feature4[9]* 1.627272;
netsum += feature4[9] * 1.634616; netsum += feature4[10] * -.1067787;
netsum += feature4[10] * -.2380027; netsum += feature4[11] * -1.304154;
netsum += feature4[11] * -1.291197; netsum += feature4[12] * -1.160129E-02;
netsum += feature4[12] * -1.168022E-02; netsum += feature4[13) * -6.539606E-02;
netsum += feature4[14] * -.1960984; netsum += feature4[15) * .1 05958;
netsum += feature4[15] * .1 064254; netsum +=feature4[16)* .1311692;
netsum += feature4[16] * -.1863879; outarray[5] = 1/ (1 + exp(-netsum));
outarray[4] = 1/ (1 + exp(-netsum));
netsum = -.3260403;
netsum = -.1052504; netsum += feature2[0) * .1 007293;
netsum += feature2[0] * .1003509; netsum += feature2(1) * 9.954499E-02;
netsum += feature2[1] * 9.811 052E-02; netsum += feature2[2) * 1.239564E-02;
netsum += feature2[3] * -.2122504; netsum += feature2[4] * 4.955441 E-02;
netsum += feature2[6) * -4.137163E-03; netsum += feature2[7] * -.0469407;
netsum += feature2[7] * -4.686007E-02; netsum += feature2[8) * 3.159972E-02;
netsum += feature2[8] * 3.176082E-02; netsum += feature2[9) * .1862136;
netsum += feature2[9] * -3.145891 E-02; netsum += feature2[10] * 7.467406E-02;
netsum += feature2[10] * 7.496937E-02; netsum += feature2[11) * 2.581532E-02;
netsum += feature2[12] * 9.672735E-02; netsum += feature2[13) * -5.708216E-02;
netsum += feature2[16]* -.2022875; netsum += -.3426494;
netsum += 2.032227E-02; netsum += feature3[0] * 2.163002E-02;
netsum += feature3[1) * .7736316; netsum += feature3[2) * -1.346784E-02;
netsum += feature3(2) * .2309931; netsum += feature3[3] * -.113593;
netsum += feature3[5] * -.3514898; netsum += feature3[6] * 5. 790848E-02;
netsum += feature3[8) * .6633248; netsum += feature3[9) * .8761922;
netsum += feature3[10] * -2.685198E-02; netsum += feature3(11) * -.2817113;
netsum += feature3[13) * 2.253906E-02; netsum += feature3[14) * -.2516357;
netsum += feature3[14) * -.2474901; netsum += feature3[15] * 1.130661;
netsum += feature3[15) * 1.138046; netsum += feature3[16] * 3.666928E-02;
netsum += feature3[16] * 8.818797E-02; netsum += 5. 705023E-02;
netsum += -.1232352; netsum += feature4[0) * -.5886109;
netsum += feature4[2]* .3053317; netsum += feature4[3) * .1615161;
208

netsum += feature4[5] * 3.055244E-02; netsum += feature4[6] * -.1 008639;
netsum += feature4[1 O] * 9.149173E-02; netsum += feature4(11] * -1.303181;
netsum += feature4[13] * -6.441652E-02; netsum += feature4[14} * .0529286;
netsum += feature4[14] * 6.120576E-02; netsum += feature4[15} * .1060135;
netsum += feature4[15] * .1 059878; netsum += feature4[16] * .1073704;
netsum += feature4[16] * 7.528453E-02; outarray[7] = 1/ (1 + exp(-netsum}};
=
netsum -.2938153;
netsum = -.118895; netsum += feature2[0} * 9.912894E-02;
netsum += feature2[0] * .1 002182; netsum += feature2[1} * 9.685824E-02;
netsum += feature2[1] * 9.804522E-02; netsum += feature2[2} * .0095728;
netsum += feature2(2] * 1.037404E-02; netsum += feature2[3] * -.2825736;
netsum += feature2(4] * 4.868957E-02; netsum += feature2[5} * -6.955232E-02;
netsum += feature2(6] * -3.749672E-03; netsum += feature2[7] * -.0458745;
netsum += feature2[8] * 3.161895E-02; netsum += feature2(9] * -5.1 05687E-02;
netsum += feature2{9] * -2.559258E-02; netsum += feature2[10] * 7.465762E-02;
netsum += feature2[10] * 7.491428E-02; netsum += feature2[11} * 2.768002E-02;
netsum += feature2[11] * 2. 782566E-02; netsum += feature2[12} * 9.657522E-02;
netsum += feature2[16] * .0575963; netsum += -.327196;
netsum += 5.793406E-02; netsum += feature3[0] * .2830801;
netsum += feature3(1] * .7738645; netsum += feature3[2) * -4.565427E-02;
netsum += feature3[3] * -.1131044; netsum += feature3(4) * .0761206;
netsum += feature3[4] * -.396398; netsum += feature3(5) * -.3517344;
netsum += feature3[5) * -.3517993; netsum += feature3[6) * 6.616295E-02;
netsum += feature3[6] * 6.206824E-02; netsum += feature3[7) * -.2690493;
netsum += feature3[15] * 1.138089; netsum += feature3{16) * .4444143;
netsum += feature3[16] * .1225536; netsum += .1857142;
netsum += feature4[0] * -.5930761; netsum += feature4[1] * 6. 799798E-02;
netsum += feature4[2) * .3057766; netsum += feature4[3] * .1805023;
n~tsum += feature4[4] * .1593465; netsum += feature4[5) * 2.973893E-02;
209
netsum += feature4(6] * -.1054388; netsum += feature4[7J * -.1093916;

netsum += feature4(7] * 6.904215E-02; netsum += feature4[8] * -.1913845;
netsum += feature4[9] * 1.633796; netsum += feature4[10] * O;
netsum += feature4[16] * .2213631; outarray(9] =1/ (1 + exp(-netsum));
outarray[8] =1/ (1 + exp(-netsum));
netsum = -6.522733E-02;
netsum = .133593; netsum += feature2[0] * -3.054574E-02;
netsum += feature2[1] * 9.827905E-02; netsum += feature2(2] * -1.114519E-02;
netsum += feature2[2] * 1.085068E-02; netsum += feature2[3J * 3.359599E-02;
netsum += feature2[3] * -.2988594; netsum += feature2[4] * -2.340689E-02;
netsum += feature2(5] * -7.044494E-02; netsum += feature2[6] * .2724735;
netsum += feature2[6] * -3.151 041 E-03; netsum += feature2[7J * -8. 708645E-02;
netsum += feature2[10] * 7.476057E-02; netsum += feature2[11] * 4.851996E-02;
netsum += feature2[16] * -.339539; netsum += -.111 0575;
netsum += 8.342457E-03; netsum += feature3[01 * 6.538279E-02;
netsum += feature3[0] * 3.083527E-02; netsum += feature3(1] * .06424;
netsum += feature3[2] * -1.526052E-02; netsum += feature3[31 * .0426062;
netsum += feature3(4] * 4.378567E-02; netsum += feature3[5) * .1970609;
netsum += feature3[6] * 6.163523E-02; netsum += feature3(7] * -.1481063;
netsum += feature3(7] * -.1937318; netsum += feature3[8) * -3.639089E-02;
netsum += feature3[9] * .8722742; netsum += feature3[1 O] * .1 039559;
netsum += feature3[14] * -.2486685; netsum += feature3[15) 9.513943E-02;
netsum += feature3[15J * 1.13624; netsum += feature3[16] * 8.088798E-02;
netsum += feature4[2J * .3067056; netsum += feature4[3J * .026295;
netsum += feature4[3J * .1725509; netsum += feature4[4] * 7.186238E-02;
210
netsum += feature4[8] * -.4842804; netsum += feature4(9] * -1.007305;

netsum += feature4[12] * 1.301 063E-02; netsum += feature4[13] * -5.284429E-02;
netsum += feature4[14] * -.2203403; netsum += feature4[15] * 3.333941 E-02;
netsum += feature4[16] * -3.663665E-02; outarray[11] = 1/ (1 + exp(-netsum));
netsum =-.2572922;
=
netsum -.0501876; netsum += feature2[0) * -2.868118E-02;
netsum += feature2[11] * 4. 790636E-02; netsum += feature2[12] * -1.990342E-02;
netsum += feature2[12] * -2.048941 E-02; netsum += feature2[13] * -3.711128E-02;
netsum += feature2[16] * 3.804721E-02; netsum += -9.789654E-02;
netsum += .1453397; netsum += feature3[0] * .276757;
netsum += feature3[4] * -.4069374; netsum += feature3(5] * .1906045;
netsum += feature3[6) * -.18615; netsum += feature3[7] * .1815547;
netsum += feature3[7] * -.3101534; netsum += feature3[8) * -3.319318E-02;
netsum += feature3[9] * -9.057976E-02; netsum += feature3[1 O] * .1 044195;
netsum += feature3[1 O] * .1 040554; netsum += feature3[11] * -7.148815E-02;
netsum += feature3[16] * -2.256233E-02; netsum += O;
netsum += feature4[1] * 9.208061E-02; netsum += feature4{2] * .660675;
netsum += feature4[2] * .6587797; netsum += feature4(3] * 7.924065E-03;
netsum += feature4[5] * -3.267801 E-02; netsum += feature4[6] * .1679284;
netsum += feature4[8] * -.4858644; netsum += feature4[9) * -1.005204;
211
netsum += feature4[1 O]* -8.875046E-02; netsum += feature4[11] * .3513575;

netsum += feature4[13] * -5.1685nE-02; netsum += feature4[14] * -.1401169;
netsum += feature4[16] * -.2460766; outarray[13] =1/ (1 + exp(-netsum));
netsum =-.2893554;
netsum = .1022643; netsum += feature2[0]* -2.932112E-02;
netsum += feature2[0] * -3.038034E-02; netsum += feature2[1] * 4.450821 E-02;
netsum += feature2[2] * -1.1 02302E-02; netsum += feature2[3]* -.172492;
netsum += feature2[3] * -.288521; netsum += feature2[4] * -2.130971 E-02;
netsum += feature2[5) * -4.067944E-02; netsum += feature2[6] * .274863;
netsum += feature2[7] * -8. 705833E-02; netsum += feature2[8] * -4.975092E-02;
netsum += feature2[8) * -4.944885E-02; netsum += feature2[9]* .2969054;
netsum += feature2[9] -.0159888; netsum += feature2[10] * -3.098844E-03;
netsum += feature2[10) * -2.764n4E-03; netsum += feature2[11] * 4.642057E-02;
netsum += feature2[11) 4.827134E-02; netsum += feature2[12] * -.0198223;
netsum += feature2[12] * -2.071976E-02; netsum += feature2[13) * -3. n9371 E-02;
netsum += feature2[16] * -.1916261; netsum += -.1829565;
netsum += feature3[0) * .1117928; netsum += feature3[1) * 7.196278E-02;
netsum += feature3[1] * 6.520297E-02; netsum += feature3[2]* .131328;
netsum += feature3[2] * .2673859; netsum += feature3[3]* 3.869554E-02;
netsum += feature3[3) * .0420403; netsum += feature3(4] * .1208717;
netsum += feature3[4) * -9.890612E-02; netsum += feature3[5]* .1894858;
netsum += feature3[5) * .1961351; netsum += feature3[6] * -.1863716;
netsum += feature3[8)* -3.593513E-02; netsum += feature3(9) * -9.454666E-02;
netsum += feature3[9] * -9.439149E-02; netsum += feature3[1 O] * .1 046807;
netsum += feature3[12] * .2124608; netsum += feature3(13] * -.1209876;
netsum += feature3[13) * -.1193822; netsum += feature3[14] * -4.699887E-02;
netsum += feature3[15] 9.395628E-02; netsum += feature3[16] * .2557569;
netsum += feature3[16] * .1 070056; netsum += -.2619454;
netsum += feature4[0) * .2048221; netsum += feature4[1] * 9.176635E-02;
netsum += feature4[3) * 2.399607E-02; netsum += feature4[4] * 7.610845E-02;
netsum += feature4[5] * -3.283n9E-02; netsum += feature4[6] * .1668152;
netsum += feature4[8) * -.4835904; netsum += feature4[9] * -1.001264;
netsum += feature4[9] * -1.006257; netsum += feature4[10) * -.128107;
212
netsum += feature4[12) * 1.317331 E-02; netsum += feature4[13) * -5.372618E-02;

netsum += feature4(13] * -5.168484E-02; netsum += feature4[14) * -9.951999E-02;
netsum += feature4(14] * -.2783349; netsum += feature4[15) * 3.375071E-02;
netsum += feature4[16) * 7.981069E-02; outarray[15] =1/ (1 +exp(-netsum));
=
outarray[14] 1/ (1 + exp(-netsum));
netsum = 6.613023E-02;
netsum =-.2741528; netsum += feature2[0) * -3.006203E-02;
netsum += feature2[5] * -4.047732E-02; netsum += feature2(6] * .2748731;
netsum += feature2[8] * -4.964071 E-02; netsum += feature2[9) * .1812844;
netsum += feature2[14] * -2.295979E-03; netsum += feature2[15) * -.1155424;
netsum += .129195; netsum += feature3[0J * -2.188879E-02;
netsum += feature3[0] * .0815168; netsum += feature3(1J * 6.964681E-02;
netsum += feature3[1] * 6.385499E-02; netsum += feature3[2J * 1.961952E-02;
netsum += feature3[2] * .1155264; netsum += feature3[3J * 3.873118E-02;
netsum += feature3[3) * 4.094482E-02; netsum += feature3[4J * -.0572844;
netsum += feature3[4) * -5.578401 E-02; netsum += feature3[5J * .1915997;
netsum += feature3[5) * .1971979; netsum += feature3[6J * -.1847646;
netsum += feature3[7] * .2118505; netsum += feature3[8) * -3.385823E-02;
netsum += feature3[9] * -9.800705E-02; netsum += feature3[1 O) * .1 045436;
netsum += feature3[10] * .1040418; netsum += feature3(11] * -8.491701 E-02;
netsum += feature3[13) * -.1173377; netsum += feature3[14) * -4.537604E-02;
netsum += -.2029265; netsum += feature4(0] * .2171185;
netsum += feature4[3) * 2.828936E-02; netsum += feature4[4) * 7.481817E-02;
netsum += feature4[5] * -3.297894E-02; netsum += feature4[6) * .163733;
netsum += feature4[7] * -.1263719; netsum += feature4(8] * -.4793789;
netsum += feature4(9) * -1.00513; netsum += feature4[10] * -5.337683E-03;
netsum += feature4[1 O] * 4.222365E-02; netsum += feature4[11] * .3546557;
netsum += feature4(11] * .3551157; netsum += feature4[12] * .0130378;
213

netsum += feature4[15] * 3.420901 E-02; netsum += feature4[16] * -5.902603E-02;
netsum += feature4[16] * -2.997049E-02; outarray[17] =1/ (1 + exp(-netsum));
netsum =-2.805811 E-02;
netsum =-.0871721; netsum += feature2[0] * 3.957041;
netsum += feature2[0] * -2.144521; netsum += feature2[1] * .1 062071;
netsum += feature2[3] * .2491 008; netsum += feature2[4] * .3139521;
netsum += feature2[16] * 3.641256E-02; netsum += -.2279016;
netsum += 1.273109E-02; netsum += feature3[0] * .4686097;
netsum += feature4[2] * .031376; netsum += feature4[3] * -1. 736894;
netsum += feature4[5] * -.1149004; netsum += feature4[6} * 2.201084;
netsum += feature4[11] * .0749438; netsum += feature4[12} * .5810279;
214
netsum += feature4[16] * -6.078743E-03; outarray(19) =1/ (1 + exp(-netsum));

outarray[18] =1/ (1 + exp(-netsum));
=
netsum -.681951;
netsum = -1.37511 E-03; netsum += feature2(0] * .4808471;
netsum += feature2[0) * -1.397079; netsum += feature2[1) * -.1439364;
netsum += feature2[2) * 1.354434; netsum += feature2[3) * -.6345702;
netsum += feature2[3) * .112401; netsum += feature2[4) * -.1102759;
netsum += feature2[4] * -.0386434; netsum += feature2(5] * 2.553549E-02;
netsum += feature2[5) * -.0525167; netsum += feature2[6) * -.1441805;
netsum += feature2[10] * 8.967161E-03; netsum +:: feature2[11] * .1960231;
netsum += feature2[11) * -.1367796; netsum += feature2[12] * -.452196;
netsum += feature2[14] * .2258358; netsum += feature2(15]* -.1299815;
netsum += -.1115558; netsum += feature3[0) * .3686935;
netsum += feature3[2] * .1883165; netsum += feature3[3)* -1.218814;
netsum += feature3[3] * 6.398771 E-02; netsum += feature3[4}* -.7585832;
netsum += feature3[4] * .1564406; netsum += feature3[5)* -1.282396;
netsum += feature3[7] * .4080826; netsum += feature3[8]* .7622097;
netsum += feature3[8] * .16485; netsum += feature3[9]* -6.598943E-02;
netsum += feature3[9] * 9.232281 E-02; netsum += feature3(10] * -.0955903;
netsum += feature3[14] * .1164118; netsum += feature3[15)* .7750067;
netsum += feature3[16] * -5.425857E-02; netsum += -.5938213;
netsum += feature4[2] * 3.217099E-02; netsum += feature4[3) * 3.42494;
netsum += feature4[3] * -1.153962; netsum += feature4[4) * 2.15602;
netsum += feature4[4) * -2.161218; netsum += feature4[5] * .2979617;
netsum += feature4[8) * -.2948339; netsum += feature4[9) * -.3730845;
netsum += feature4[11) * -2.133677; netsum += feature4[12] * -.1522277;
netsum += feature4[14] * -1.465682E-02; netsum += feature4(15} * 9.023207E-02;
netsum += feature4[16] * .1771962; outarray(20] =1/ (1 + exp(-netsum));
215
netsum =-.5055426; netsum += feature2[0] * -4.148044E-02;

netsum += feature2[0] "-.1817589; netsum += feature2[1] 1.467233;
netsum += feature2[1] * -.4879159; netsum += feature2[2] * -5. 765689E-02;
netsum += feature2[2] * -.4768394; netsum += feature2(3] * .151 0086;
netsum += feature2[4] * .1 058696; netsum += feature2[5] * -1.466597;
netsum += feature2(1 O] * -1.470395; netsum += feature2[11] * -.1587666;
netsum += feature2[11] * .5487649; netsum += feature2(12] * .1 055093;
netsum += feature2[13] * 1.068443; netsum += feature2[14] * -8.521164E-02;
netsum += feature2[14] * 1. 769008; netsum += feature2[15] * -.5445319;
netsum += feature2[15] * .7999319; netsum += feature2(16) * .4054246;
netsum += feature2[16] * -.389156; netsum += -4.177612E-02;
netsum += -.1361846; netsum += feature3(0] * -6.439663E-02;
netsum += feature3[6] * -1. 77958; netsum += feature3[7] * 5.095915E-02;
netsum += feature3[11] * -.3912142; netsum += feature3(12] * -1.308243;
netsum += feature4[4] * 1.349141; netsum += feature4[5] * -4.052002;
netsum += feature4[6] * -2.154003; netsum += feature4[7] * .1521398;
netsum += feature4{7] * -.6649521; netsum += feature4[8] * -1.630774;
netsum += feature4[11] "-.4604834; netsum += feature4[12] * 4.282573E-02;
netsum += feature4[16] * -.2782983; outarray(22] = 1/ (1 + exp(-netsum));
outarray[21) = 1/ (1 + exp(-netsum));
netsum =-.1764495;
netsum = .3075594;
216

netsum += feature2[1] * .511911; netsum += feature2[21 * 3.876311 E-03;
netsum += feature2[6] * -2.475118; netsum += feature2[7] * -1.373084;
netsum += feature2[1 O] * 1.61212; netsum += feature2[11] * .210614;
netsum += feature2[16] * -.1 05497; netsum += .3007702;
netsum += -.4033448; netsum += feature3[0] * 4.357998E-02;
netsum += feature3[5] * -.0173098; netsum += feature3(61 * -.3823563;
netsum += feature3[10] * -.6468236; netsum += feature3[11 1* 5.432534E-02;
netsum += feature3[12) * .4594381; netsum += feature3[13] * -1.630619E-02;
netsum += -.6262275; netsum += feature4(0] * -1.575439;
netsum += feature4[0) * .2318635; netsum += feature4[1) * -1.607305;
netsum += feature4[1) * 1.554979; netsum += feature4[2] * .6066403;
netsum += feature4[3) * .1 001 018; netsum += feature4(4] * -.2672594;
netsum += feature4[5) * 3.032024; netsum += feature4[6) * .1167742;
netsum += feature4[7) * -.5528494; netsum += feature4[8) * .3037682;
netsum += feature4[9) * -.9421886; netsum += feature4[10] * 5.389816E-02;
netsum += feature4[101 * -.517553~; netsum += feature4[11] * -.9378299;
netsum += feature4[11 1* .8692129; netsum += feature4[12] * 1.085573E-02;
netsum += feature4[161 * -.4543906; outarray(241 =1/ (1 + exp(-netsum));
outarray[23) = 1/ (1 + exp(-netsum));
netsum =-.4102101;
netsum = .2985819; netsum += feature2[0] * -.1192021;
netsum += feature2[0) * 7.546861E-02; netsum += feature2(1]* -.5048786;
217

netsum += feature2[8] *- .3442121; netsum += feature2[9] * -.1491327;
netsum +=-.1711361; netsum += feature3[0] * -6.904944E-03;
netsum += -.1928512; netsum += feature4[0J * .1878645;
netsum += feature4[0] * 1.303436; netsum += feature4[1J * -.7406157;
netsum += feature4[1] * 1.625236; netsum += feature4[2J * -.9226816;
netsum += feature4[4]* .8675063; netsum += feature4[5] * 1.51085;
netsum += feature4[8] * 1. 76642; netsum += feature4[9] * .7057498;
netsum += feature4[16] * -.4151816; outarray[26] = 1/ (1 + exp(-netsum));
netsum = -9.454906E-02; =
outarray[O] 4563.816 * (outarray[OJ- .1) 1
netsum += feature2[0] * -1.223662; .8 + 41.44737;
netsum += feature2[1] * -.2192892; if (outarray[OJ< 41.44737) outarray[OJ =
netsum += feature2[2] * 2.508044; 41.44737;
218
if (outarray[O]> 4605.263) outarray(O] = if (outarray[8]> 4273.967) outarray(8] =

4605.263; 4273.967;
outarray[1] = 3404.606 * (outarray[1]- .1) 1 outarray(9] =3159.684 * (outarray[9]- .1) 1

.8 + 30.91974; .8 + 28.69541;
if (outarray[1]< 30.91974) outarray[1] = if (outarray[9]< 28.69541) outarray[9]=
30.91974; 28.69541;
if (outarray[1]> 3435.526) outarray[1] = if (outarray[9]> 3188.379) outarray[9] =
3435.526; 3188.379;
outarray[2] = 5215.79 * (outarray(2]- .1) /.8 outarray[10] = 2154.011 * (outarray[10]- .1)

+ 47.36842; /.8 + 10.02519;
if (outarray[2]< 47.36842) outarray[2] = if (outarray[10]< 10.02519) outarray[10] =
47.36842; 10.02519;
if (outarray(2]> 5263.158) outarray[2]= if (outarray[10]> 2164.036) outarray(10] =
5263.158; 2164.036;
outarray[3] = 3890.979 * (outarray[3]- .1) 1 outarray[11] = 1523.115 * (outarray[11]- .1)

.8 + 35.33684; 1.8 + 7.088883;
if (outarray[3]< 35.33684) outarray[3] = if (outarray[11]< 7.088883) outarray[11] =
35.33684; 7.088883;
if (outarray[3]> 3926.316) outarray[3] = if (outarray[11]> 1530.204) outarray(11] =
3926.316; 1530.204;

.8 + 53.28947; /.8 + 5.012597;
if(outarray[4]< 53.28947) outarray[4] = if (outarray[12]< 5.012597) outarray[12] =
53.28947; 5.012597;
if (outarray[4]> 5921.053) outarray(4] = if (outarray[12]> 1082.018) outarray[12] =
5921.053; 1082.018;

.8 + 39.75395; /.8 + 10.71738;
if (outarray[5]< 39.75395) outarray(5] = if (outarray[13]< 10.71738) outarray[13] =
39.75395; 10.71738;
if(outarray[5]> 4417.105) outarray(5] = if (outarray[13]> 2313.451) outarray[13] =
4417.105; 2313.451;
outarray[6] = 5541.776 * (outarray[6]- .1) 1 outarray[14] =2442.418 * (outarray[14]- .1)

.8 + 50.32895; /.8 + 11.3675;
if (outarray[6]< 50.32895) outarray(6] = if (outarray[14]< 11.3675) outarray[14] =
50.32895; 11.3675;
if (outarray(6]> 5592.1 05) outarray[6] = if (outarray[14]> 2453.786) outarray[14] =
5592.105; 2453.786;
outarray[7] = 4134.165 * (outarray[7] - .1) 1 outarray[15] =2373.604 * (outarray[15]- .1)

.8 + 37.54539; 1.8 + 11.04723;
if (outarray[7]< 37.54539) outarray[7] = if (outarray(15]< 11.04723) outarray[15] =
37.54539; 11.04723;
4171.71; 2384.651;

.8 + 38.4657; 1.8 + 9.657866;
if(outarray[8]< 38.4657) outarray[8] = if (outarray(16]< 9.657866) outarray[16] =
38.4657; 9.657866;
219
if (outarray[16]> 2084.744) outarray[16] =2084.744;

=
=
if(outarray[17]> 10) outarray[17] = 10;
outarray[18] = 10 * (outarray[18]- .1) /.8;

if (outarray[18]< O) outarray[18] = O;
=

=
=
if(outarray(19]> 10) outarray[19] 10;

if (outarray(20]< O) outarray[20] = O;
=
if (outarray{20]> 10) outarray[20] 10;
outarray[21] = 10 * (outarray[21]- .1) 1.8;

if (outarray(21]< O) outarray[21] = O;
if (outarray(21]> 10) outarray[21] = 10;

if (outarray[22]> 1O) outarray[22] = 1O;

=
=
if(outarray[23]> 10) outarray[23] 10;

=

if (outarray(25]> 10) outarray[25] = 10;

if (outarray[26]< O) outarray[26) = O;
if(outarray[26]> 10) outarray[26) = 10;
}
8.1.1 SELECCIN DE TURBINAS: MTODO 3 Y 4.

/* lnsert this code into your C program to tire the C:\NSHELL2\TURBINA2\FRANCIS\FRANCIS network */
/* This code is designad to be simple and fast for porting to any machine */
/* Therefore all code and weights are inline without looping or data storage */
/* which might be harder to port between compilers. */
#include <math.h>
void Fire_FRANCIS(double *inarray, double *outarray)
{
double netsum;
double feature3[19);
220
/* inarray[O] is H_m */ if (inarray[2)< 225) inarray[2] = 225;

r inarray[1) is Q_m3_seg */ if (inarray[2]> 2500) inarray[2) = 2500;
/* inarray[2) is Vei_Rot.n_rpm */ inarray(2] = 2 * (inarray[2)- 225) /2275 -1;
/* inarray(3] is Ef_Francis */
/* inarray(4) is Kc3FL */ if (inarray[3]< 80) inarray[3] = 80;
/* inarray[5) is Kc3FN */ if (inarray[3)> 81) inarray(3] = 81;
/* inarray[6] is Kc3FR */ inarray(3) =2 * (inarray(3]- 80) -1;
/* inarray[7) is Kc3FER */
/* outarray[O] is P_Francis_hp */ if (inarray[4]< 4) inarray[4] = 4;
/* outarray[1] is P_Francis_kW */ if (inarray[4]> 5) inarray(4] =5;
/* outarray[2) is Ns_Francis */ inarray[4] = 2 * (inarray[4] - 4) -1;
/* outarray(3) is N_Polos */
/* outarray(4] is Vsai_FLC3_m/s */ if (inarray[5)< 6) inarray(5) = 6;
/* outarray(5) is Vsai_FNC3_m/s */ if (inarray[5]> 7) inarray[5] = 7;
/* outarray[6) is Vsai_FRC3_rn/s */ inarray[5] = 2 * (inarray[5] - 6) -1;
/* outarray[7) is Vsai_FERC3_m/s */
/* outarray(8] is D3TaspFL_mm */ if (inarray[6]< 12) inarray[6] = 12;
r outarray(9] is D3TaspFN_mm */ if (inarray[6]> 13) inarray(6] = 13;
/* outarray(10) is D3TaspFR_mm */ inarray(6] = 2 * (inarray[6)- 12) -1;
/* outarray(11) is D3TaspFER_mm */
/* outarray(12] is Vtg_FL_m/s */ =
if (inarray[7]< 25) inarray[7] 25;
/* outarray(13] is Vtg_FN_m/s */ if (inarray[7]> 26) inarray[7) = 26;
/* outarray[14] is Vtg_FR_m/s */ inarray[7) = 2 * (inarray[7] - 25) -1 ;
r outarray[15) is Vtg_FER_m/s */
/* outarray(16] is Drod_D1 FL_mm */ netsum =-5.478104;
/* outarray[17) is Drod_D1FN_mm */ netsum += inarray[O] * -13.79763;
/* outarray(18] is Drod_D1FR_mm */ netsum += inarray[1] * -21.7597;
/* outarray(19] is Drod_D1FER_mm */ netsum += inarray(2] * 1.22125;
/* outarray[20] is Nrod_FL_rpm */ netsum += inarray(3) * 5.153677;
/* outarray[21] is Nrod_FN_rpm */ netsum += inarray[4] * 5.273217;
r outarray[22] is Nrod_FR_rpm */ netsum += inarray[5] * 4.993727;
/* outarray[23] is Nrod_FER_rpm */ netsum += inarray[6] 5.276625;
/* outarray[24] is D2cor_FL_mm */ netsum += inarray[7] * 5.382453;
/* outarray[25] is D2cor_FN_mm *1 feature2[0] =exp(-netsum * netsum);
/* outarray(26] is D2cor_FR_mm */
/* outarray(27) is D2cor_FER_mm */ netsum =-3.787917;
/* outarray[28] is Nai_ZL */ netsum += inarray(O]* -2.645108;
/* outarray[29) is Nai_ZN */ netsum += inarray[1] * -22.67536;
r outarray(30] is Nai_ZR */ netsum += inarray[2] -.5008544;
/* outarray(31] is Nai_ZER */ netsum += inarray[3] * 4.095648;
/* outarray[32] is AnCdFL_Bo_mm */ netsum += inarray[4] * 3.821211;
r outarray(33] is AnCdFN_Bo_mm */ netsum += inarray[5] * 3.632778;
/* outarray[34] is AnCdFR_Bo_mm */ netsum += inarray(6] * 3.781802;
/* outarray[35) is AnCdFER_Bo_mm */ netsum += inarray[7f* 3.76464;
/* outarray[36] is Flenta */ feature2[1] =exp(-netsum * netsum);
/* outarray[37) is FNorrnal */
/* outarray[38) is FRapida */ netsum =-1.909063;
/* outarray(39] is FExRapida */ netsum += inarray[OJ * -29.20437;
if (inarray[O)< 3) inarray[O) = 3; netsum += inarray[2] * 4.505999;
=
if (inarray[O]> 300) inarray[O] 300; netsum += inarray[3] 1.871705;
inarray[O] = 2 * (inarray[OJ- 3) /297 -1; netsum += inarray[4] * 1.462958;
netsum += inarray(5) * 1.915365;
=
if (inarray[1]< .03) inarray[1] .03; netsum += inarray[6] * 1.487649;
if (inarray[1]> 25) inarray(1] = 25; netsum += inarraY[7) * 1.725582;
inarray[1] = 2 * (inarray(1]- .03) /24.97-1; feature2[2] =exp(-netsum * netsum);
221
netsum =-.1122053; netsum += inarray[2] * 1.029209E-04;

netsum += inarray[O] * -10.61923; netsum += inarray[3] * 5.955117E-02;
netsum += inarray[2] * 1.288514; netsum += inarray[51 * -.1161412;
netsum += inarray[3] * 6.236722E-02; netsum += inarray[6] * -5.890157E-02;
netsum += inarray[5] * .2826306; feature2[81 =exp(-netsum * netsum);
netsum += inarray[7] * .5314485; netsum =-.4072317;
feature2[31 =exp(-netsum * netsum); netsum += inarray[01 * 1.763618;
netsum += inarray[1 1* -3.511988;
netsum = .9627185; netsum += inarray[21 * -2.245776;
netsum += inarray[01 * -2.840932; netsum += inarray(3] * .4720059;
netsum += inarray[1 1* 8.1 02728; netsum += inarray[4] * .671 0939;
netsum += inarray[21 * .8753229; netsum += inarray[51 * .5965686;
netsum += inarray[31 * -.8522743; netsum += inarray[61 * .7635241 ;
netsum += inarray[41 * -.9088507; netsum += inarray[7] * .3716368;
netsum += inarray[51 * -1.118157; feature2[91 =exp(-netsum * netsum);
netsum += inatray[61 * -.6588864;
netsum += inarray[71 * -1.194974; netsum = .1665241;
feature2[41 =exp(-netsum * netsum); netsum += inarray[01 * 2.232694;
netsum += inarray[11 * -1.581779;
netsum =-4.088692; netsum += inarray[21 * 1.456446;
netsum += inarray[01 * -44.44529; netsum += inarray[31 * -.5711281;
netsum += inarray[31 * 4.007732; netsum += inarray[6] * -.4719571;
netsum += inarray[51 * 4.079013; feature2[101 =exp(-netsum * netsum);
netsum += inarray[61 * 4.1 06398;
netsum += inarray[7] * 4.37394; =
netsum -1.569384;
feature2[51 = exp(-netsum * netsum); netsum += inarray[01 * -48.89923;
netsum += inarray[11 * 34.98304;
netsum = 1.812512E-02; netsum += inarray[21 * 4.571926;
netsum += inarray[01 * .1334502; netsum += inarray[31 * 1.619826;
netsum += inarray[1 1* -1.440658E-02; netsum += inarray[41 * 1.740726;
netsum += inarray[2] * -8.605251 E-02; netsum += inarray[51 * 1.938305;
netsum += inarray[3] * 3.312322E-02; netsum += inarray[6] * 1.758449;
netsum += inarray[41 * .1620957; netsum += inarray[7] * 1.860844;
netsum += inarray[51 * 3.132826E-02; feature2[111 =exp(-netsum * netsum);
netsum += inarray[61 * -.2000631;
netsum += inarray[7] * -6.432273E-02; netsum = .6666138;
=
feature2[61 exp(-netsum * netsum); netsum += inarray[01 * 4.12354;
netsum = 2.185077E-02; netsum += inarray[21 * -.3275603;
netsum += inarray[3] * .2810207; netsum += inarray[61 * -.6772136;
netsum += inarray[4] * 6.904722E-04; netsum += inarray[7] * -.4459397;
netsum += inarray[5] * .1590608; =
feature2[121 exp(-netsum * netsum);
netsum += inarray[7] * -5.396901 E-02; netsum = .1949701;
feature2[7] = exp(-netsum * netsum); netsum += inarray[01 * .531792;
netsum += inarray[11 * 8.330692E-02;
netsum = .1776088; netsum += inarray[2] * -5.105321 E-04;
netsum += inarray[01 * -8.766216E-04; netsum += inarray[31 * -5.122166E-03;
netsum += inarray[11 * -1.238065E-04; netsum += inarray[4] * 9.313379E-02;
222
netsum += inarray[5) * -.2016728; netsum += inarray[7] * -3.830885E-02;

netsum += inarray[6) * .1 029482; feature2(18) =exp(-netsum * netsum);
netsum += inarray[7) * -.368086;
feature2[13] = exp(-netsum * netsum); =
netsum -.3034792;
netsum += inarray[01 * 1.116319E-02;
netsum = .1721914; netsum += inarray[1 1* 1.200362;
netsum += inarray[O) * -5.493276; netsum += inarray(2) * .5281821;
netsum += inarray[1) * 7.592573; netsum += inarray(31 * .4205438;
netsum += inarray[2] * -.2441396; netsum += inarray[41 * .3979477;
netsum += inarray[3] * -.2796408; netsum += inarray[51 * .3963362;
netsum += inarray[4] * -.1798892; netsum += inarray[6J * .3m692;
netsum += inarray[5) * -.5162085; netsum += inarray[7] * .3801495;
netsum += inarray[6] * -.4113888; feature3[01 =tanh(netsum);
netsum += inarray[7] * -8.455894E-02;
=
feature2[14] exp(-netsum * netsum); netsum = .8738331;
netsum += inarray[01 * -.4889644;
netsum = .6720135; netsum += inarray[1) * -.1850564;
netsum += inarray[O] * 1.03775; netsum += inarray[21 * 5.455552;
netsum += inarray[2] * -.2626191; netsum += inarray(4) * -1.03809;
netsum += inarray[3) *-.6690389; netsum += inarray[51 * -.700538;
netsum += inarray[4] * -1.17105; netsum += inarray[61 * -.7932075;
netsum += inarray[5] * -1.042261; netsum += inarray[7] * -.8489037;
netsum += inarray[6] * -.8195415; feature3[1) =tanh(netsum);
netsum += inarray[7] * -1.188978;
feature2[15) =exp(-netsum * netsum); netsum = 2.378962;
netsum =-1.328141; netsum += inarray[1) * 5.951619;
netsum += inarray[O) * -18.80286; netsum += inarray[21 * -1.154179;
netsum += inarray[1) * 7.036247; netsum += inarray[31 * -2.226026;
netsum += inarray[2] * 5.918089; netsum += inarray{41 -2.366457;
netsum += inarray[3] * 1.234059; netsum += inarray[51 * -2.422383;
netsum += inarray[4] * 1.309373; netsum += inarray[6) * -2.607682;
netsum += inarray[5) * 1.283815; netsum += inarray[7] * -2.331521;
netsum += inarray[6] * 1.12374; feature3[2) =tanh(netsum);
feature2[16] =exp(-netsum * netsum); netsum =-4.676708;
netsum += inarray(01 * -28.51575;
netsum = 1.121457E-03; netsum += inarray[1 1* 1.370674;
netsum += inarray[01 * 1.01565; netsum += inarray[2) * 2.287251;
netsum += inarray[1) * -.7234788; netsum += inarray[31 * 4.378609;
netsum += inarray[2] * .2359582; netsum += inarray(41 * 4.703241;
netsum += inarray[3) * -.1751456; netsum += inarray(5) 4.242495;
netsum += inarray[41 * .11 05588; netsum += inarray[61 * 4.41921;
netsum += inarray[61 * -.2648728; feature3(3] =tanh(netsum);
n~atsum += inarray[7] * 6.342434E-02;
feature2[17] =exp(-netsum * netsum); netsum =-4.16978;
netsum += inarray(01 -22.65795;
netsum =-.2849136; netsum += inarray[1) * -1.286685;
netsum += inarray[01 * -1.482265; netsum += inarray[21 -1.812115;
netsum += inarray[1) * .6539246; netsum += inarray[3) * 3.965956;
netsum += inarray[21 * .5185043; netsum += inarray[4]* 4.478365;
netsum += inarray[41 * .1224783; netsum += inarray(6) * 3.973463;
netsum += inarray[5) * 8.346537E-02; netsum += inarray(7] * 4.46337;
netsum += inarray[61 * .2301015; =
223
netsum = -1.056862; netsum += inarray(1] * -22.65215;

netsum += inarray[O] * -1.1 0875; netsum += inarray[2] * 4.37736;
netsum += inarray[1] * -5.972617; netsum += inarray[3] * 4.214149;
netsum += inarray[2]* -.1079557; netsum += inarray[4] * 4.091879;
netsum += inartay[4] * .8455369; netsum += inarray[6] * 4.527131;
netsum += inarray[6] * .4615737; feature3[10] = tanh(netsum);
feature3[5] = tanh(netsum); netsum =-.4483488;
netsum =-8.837726E-02; netsum += inarray[1] * 4.810481;
netsum += inarray[O] * -5. 728523; netsum += inarray[2] * 2.551845;
netsum += inarray(1] * -5.791149; netsum += inarray[3] * .7033749;
netsum += inarray(2] * 9.669379E-02; netsum += inarray[4] .5874906;
netsum += inarray(3] * .200502; netsum += inarray(5] .4111943;
netsum += inarray(4] * 8.616171 E-02; netsum += inarray[6]* .2810183;
netsum += inarray(5] * .3239483; netsum += inarray[7] * .4930439;
netsum += inarray[6] * .39864; feature3[11] =tanh(netsum);
netsum += inarray(7] * .3985489;
netsum += inarray(O] * -.1541415;
netsum += inarray[O]* 1.821194; netsum += inarray[2]* 1.266204;
netsum += inarray[1] * -.2163793; netsum += inarray[3]* 3.182918;
netsum += inarray(2] * 4.604093; netsum += inarray[4]* 2.878112;
netsum += inarray[3]* -1.275443; netsum += inarray[5] * 2.814409;
netsum += inarray[4] * -.8806974; netsum += inarray[6]* 3.017715;
netsum += inarray[6] * -1.169112; feature3[12] = tanh(netsum);
netsum += inarray(7] * -1.15845;
feature3[7] = tanh(netsum); netsum = .2932296;
=
netsum -.7213756; netsum += inarray[1]* -.4058585;
netsum += inarray[O]* -2.827211; netsum += inarray[2]* -.0879497;
netsum += inarray[1] * -6.014158; netsum += inarray[3]* -.5574953;
netsum += inarray[2] * -3.996637E-02; netsum += inarray[4]* -.613674;
netsum += inarray[3] * .8046387; netsum += inarray[5]* -.2766995;
netsum += inarray[6] * .794503; feature3[13] = tanh(netsum);
=
netsum -2.252481; netsum += inarray[1]* .8821045;
netsum += inarray[O] * -9.394224; netsum += inarray[2]* -3.941496;
netsum += inarray[1] * -2.647905; netsum += inarray[3]* -.9149609;
netsum += inarray(2] * 9.234291 E-02; netsum += inarray[4] -.7391471;
netsum += inarray[3]* 2.045324; netsum += inarray[5] * -.5961426;
netsum += inarray[4]* 1.964067; netsum += inarray(6] * -.5230899;
netsum += inarray[5] * 2.263806; netsum += inarray[7] * -.7608724;
netsum += inarray[6] * 2.021521; feature3[14] =tanh(netsum);
feature3[9] = tanh(netsum); =
netsum -.2354967;
netsum += inarray[O]* .154537;
netsum =-4.631982; netsum += inarray(1] * .5740142;
netsum += inarray[O] * -4.033898; netsum += inarray[2] * .7307581:
224

netsum += inarray(6] * .6959427; =
feature4[1] 1 - exp(-netsum * netsum);
netsum = 1.81432; netsum += inarray(1] * 6.935266;
netsum += inarray[O] * -1.96891; netsum += inarray[2] * 11.59262;
netsum += inarray[1] * 12.02656; netsum += inarray(3] * 3.352005;
netsum += inarray[2] * -.2083613; netsum += inarray(4] * 3.31984;
netsum += inarray[3] * -2.015613; netsum += inarray(5] * 3.260385;
netsum += inarray[4] * -2.031635; netsum += inarray(6) * 3.332677;
netsum += inarray[6] * -1.852357; feature4[2] = 1 - exp(-netsum * netsum);
netsum += inarray[7] * -1.621921;
=
feature3[16] tanh(netsum); netsum = 1.046242;
netsum += inarray[O] * .4921586;
netsum = 9.458772E-02; netsum += inarray[1] * 7.810551;
netsum += inarray[O] * -2.286869; netsum += inarray[2] * -.6721357;
netsum += inarray[4] * .4592978; netsum += inarray[6J * -.9885621;
netsum += inarray[5] * .3678898; netsum += inarray(7] * -.6535472;
netsum += inarray[6] * .3185799; feature4(3] =1 - exp(-netsum * netsum);
netsum += inarray[O] * -.9401179; netsum += inarray(2] * .608431;
netsum += inarray{1] * 6.66729; netsum += inarray[3] * -.8546925;
netsum += inarray[3] * -1.049552; netsum += inarray[5] * -. 7128801;
netsum += inarray[6] * -1.373488; feature4[4] = 1 - exp(-netsum * netsum);
netsum += inarray[7] * -.9733554;
feature3[18J =tanh(netsum); =
netsum -1.872471;
netsum += inarray[O] -5.656478;
netsum =-8.882126; netsum += inarray[1] -8.008894;
netsum += inarray[O] * -56. 7633; netsum += inarray{2)* .8030125;
netsum += inarray[1] * .4994507; netsum += inarray(3] 1.849906;
netsum += inarray[2] * 1.700129; netsum += inarray(4] * 1.434005;
netsum += inarray[3] * 9.041796; netsum += inarray(5]* 1.640865;
netsum += inarray[4J * 8.973028; netsum += inarray(6] * 1.685682;
netsum += inarray[6] * 8.632603; feature4[5] =1 - exp(-netsum * netsum);
feature4[0] = 1 - exp(-netsum * netsum); netsum = -.1802559;
netsum += inarray[O)* -2.421047;
netsum = .2946113; netsum += inarray(1] * -1.114509;
netsum += inarray[OJ * -2.669188E-02; netsum += inarray[2] * 6.102552E-02;
netsum += inarray[1] * -.1392849; netsum += inarray(3] * .1614573;
netsum += inarray[2] * -2.396717; netsum += inarray[4] * -7.837715E-03;
netsum += inarray[4] * 5.854492E-02; netsum += inarray[6] * .3671643;
225
netsum += inarray{7] * -.1518567;

feature4[6] = 1 - exp(-netsum * netsum); netsum = 6.459284;
netsum += inarray[O]* -2.055845:
netsum = 2.880243; netsum += inarray[1] * 42.89668;
netsum += inarray[O] * .873866; netsum += inarray[2] * 2.51774;
netsum += inarray[1] 16.29805; netsum += inarray[3] * -6.342625;
netsum += inarray[2] .2244682; netsum += inarray[4] * -6.599291;
netsum += inarray[3] -2.960358; netsum += inarray[5] * -6.563766;
netsum += inarray[4] -2.549545; netsum += inarray[6] -6. 792032;
netsum += inarray[5) * -2.741243; netsum += inarray{7] * -6.31735;
netsum += inarray(6] * -3.056852; feature4[12] =1 - exp(-netsum * netsum);
netsum += inarray{7] * -3.005763;
feature4{7] = 1 - exp(-netsum * netsum); netsum = -.1497506;
netsum += inarray(O] * -3. 799807; netsum += inarray[2] .9428095;
netsum += inarray[1] 35.61201; netsum += inarray[3]* .1687066;
netsum += inarray[2] 3.603816; netsum += inarray[4] * 2.308896E-02;
netsum += inarray(4] -5.3826; netsum += inarray[6]* .1227963;
netsum += inarray[5] -5.691954; netsum += inarray{7] * .4052385;
netsum += inarray[6] * -5.736175; feature4(13] =1 - exp(-netsum * netsum);
netsum += inarray{7] * -5.293347;
feature4[8] = 1 - exp(-netsum * netsum); netsum =-.3201815;
netsum += inarray[O]* 1.128974;
netsum += inarray[O] * 6.550279; netsum += inarray[2] * 3.872861;
netsum += inarray[1] * -.2096181; netsum += inarray[3] .5263622;
netsum += inarray[3] * -3.111802; netsum += inarray[5] * 9.721208E-02;
netsum += inarray[4] -3.336902; netsum += inarray[6] * .2253827;
netsum += inarray(5] * -3.228772; netsum += inarray{7] * .4857824;
netsum += inarray(6] * -3.188584; feature4{14] =1 - exp(-netsum * netsum);
netsum += inarray{7] * -3.230474;
feature4[9] = 1 - exp(-netsum * netsum); netsum = -.1042724;
netsum += inarray[O]* 1.296381;
netsum = .4420536; netsum += inarray[1]* .5646659;
netsum += inarray[O]* 8.406163; netsum += inarray[2] -1.175975;
netsum += inarray[1] * -1.705918; netsum += inarray[3]* .3500463;
netsum += inarray(2] * -2.675127; netsum += inamiy[4] * .4059474;
netsum += inarray[3] * -8.393306E-02; netsum += inarray[5] 1.695132E-02;
netsum += inarray[4] -.4554291; netsum += inarray[6]* .5305222;
netsum += inarray(5] * -.20817; netsum += inarray[7] * .2439102;
netsum += inarray(6] * -.1638989; feature4[15] =1 - exp(-netsum * netsum);
netsum += inarray{7] * -.1985271;
feature4[10] = 1 - exp(-netsum * netsum); =
netsum .6527948;
netsum = .2059372; netsum += inarray[1] * -.6952026;
netsum += inarray(O] * 1.914523; netsum += inarray[2] * -.6596867;
netsum += inarray(3] * -.056491; netsum += inarray[5] * -1.16457;
netsum += inarray[4] * 6.104679E-02; netsum += inarray[6] * -1.144388;
netsum += inarray[5]* -.0412524; netsum += inarray{7] * -.9160156;
netsum += inarray(6] * -3.617917E-02; feature4[16] =1 - exp(-netsum netsum);
netsum += inarray{7] * -2.578711 E-02;
=
feature4[11] 1 - exp(-netsum * netsum);
226
netsum = -.6046912; netsum += feature3[14] * -.1054694;

netsum += inarray[O] * 1.787036; netsum += feature3[15] * .145014;
netsum += inarray[1] * -.5156695; netsum += feature3[16] * .3320754;
netsum += inarray[2] * -2.436541; netsum += feature3[17] * -.4054737;
netsum += inarray[3] * 9.686866E-02; netsum += feature3[18] * 3.391928;
netsum += inarray[4] * .2867557; netsum += -.2470685;
netsum += inarray[5] * .1457754; netsum += feature4[0] * .0778499;
netsum += inarray[6] * .3346111; netsum += feature4[1] * -.2969437;
netsum += inarray[7] * .4986471; netsum += feature4[2] * -9.406544E-03;
=
feature4[17] 1 - exp(-netsum * netsum); netsum += feature4[3] * -.341611;
netsum += feature4[4] * 2.510133;
netsum = .5395787; netsum += feature4[5] * -.1079716;
netsum += inarray[O] * -.1309323; netsum += feature4[6] * -1.074124;
netsum += inarray[1] * -.2037924; netsum += feature4[7) * .3115947;
netsum += inarray[2] * 1.932976; netsum += feature4[8] * 8.104191 E-02;
netsum += inarray[3] * -5.163424E-02; netsum += feature4[9] * -.0440037;
netsum += inarray[4] * -.2064637; netsum += feature4[1 O] * 8.186349E-02;
netsum += inarray[5] * -.2688338; netsum += feature4[11] * -1.826585;
netsum += inarray[6] * -.4853292; netsum += feature4[12] * 7.565524E02;
netsum += inarray[7] * -8.659288E-02; netsum += feature4[13] * -3.143007E-02;
=
feature4[18] 1 - exp(-netsum * netsum); netsum += feature4[14] * -.9910228;
netsum += feature4[15] * -2.218725;
netsum = 8.718774E-02; netsum += feature4[16] * .9347152;
netsum += feature2[2] * -1.876435E-02; outarray[O] =1/ (1 + exp(-netsum));
netsum += feature2[3] * -.0473732;
netsum += feature2[4] * -1.905886E-03; netsum =-.3346092;
netsum += feature2[1 O] * 2.030445E-02; netsum += feature2[5] * -7.583345E-02;
netsum += -.2476546; netsum += feature2[14] * -1.679739E-02;
netsum += feature3[5]* -.7941819; netsum += feature3[0] * .364581;
netsum += feature3[1 O] * .1870124; netsum += feature3[5) * -.793064;
netsum += feature3[11] * -.0729821; netsum += feature3[6) * -.546452;
227

netsum += feature3[1 O) * .1887136; netsum += feature3{5] * -4.843915E-02;
netsum += feature3[11) * -7.139468E-02; netsum += feature3{6] * 2.182159E-02;
netsum += feature3[12) * -.2795635; netsum += feature3{7] * .8283022;
netsum += feature3[13) * -.3441 044; netsum += feature3[8] * -3.872889E-02;
netsum += feature3[14) *_-.102743; netsum += feature3[9] * -.2427877;
netsum += feature3[15) * .2640757; netsum += feature3[1 O] * 3.113943E-02;
netsum += feature3[16) * .3327664; netsum += feature3{11] * 2.897749E-02;
netsum += feature3[17) * -.4049702; netsum += feature3{12] * -.2942756;
netsum += feature3[18) * 3.393776; netsum += feature3[13] * .3631359;
netsum += -5.952555E-02; netsum += feature3[14] * .2022129;
netsum += feature4[4] * 2.502638; netsum += -9.616262E-02;
netsum += feature4{9] * -4.368422E-02; netsum += feature4[4] * -.3329391;
netsum += feature4(1 O] * 8.195668E-02; netsum += feature4[5] * -2.775598E-03;
netsum += feature4[11] * -1.825214; netsum += feature4[6] * 2.710117E-03;
netsum += feature4[15] * -2.219986; netsum += feature4[10] * 2.302301E-02;
outarray[1] = 1/ (1 + exp(-netsum)); netsum += feature4[14] * -.1294795;
netsum += feature4[15] * .1787323;
=
netsum -5.875017E-02; netsum += feature4[16] * -.6905922;
netsum += feature2[2] * -1.325287E-03; =
outarray[2) 1/ (1 + exp(-netsum));
netsum += feature2(3] * 3.359487E-02;
netsum += feature2[4] * -3.434391 E-02; netsum = .1804229;
netsum -t:= feature2[5] * 3.47659E-03; netsum += feature2[0] * -8.506813E-04;
netsum += feature2[11] * 2. 725795E-02; netsum += feature2[6] * .5107836;
netsum += feature2[14] * 3.267475E-03; netsum += feature2[9] * 6.160371 E-03;
netsum += feature2(15) * -3.946541E-03; netsum += feature2[10]* .1077227;
netsum += feature2(16] * -5.86097E-03; netsum += feature2[11) * 1. 783691 E-02;
netsum += feature2[17) * .4065373; netsum += feature2(12] * .0222999;
netsum += feature3[2] * .7680174; netsum += feature2(17) * .5555099;
228
netsum += .680896; netsum += feature2[14] * -1.7841 05E-02;

netsum += feature3[4] * -.1099943; netsum += .0678502;
netsum += feature4[1 O] "-2.193901 E-02; netsum += feature4[5] * -7.830662E-03;
netsum += feature4[12] * -6.305316E-03; netsum += feature4[7] * .1 04885;
netsum += feature4[15] * -.7795016;
netsum =-1.140142E-02; netsum += feature4[16] * .8424653;
netsum += feature2[2] * -2.236265E-04; =
outarray[4) 1/ (1 + exp(-netsum));
netsum += feature2[3] * -3. 709573E-02;
netsum += feature2[4] * -1.166194E-02; netsum =-4.722031E-02;
netsum += feature2(5) * 7.685617E-03; netsum += feature2[0] * -8.000262E-03;
netsum += feature2[6] * -.1242829; netsum += feature2[1] -1.680207E-02;
netsum += feature2[9] * 5.058989E-02; netsum += feature2[4] * -1.186541 E-02;
netsum += feature2[10] * -2.762204E-02; netsum += feature2[5J * 7.525295E-03;
netsum += feature2[11] * -1.439426E-02; netsum += feature2[6J * -9. 797968E-02;
229

netsum += feature2[10] * -2.8n823E-02; netsum += feature2(5] * 7.570244E-03;
netsum += feature2[11] * -1.439525E-02; netsum += feature2[61 * -7.861973E-02;
netsum += feature2[12] * -.127058; netsum += feature2[7] * -5. 739116E-03;
netsum += feature2[13] * -.3n0014; netsum += feature2[8] * -.3296;
netsum += feature2[18] * -.5720466; netsum += feature2[131 * -.4332907;
netsum += feature3[8] * 1.816689E-02; netsum += feature3[3) * -1.365451;
netsum += feature3[91 * -2.950455E-02; netsum += feature3[4) * -.3871159;
netsum += feature3[141 * -.4090543; netsum += feature3(9] * -3.311089E-02;
netsum += feature3[15] * 4.579091E-02; netsum += feature3[101 * 3.768059E-03;
netsum += feature3[16] * -5.112208E-02; netsum += feature3[11 1* 7.854988E-02;
netsum += -5.463653E-02; netsum += feature3[14] * -.4052454;
netsum += feature4[11 * -.1701238; netsum += feature3[161 * -5.0192nE-02;
netsum += feature4[2] * -1.80n26E-02; netsum += feature3[171 * -.2167054;
netsum += feature4[5] * -8.105821 E-03; netsum += feature4[0) * 5.559727E-02;
netsum += feature4[71 * .1039171; netsum += feature4[2) * -1.833118E-02;
netsum += feature4[81 ~ 5.215293E-03; netsum += feature4[3) * 5.938511 E-02;
netsum += feature4[9] * -2.4~635E-02; netsum += feature4[4] * .855292;
netsum += feature4[11 1* 1.. 730887E-02; netsum += feature4[6] * 1.042634E-02;
netsum += feature4[12] * 4.798151E-03; netsum += feature4[7] * .1 029989;
netsum += feature4[14] *.-.2025119; netsum += feature4[9] * -2.419138E-02;
netsum += featur4[15] ~,.n89724; netsum += feature4[1 O] * -.0288771;
netsum += feature4[161 * -.842842; , netsum += feature4[11] * 2.108153E-02;
netsum += feature4[171 * --.1508292; netsum += feature4[12] * 4.965364E-03;
outarray[51 = 1/ (1 + eXp(n~tsum)); netsum += feature4[141 * -.2000619;
~.
netsum += feature4[15] * -.7695271;
netsum = -.1906302;' .- . ..' netsum += feature4[16] * .8439519;
netsurri -~= featUre2[0] * -8.21312~E-03; netsum += feature4[17] * -.1489539;
netsum += 'teahlre2[1] * -1.62505E-02; netsum += feature4[18] * .2586853;
netsum += featre2[21 * -7.886151E-04; outarray[6] = 1/ (1 + exp(-netsum));
netsul!l_+= featu~e2{31 * -.0370568;
_jj
'1 '~ ._...
' .
-~ .. l .
..
",
230
netsum = -.0936944; netsum += feature4[16) * .8450029;

netsum += feature2[3) * -3.724976E-02;
netsum += feature2[4] * -1.270376E-02; =
netsum .2035794;
netsum += feature2[7] * -5.976677E-03; netsum += feature2(2] * 1.007071 E-02;
netsum += feature2[11) * -1.447999E-02; netsum += feature2(6] * .1434139;
netsum += feature3[3) * -1.364262; netsum += feature2[18) * .2716945;
netsum += feature3[4) * -.3882559; netsum += .1166575;
netsum += feature3[5) * -.1393557; netsum += feature3[0] * - .1123899;
netsum += feature3[8] * 2.147656E-02; netsum += feature3[3] * 1.892978;
netsum += feature3[18] * -.354253; netsum += feature3[13J * -.0542923;
netsum += feature4[0) * 5.580377E-02; netsum += feature3[15] * .1922844;
netsum += feature4[4) * .8352511; netsum += -.1101582;
netsum += feature4[5] * -9.114374E-03; netsum += feature4[0J * -4.800826E-02;
netsum += feature4[9) * -2.405058E-02; netsum += feature4[4) * -1.596525;
netsum += feature4[11] 2.502191 E-02; netsum += feature4[6] * -1.823218E-02;
netsum += feature4[13] * -5.019467E-03; netsum += feature4[8] -2.276465E-02;
netsum += feature4[14] * -.1982296; netsum += feature4(9] * 4.824297E-02;
netsum += feature4(15] * -.7551309; netsum += feature4[10] * -8.443635E-04;
231

netsum += feature4[14] * 8.973592E-02; netsum += feature4[9] * .0482n9;
netsum += feature4[15] * .5221522; netsum += feature4[1 O]* 3.147637E-04;
outarray[8] =1/ (1 + exp(-netsum)); netsum += feature4[14] * 8.754973E-02;
netsum += feature4[15) * .5039162;
netsum = -3.957446E-02; netsum += feature4[16] * -.4915009;
netsum += feature2[0] * -3.5n378E-02; netsum += feature4[17] * .1425989;
netsum += feature2[2] * 1.168383E-02; outarray[9) = 1/ (1 + exp(-netsum));
netsum += feature2[3] * 1.986435E-02;
netsum += feature2[4] * -7.167532E-04; =
netsum -.1364217;
netsum += feature2[11] * 1.701 006E-02; netsum += feature2[6] * .2042985;
netsum += feature2[12] * 4.746n5E-02; netsum += feature2[7) * -6.869286E-03;
netsum += feature2[17] * 9.611306E-02; netsum += feature2[12) 4.800444E-02;
netsum += .1 07924; netsum += feature2[14) * 1.429939E-02;
netsum += feature3[0] * -4.506801 E-02; netsum += feature2[15) * .1830454;
netsum += feature3[11] 3.169414E-02; netsum += feature3[6] * .052681;
netsum += feature3[12] -.2195543; netsum += feature3[7] * -.5894n4;
netsum += feature3[13] * 1.8765nE-02; netsum += feature3[8] * -.1318426;
netsum += feature3[14) * .1729175; netsum += feature3[9) * -1.439578;
netsum += feature3[15]* -8.882323E-02; netsum += feature3[10] * 2.985867E-02;
netsum += feature3[16) 1.616443E-02; netsum += feature3[11] * 3.937068E-02;
netsum += feature4[2] * O; netsum += feature3[17] * .1355022;
netsum += feature4[3) -4.27691 E-03; netsum += feature3[18] * .3360194;
netsum += feature4[4) * -1.563858; netsum += 6.366671 E-02;
232

netsum += feature4[4] * -1.605408; netsum += .2811685;
outarray[10] =1/ (1 + exp(-netsum)); netsum += feature4[14] * 8.157405E-02;
netsum += feature4[15) * .5005958;
netsum =-9.331414E-02; netsum += feature4[16] * -.4967542;
netsum += feature2[2] * 1.108705E-02; outarray(11] = 1/ (1 + exp(-netsum));
netsum += feature2[3) * 1.961268E-02;
netsum += feature2[4) * -5.24083E-04; netsum =-.5401376;
netsum += feature2[5) * -2.1 07925E-03; netsum += feature2[0] * -7.119249E-03;
netsum += feature2[6) * -.12801 03; netsum += feature2[1) * -1.893555E-02;
netsum += feature2[11] * 1.823703E-02; netsum += feature2{6] * -7.64315E-03;
netsum += feature2{15] * .1921629; netsum += feature2(10] * -2.340325E-02;
netsum += feature2{16] * 1.438447E-02; netsum += feature2[11] * -1.414669E-02;
netsum += feature2[17] * .0833054; netsum += feature2{12] * -.1226461;
netsum += feature2{18] * .2488984; netsum += feature2[13] * -.1599962;
netsum += -7.087833E-02; netsum += feature2[14] * -1.637655E-02;
netsum += feature3{4] * .3222882; netsum += -.3499072;
netsum += feature3[6] * 4.564139E-02; netsum += feature3(1) * 8.959621E-03;
netsum += feature3[8] * -.1401253; netsum += feature3[3} * -1.370151;
netsum += feature3[10] * 2.527098E-02; netsum += feature3(5} * -.1478497;
netsum += feature3[11] * 2.655809E-02; netsum += feature3(6) * -.1541867;
netsum += feature3[12] * -.2189262; netsum += feature3{7] * .45907;
netsum += feature3{14] * .1740427; netsum += feature3[9] * -3.829441 E-02;
netsum += feature3[15] * -6.211202E-02; netsum += feature3[10} * 6.403938E-04;
233

netsum += feature3[15] * .2120902; netsum += feature3[1 O] * 1.900792E-03;
netsum += feature4[2] * -1.760135E-02; netsum += feature3(17] * -.2170717;
netsum += feature4[3] * 6.549563E-02; netsum += feature3(18) * -.3815797;
netsum += feature4[7] * .1083044; netsum += feature4[2) * -1. 791244E-02;
netsum += feature4[11] * -4.610777E-03; netsum += feature4(6] * 1.173665E-02;
netsum += feature4[14] * -.2117063; netsum += feature4(9) * -2.496983E-02;
netsum += feature4[15] * -.8089572; netsum += feature4[1 O) * -2.951601 E-02;
outarray(12] = 1/ (1 + exp(-netsum)); netsum += feature4[14] * -.2065603;
netsum += feature4[15] * -.7929084;
netsum =-5.328769E-03; netsum += feature4[16] * .8413042;
netsum += feature2[1] * -1. 781503E-02; netsum += feature4[18] * .2649225;
netsum += feature2[2] * 3.739938E-04; outarray(13] =1/ (1 + exp(-netsum));
netsum += feature2[3] * -3.690528E-02;
netsum += feature2[4] * -1.099938E-02; =
netsum -6.536139E-02;
netsum += feature2[9] * 5.1 09677E-02; netsum += feature2[4] * -1.167255E-02;
netsum += feature2[11] * -1.427221 E-02; netsum += feature2[6} * -8.213332E-02;
netsum += feature2[17] * -.4029512; netsum += feature2(12} * -.1262564;
netsum += -.3492062; netsum += feature2[14} * -1.770651E-02;
234
netsum += feature3(11 * 4.733582E-03; netsum += feature2[16] * -1.888184E-02;

netsum += feature3[21 * -5. 756713E-02; netsum += feature2[17) * -.3784086;
netsum += feature3[31 * -1.366831; netsum += feature2[18] * -.5537906;
netsum += feature3[41 * -.3836626; netsum += 7.561964E-02;
netsum += feature3[51 * -.1431985; netsum += feature3[0] * -9.334236E-02;
netsum += feature3[71 * .4558662; netsum += feature3[2]* -5.603926E-02;
netsum += feature3[81 * 1.642628E-02; netsum += feature3[3]* -1.363456;
netsum += feature3[101 * 2.54652E-03; netsum += feature3[5]* -.1385272;
netsum += feature3[121 * -5.634412E-02; netsum += feature3[7) * .4486763;
netsum += feature3[141 * -.4108147; netsum += feature3[9]* -3.885284E-02;
netsum += feature3(151 * .1730432; netsum += feature3[10] * 3.44523E-03;
netsum += feature3[161 * -.0516924; netsum += feature3[11] * 8.3841 04E-02;
netsum += -.4240582; netsum += feature3[14] * -.403671;
netsum += feature4[01 * 5.521565E-02; netsum += feature3[15] * .3762298;
netsum += feature4[41 * .8803134; netsum += -.1491444;
netsum += feature4[51 * -7.639197E-03; netsum += feature4[0] * 5.582782E-02;
netsum += feature4[7) * .1 052666; netsum += feature4[2] * -1.857692E-02;
netsum += feature4[81 * 5.117073E-03; netsum += feature4[3] * 5.750158E-02;
netsum += feature4[91 * -2.515285E-02; netsum += feature4[4] * .8306136;
netsum += feature4[101 * -2.915368E-02; netsum += feature4[5] * -9.325077E-03;
netsum += feature4[11 1* 1.253941 E-02; netsum += feature4(6]* 8.731665E-03;
netsum += feature4[121 * 4.712866E-03; netsum += feature4[7) * .1016451;
netsum += feature4[131 * -4.274924E-03; netsum += feature4[8] * 5.456118E-03;
netsum += feature4[151 * -.7833096; netsum += feature4[10]* -2.862741E-02;
netsum += feature4[161 * .8420737; netsum += feature4[11]* 2.847248E-02;
netsum += feature4[181 * .2622888; netsum += feature4[13] * -5.18783E-03;
outarray[14] = 1/ (1 + exp(-netsum)); netsum += feature4[141 * -.1971735;
netsum += feature4(15) * -.7497256;
netsum = -.3137464; netsum += feature4[16) * .8454262;
netsum += feature2[1 1* -1.562646E-02; : . netsum += feature4[18) * .2563407;
netsum += feature2[21 * -1.511976E-03; outarray[15) = 1/ (1 + exp(-netsum));
netsum += feature2[31 * -.0373284;
netsum += fature2[41 * -1.301902E-02; netsum = -.1480979;
netsum += feature2[51 * 7.4273ITE-03; netsum += feature2(0] * -3.719818E-02;
netsum += fea_tll_re2[61 * -.425519; netsum += feature2(1] * -1.265442E-02;
netsum += fetre2[7) * -6.1 09207E-03; netsum += feature2[2] * -9.348511 E-03;
netsum += feai!Jre2[81 * 7.695494E-02; netsum += feature2[3] * 3.579449E-03;
netsum += feafure2[91 * 4.927329E-02; netsum += feature2[4) * -6.274232E-02;
netsum +=.teafure2[1 O] * -3.1 02662E-02; neisum += feature2[5] * -1.423321E-04;
netsum+::; feature2[11] * -1.451275E-02; netsum += feature2[6] * 6.063696E-02;
netsum += fature2[12] * -.1301809; netsum += feature2[7] * -2.762263E-02;
, .netsum +=' feature2[13] * -.5056526; netsum += feature2(8] * .3399003;
:netl?um += feature2[14] * -1.937582E-02; netsum += feature2[9] * -.1271517;
ntsum += feature2[15] * .1145802; netsum += feature2[10] * -.1234824;
235

netsum += feature2[13] * .1022288; netsum += feature2[8]* 6.264265E-02;
netsum += feature2[15] * 8.375827E-02; netsum += feature2[1 O) * -.1254905;
netsum += feature2[18] * -.3796n2; netsum += feature2[13) * 3.694811 E-02;
netsum += .3610182; netsum += feature2[14) * -6.355699E-03;
netsum += feature3[4] * 8.977345E-02; netsum += .204025;
netsum += feature3[6] * .125425; netsum += feature3[1) * -2.657602;
netsum += feature3[13] * -.1998053; netsum += feature3[8) * -5.819671 E-02;
netsum += feature3[15] * -.3341132; netsum += feature3{10) * 5.079608E-02;
netsum += feature3[16] * -3.184267E-02; netsum += feature3{11) * 5.700771 E-02;
netsum += feature3[17] * -.1558098; netsum += feature3[12) * -.3248402;
netsum += .2336751; netsum += feature3[14] * 6.975435E-02;
netsum += feature4[4] * -1.361738; netsum += .175902;
netsum += feature4[8] * 8.143663E-04; netsum += feature4[3] * -. 030551;
netsum += feature4[9] * 1.165031E-02; netsum += feature4{4] * -1.372878;
outarray[16] = 1/ (1 + exp(-netsum)); netsum += feature4[14] -.1117577;
netsum += feature4[15] * -.2245504;
netsum = .1706664; netsum += feature4[16) * 1.802132E-02;
netsum += feature2[0) * -3.748044E-02; netsum += feature4[17] * 6.514741E-02;
netsum += feature2[2] * -9.64919E-03; outarray[17] =1/ (1 +exp(-netsum}};
netsum += feature2[3) * 3.668473E-03;
netsum += feature2[4) * -6.303412E-02; netsum =-.1826196;
236

netsum += feature2[2) * -9.266318E-03; outarray[18] = 1/ (1 + exp(-netsum));
netsum += feature2[3) * 3.522575E-03;
netsum += feature2[4) * -6.260777E-02; netsum = -.3645401;
netsum += feature2[6) * -.153879; netsum += feature2[1) * 4.979555E-03;
netsum += feature2[7) * -2.746058E-02; netsum += feature2[2) * -5.376604E-03;
netsum += feature2[1 O) * -.1229954; netsum += feature2[5) * 5.821685E-03;
netsum += feature2[15) * 8.444608E-02; netsum += feature2[10] * -.106473;
netsum += .1592132; netsum += feature2[14] * -8.930701E-03;
netsum += feature3[1] * -2.653964; netsum += feature2[16) * -6.075521 E-03;
netsum += feature3[4] * 8.928083E-02; netsum += -.3869346;
netsum += feature3[6) * .1252734; netsum += feature3[1] * -3.146054;
netsum +=-feature3[7) * 1.517936; netsum += feature3[2] * -.2413964;
netsum += 1.755619E-02; netsum += feature3[14] * -2.990626E-02;
netsum += feature4[4) * -1.362801; netsum += -1.502656E-02;
netsum += feature4[5) * -3. 70192E-03; netsum += feature4[0] * .0424784;
n~tsum += feature4[14] * -.115839; netsum += feature4(9] * -3.227937E-02;
237

netsum += feature4[14] * -.1491566; netsum += feature4[9)" 3.196246E-02;
outarray[19] = 1/ (1 + exp(-netsum)); netsum += feature4[14) * .2847435;
netsum += feature4[15) * .1685745;
netsum =-.1330385; netsum += feature4[16) * .4157856;
netsum += feature2[2] * -5.30926E-03; outarray[20] = 1/ (1 + exp(-netsum));
netsum += feature2[3] * -2.927209E-02;
netsum += feature2[4] * 5.051031 E-02; netsum = 6.464648E-02;
netsum += feature2[13] * -.151 084; netsum += feature2[8] * -.1252699;
netsum += feature2[15] * 8.13277E-03; netsum += feature2[1 O) * -1.060805E-02;
netsum += feature2[17] * -.4587012; netsum += feature2[12]* -.0420361;
netsum += feature3[1] * .7416637; netsum += feature2[16] * -4.845611 E-03;
netsum += feature3[3] * -.6963644; netsum += feature2[18] * 1.480331 E02;
netsum += .1745167; netsum += feature3[14] * -1.427051;
238

netsum += feature4[4] .456624; netsum += -.1973222;
netsum += feature4[5] -7.519086E-03; netsum += feature4[0] * 2.548629E-02;
netsum += feature4[9] * 3.301151 E-02; netsum += feature4[4] * .5035633;
netsum += feature4[10] * -4.851622E-03; netsum += feature4[5] * -5.5111 06E-03;
netsum += feature4[15] * .1872639; netsum += feature4[10] * -6.3825BE-03;
outarray[21] = 1/ (1 + exp(-netsum)); netsum += feature4[14] * .282764;
netsum += feature4[15] * .1583811;
netsum =5.071271E-02; netsum += feature4[16] * .4147046;
netsum += feature2[3] -2.919186E-02;
netsum += feature2[4] * 5.128121E-02; netsum =-1.019337E-02;
netsum += feature2[7] * 8.516921 E-03; netsum += feature2[2) * -6.482209E-04;
netsum += feature2[9] .1752574; netsum += feature2[4) * 9.019101E-03;
netsum += feature2[1 O] * -4.661101 E-03; netsum += feature2[5) * 9.856169E-07;
netsum += feature2[15] * .0107634; netsum += feature2[1 O) * -2.136722E-02;
netsum += feature2[17] -.4649758; netsum += feature2[12) * -5.280835E-02;
netsum += -6.182407E-02; netsum += feature2[14] * 5.104686E-04;
netsum += feature3[5] * -2.214095E-02; netsum += feature3[0] * .1 040232;
netsum += feature3[17] * -.530643; netsum += feature3[12] * .1 028695;
239

netsum += feature3[14] * -.2678148; netsum += feature3[9] -1.248089;
netsum += feature3[15] * .3520798; netsum += feature3(1 O] * 1.692409E-02;
netsum += feature3[17] * .9335116; netsum += feature3[12] * -.13161 09;
netsum += feature4[1] * -.8211353; netsum += feature3[16)* 8.040012E-04;
netsum += feature4[2] * -5.183973E-03; netsum += feature3[17] .1384543;
netsum += feature4[4] * .1050517; netsum += -1.164293E-03;
netsum += feature4[5] * 5.154572E-03; netsum += feature4[0] -3.173422E-02;
netsum += feature4[6] * -5.1 09112E-02; netsum += feature4[1] 6.851327E-02;
netsum += feature4(11] * -6.984262E-02; netsum += feature4[6] * -4.702201E-02;
netsum += feature4[18] * 1.152791; netsum += feature4[13] * -2.304204E-03;
outarray[23] = 1/ (1 + exp(-netsum)); netsum += feature4[14] * 8.502305E-02;
netsum += feature4[15] * .4848588;
netsum =-.3122944; netsum += feature4[16] * -.4873836;
netsum += feature2[2] * 7.219229E-03; outarray[24] =1/ (1 + exp(-netsum));
netsum += feature2[3] * .0175929;
netsum += feature2[4] * 9.624824E-03; netsum =-9.236737E-02;
netsum += feature2(5] * 1.046722E-02; netsum += feature2[0] * -3.752801 E-02;
netsum += feature2[7] * -3. 752582E-03; netsum += feature2[2] * 7.408828E-03;
netsum += feature2[9] * -5.605888E-02; netsum += feature2[4]* 9.752621E-03;
netsum += feature2[11] * 1. 700676E-02; netsum += feature2[6] * -4.908881E-02;
netsum += feature2[16] * 8.435206E-03; netsum += feature2[11]* .017046;
netsum += feature2[17] * .1017169; netsum += feature2[12]* .0233209;
netsum += .1682727; netsum += feature2[14] * 5.254865E-03;
netsum += feature3[6] * -1.634625E-02; netsum += feature3[1]* 1.009643E-02;
netsum += feature3[7] * -3.071839E-02; netsum += feature3[2]* .416838;
240

netsum += feature3[8] * -6.952421E-02; netsum += feature3[3] * 2.513378;
netsum += feature3[1 O) * 1.550516E-02; netsum += feature3[5] * -.2843841;
netsum += feature3[11) * 7.537408E-02; netsum += feature3[6) * -1.975059E-02;
netsum += feature3[14) * .212317; netsum += feature3[9] * -1.259662;
netsum += feature3[18] * .1758579; netsum += feature3[13) * .1 007254;
netsum += 9.551171E-03; netsum += feature3[14) * .2126826;
netsum += feature4[1 O] * 8.121975E-04; netsum += feature4[5] * 1.520259E-03;
netsum += feature4[11) * -3.678751 E-02; netsum += feature4[6J * -4.407148E-02;
netsum += feature4[15] * .485461; netsum += feature4[1 O] * 1.126536E-03;
outarray(25] = 1/ (1 + exp(-netsum)); netsum += feature4[14] * 7.989404E-02;
netsum += feature4[15) * .4789284;
netsum = -.2007456; netsum += feature4[16] * -.4884964;
netsum += feature2[2] * 7.706334E-03; outarray[26] = 1/ (1 + exp(-netsum));
netsum += feature2[3) * 1.768165E-02;
netsum += feature2[4) * 9.845636E-03; netsum = 8.774314E-02;
netsum += feature2[9] -5.466441 E-02; netsum += feature2[4] * 8.122072E-03;
netsum += feature2[10) * 2.331802E-02; netsum +=feature2[5]* .0151474;
netsum += feature2[11] * 1.698745E-02; netsum += feature2[6J * -.1653514;
241

netsum += feature2[14) * 2.213621E-03; netsum += feature2[9) * .1920091;
netsum += feature2[16) * O; netsum += feature2[11} * -2.726485E-02;
netsum += feature2[17] * .130434; netsum += feature2[12} * -.0173829;
netsum += feature2[18)* .2349476; netsum += feature2[13} * .1348482;
netsum += .2297904; netsum += feature2[14} * -2.02684E-03;
netsum += feature3[0) * .3061219; netsum += feature2[15} * 1.130728E-02;
netsum += feature3[1) * 3.596778E-03; netsum += feature2[16}* 5.677994E-03;
netsum += feature3[3) * 2.514005; netsum += feature2[18} * .1352548;
netsum += feature3[4} * .2642949; netsum += 5.142139E-02;
netsum += feature3[5)* -.2748903; netsum += feature3[0) * 8.186588E-02;
netsum += feature3[6] * -9.869166E-03; netsum += feature3[1}* -.1375047;
netsum += feature3[8]* -6.040112E-02; netsum += feature3[3} * -3.205522;
netsum += feature3[9] * -1.252432; netsum += feature3[4} * -.3823555;
netsum += feature3[10} * .0196349; netsum += feature3[5}* 4.441877E-02;
netsum += feature3[11] * 8.905173E-02; netsum += feature3[6} * -2.707238E-02;
netsum += feature3[13]* -.2457282; netsum += feature3[8] * 3.387453E-02;
netsum += feature3[15] * -9.301877E-03; netsum += feature3[10} * -3.347418E-02;
netsum += feature3[16)* 6.327328E-03; netsum += feature3[11} * -3.570744E-02;
netsum += feature3[17) * .1384088; netsum += feature3[12} * .2908891;
netsum += feature3[18} * .2093181; netsum += feature3[13] * -2.873508E-02;
netsum += feature4[1]* 7.609858E-02; netsum += feature3[16] * -6.038167E-02;
netsum += feature4[3} * -8.93079E-03; netsum += feature3[18) * -.1160601;
netsum += feature4[4} * -.6317115; netsum += .1962309;
netsum += feature4[5] * -1.104471 E-03; netsum += feature4[0] * .0412099;
netsum += feature4[13}* -2.881045E-03; netsum += feature4[8] * 2. 78588E-04;
netsum += feature4[15] * .5210128; netsum += feature4[10] * -2.265931 E-02;
netsum += feature4[16} * -.4821889; netsum += feature4[11] * -1.426175E-02;
netsum += feature4[17] * .1310595; netsum += feature4{12] * -9.704468E-03;
netsum += feature4[18} * -.1768522; netsum += feature4[13] * -5.1 06063E-03;
outarray[27] = 1/ (1 + exp(-netsum)); netsum += feature4[14] * .1252566;
netsum =--.1274231;
- netsum += feature4[15] * -.1921712;
netsum += feature4[16] * .6889777;
netsum += featur.e2[0} * 3.253035E-02; netsum += feature4[17] * -.221988;
-.netsm +~ feature2[1} * 3.157623E-03; netsum += feature4[18} * -.2048055;
netsum +.:;; featre2[2) * 2.186258E-03; outarray[28] = 1/ (1 + exp(-netsum));
netsum += feature2[3) * -3.338064E-02;
rietsum += feaiure2[4] * 3.523182E-02; netsum = -8.721392E-02;
netsum +=" feature2[5] * -3.170617E-03; netsum += feature2[0] * 3.145462E-02;
netsin+=feature2[6]* -.1295404; netsum += feature2[1) * 5.237772E-03;
netsu111 +7,, feature2[7] * 2.81 0675E-02; netsum += feature2[2} * 1.270802E-03;
242
netsum += feature2[3] * -3.371575E-02;

netsum += feature2[4] * .0345672; netsum =-.1049099;
netsum += feature2[6] * -.1145221: netsum += feature2[1] * 3.542572E-03;
netsum += feature2[16] * 5. 763866E-03; netsum += feature2[ 11] * -2. 725445E-02;
netsum += feature3[3] * -3.206589; netsum += feature2[18) * .1325816;
netsum += feature3[11] * -2. 797879E-02; netsum += feature3[6] * -2.665149E-02;
netsum += feature4[0] * 4.169701 E-02; netsum += feature3[15] * .1118643;
netsum += feature4[4] * .3191333; netsum += 9.679858E-03;
netsum += feature4[5] * 2.341301 E-03; netsum += feature4[0] * 4.137009E-02;
netsum += feature4[6] * -4.499835E-03; netsum += feature4[11 * 7.059075E-02;
netsum += feature4[7] * -.247718; netsum += feature4[2J * -2.067519E-02;
netsum += feature4[8] * 5.920499E-04; netsum += feature4[3] * 5. 738097E-02;
outarray[29] =1/ (1 + exp(-netsum)); netsum += feature4[14] * .1274642;
243

netsum += feature4[16] * .6893013; netsum += feature4[11] * -8.42m1 E-03;
outarray[30] =1/ (1 + exp(-netsum)); netsum += feature4[14] * .1286326;
netsum += feature4[15] * -.1791366;
=
netsum -.0600148; netsum += feature4[16] * .6907213;
netsum += feature2[2] * 1.530765E-03; outarray[31] =1/ (1 + exp(-netsum));
netsum += feature2[3] * -3.355604E-02;
netsum += feature2[4] * 3.493681 E-02; =
netsum -9.187103E-02;
netsum += feature2[6] * .2538828; netsum += feature2(1] * -7.32707E-03;
netsum += feature2[8] * 6. 799944E-02; netsum += feature2[3] * 1.782686E-02;
netsum += -7.031105E-02; netsum += feature2[14] * 3.013075E-03;
netsum += feature3[4] * -.3826703; netsum += .1132207;
netsum += feature3(5] * 4.821804E-02; netsum += feature3[0] * .4515386;
netsum += feature3[6] * -2. 728586E-02; netsum += feature3[1] * 2.573948E-03;
netsum += feature3[11] * -3.092601 E-02; netsum += feature3[6] * -7.589861 E-03;
netsum += feature4[4] * .3263208; netsum += -3.197893E-02;
244

netsum += feature4[6) * -1. 735487E-02; netsum += feature4[1) * 5.453941 E-02;
netsum += feature4[7] * .1 019852; netsum += feature4[2]* 9.7913nE-03;
netsum += feature4[11) * -6.866446E03; netsum += feature4[6] * -1.838974E-02;
netsum += feature4[12]* 2.388082E-04; netsum += feature4[7] * 7.985627E-02;
netsum += feature4[13]* -2.260559E-03; netsum += feature4[8] * -7.460373E-03;
netsum += feature4[14] * 7.252646E-02; netsum += feature4[9]* -4.498733E-02;
netsum += feature4[15] * .403869; netsum += feature4[1 O) * -1.633276E-03;
netsum += feature4[18]* -7.749186E-02; netsum += feature4[13] * -2.314383E-03;
=
outarray(32] 1/ (1 + exp(-netsum)); netsum += feature4[14] * 9.125392E-02;
netsum += feature4[15] * .4365337;
=
netsum -8.866863E-02; netsum += feature4[16] * -.5234548;
netsum += feature2[0] * -3.n3298E-02; netsum += feature4[17) * .14202;
netsum += feature2[2] * 1.103521 E-02; outarray[33] =1/ (1 + exp(-netsum));
netsum += feature2[3] * 1.784109E-02;
netsum += feature2[4] * 3.712293E-02; =
netsum -.2227241;
netsum += feature2[8] * -.2333352; netsum += feature2[3] * 1.n1083E-02;
netsum += feature2[11] * 2.2n656E-02; netsum += feature2[6] * -.16491 03;
netsum += feature2[12] * 2.171639E-03; netsum += feature2[7] * -7.n1479E-03;
netsum += feature2[13] * 8.376247E-02; netsum += feature2[8] * -.1 036992;
netsum += feature3[0] * 5.869245E-02; netsum += feature2[15] * 8.1 07398E-02;
netsum += feature3[.1] * .1394857; netsum += feature2[16] * -5.56872E-03;
netsum += feature3[2] * .8916055; netsum += feature2[17) * -5.615581 E-05;
netsum += feature3[3] * 3.228801; netsum += feature2[18] * -1. 760276E-02;
netsum += feature3(7] * .3345336; netsum += feature3[2] * .8939815;
netsum += feature3[8]* -1.907449E-02; netsum += feature3[3] * 3.196702;
netsum += feature3[9] * -1.445491; netsum += feature3[4) * .3164403;
netsum += feature3[13]* -.2228625; netsum += feature3[8] * -2.192419E-02;
netsum += feature3[14] * .16969n; netsum += feature3[9] * -1.412001;
245

netsum += feature4[3] * 7.036134E-03; netsum +=feature3[18] * .2151921;
netsum += feature4[4] * -.1962309; netsum += 6.659403E-02;
netsum += feature4{15] * .4277457; netsum += feature4[10] * 3.964835E-03;
netsum += feature4[18] * -1.615274E-02; netsum += feature4[13] * O;
outarray[34] = 1/ (1 + exp(-netsum)); netsum += feature4[14] * -5.029957E-02;
netsum += feature4[15] * .2113835;
netsum = 6.950495E-02; netsum += feature4[16] * -.3619273;
netsum += feature2[2] * 5.409617E-03; outarray[35] = 1/ (1 + exp(-netsum));
netsum += feature2[3] * 2.046173E-02;
netsum += feature2[4] * -3.704919E-02; netsum = .371611;
netsum += feature2[10] * -.0746823; netsum += feature2[5] * O;
netsum += feature2[17] * .2246342; netsum += feature2[12] * -1. 751352;
netsum += feature3(1] * -.7150341; netsum += feature2[16] * 2.651115E-02;
netsum += feature3[3] * 1.47271; netsum += feature2[18] * 1.127647;
netsum += feature3[7] * .0220762; netsum += feature3[2] * 4.121 078;
n~tsum += feature3[9] * -1.353614; netsum += feature3[4] * .2331914;
246

netsum += feature3[6) * 1.821139; netsum += feature3[1) * .14398;
netsum += feature3[7) * 2.462906; netsum += feature3[2] * -1.278632;
netsum += feature3[12] * 1.444201; netsum += feature3[7) * .811559;
netsum += feature3[14] * -1.543293; netsum += feature3[9] * -1.758041;
netsum += feature3[15] * -2.532481E-02; netsum += feature3[1 O] * -1.840511;
netsum += -9.571709E-02; netsum += feature3[14] * -1.817738;
netsum += feature4[2) * 1.572031E-02; netsum += feature3[17) * 2.915928;
netsum += feature4[3) * 1.640785; netsum += feature3[18] * -.3117751;
netsum += feature4[4) * -4.086291; netsum += -.2076916;
netsum += feature4[6] * -.2722533; netsum += feature4[1J * -1.458866;
netsum += feature4[7) * -1.029774; netsum += feature4[2] * 6.573024E-02;
netsum += feature4[9] * 7.342882E-02; netsum += feature4(4] * -.1874862;
netsum += feature4[1 O)* -.3842966; netsum += feature4[5] * -1.011646;
netsum += feature4[13] * -.239762; netsum += feature4[8] * 1.553041 ;
netsum += feature4[14] * -.5526069; netsum += feature4[9J * -4.316342E-02;
netsum += feature4[17) * -2.003938; netsum += feature4[12] * -1.499956;
=
outarray[36] 1/ (1 + exp(-netsum)); netsum += feature4[14] * 1.263607;
netsum += feature4[15] * -1.222317;
netsum =-.1305978; netsum += feature4[16] * .691096;
netsum += feature2[2] * -.6410506; outarray(37] = 1/ (1 + exp(-netsum));
netsum += feature2[3] * 1.347134;
netsum += feature2(4] * .876291; netsum =-.8043524;
netsum += feature2[5] * -.2141008; netsum += feature2[0) * .171 0643;
netsum += feature2(6] * -.2639521; netsum += feature2[1) * .2195557;
netsum += feature2[7) * .9694061; netsum += feature2[2) * 2.699094;
netsum += feature2(9] * -.3518944; netsum += feature2[4) * -.8684938;
n~tsum += feature2[12] * .7704247; netsum += feature2[7) * .587549;
netsum += feature2[13J * -.2354016; netsum += feature2[8] * -.8452105;
netsum += feature2(18] * -.1487872; netsum += feature2[13] * -1.021009;
netsum += -.4094036; netsum += feature2[14] * -1.062612;
247

netsum += feature2[16] * 2.079563; netsum += feature2{11) * -1.69897;
netsum += feature2[17] * 1.617552; netsum += feature2[12) * -.2012461;
netsum += -1.244801; netsum += feature2[14) * .5048268;
netsum += feature3(1] * .4089036; netsum += feature2[16) * -.558277;
netsum += feature3[4] * -3.835225; netsum += -.2500765;
netsum += feature3[8] * -1. 794084; netsum += feature3(3] * -.2995635;
netsum += feature3[11] * -2.19778; netsum += feature3(6] * -.7055873;
netsum += feature3[16] * -5.630291 E-02; netsum += feature3[11] * 1.120425;
netsum += -1.216212; netsum +=feature3[14] * 1.241842;
netsum += feature4[1] * .3370137.; netsum += feature3[16] * -.0283204;
netsum += feature4[9] * -1.073189; netsum += feature4[4] * 1.291907;
netsum += feature4[15] * .5855124;
netsum = -.4042704; netsum += feature4[16] * .9344859;
netsum += feature2(0] * -.2065078; netsum += feature4[17] * .2788305;
netsum += feature2[2] * 4.894628E-02; outarray[39] = 1 1(1 + exp(-netsum));
netsum += feature2(3] * -2.235207Ec02;
netsum += feature2[4] * .1834634;
netsum += feature2[5] * 2.1 0359; outarray[O] = 5215.79 * (outarray[O]- .1) 1.8
netsum += feature2(6] * .1384059; + 47.36842;
netsum += feature2[7] * .2524251; if (outarray[O]< 47.36842) outarray[O} =
netsum += feature2[8] * -.275492; 47.36842; .
netsum += feature2[9] * -.273244;
248
if (outarray(O]> 5263.158) outarray(O] = outarray[9] = 2705.764 * (outarray[9]- .1) 1

5263.158; .8 + 47.19857;
outarray(1) = 3890.979 * (outarray(1)- .1) 1 47.19857;
.8 + 35.33684; if (outarray(9]> 2752.963) outarray[9] =
if (outarray(1]< 35.33684) outarray(1) = 2752.963;
35.33684;
if (outarray(1)> 3926.316) outarray(1) = outarray[10] = 2275.268 * (outarray[10)- .1)
3926.316; 1.8 + 39.68911;
if (outarray(10)< 39.68911) outarray[10) =
outarray(2] = 2302.734 * (outarray[2]- .1) 1 39.68911;
.8 + 10.71738; if (outarray[10]> 2314.957) outarray[10] =
if (outarray(2)< 10.71738) outarray(2] = 2314.957;
10.71738;
if (outarray(2]> 2313.451) outarray(2] = outarray(11] = 1893.839 * (outarray(11]- .1)
2313.451; 1.8 + 33.03556;
=
if (outarray[11]< 33.03556) outarray(11)
=
outarray(3] 29.12 * (outarray(3]- ~1) /.8 + 33.03556;
. 2.88; if (outarray[11)> 1926.874) outarray(11] =
if (outarray[3]< 2.88) outarray(3) = 2.88; 1926.874;
if (outarray[3)> 32) outarray[3] = 32;
outarray(12] = 32.73576 * (outarray[12]- .1)
outarray(4] = 13.80261 * (outarray[4]- .1) 1 1.8 + 3.637307;
.8 + 1.533623; if (outarray(12]< 3.637307) outarray(12] =
if (outarray(4]< 1.533623) outarray(4) = 3.637307;
1.533623; if (outarray[12]> 36.37307) outarray[12] =
if(outarray(4]> 15.33623) outarray(4] = 36.37307;
15.33623;
outarray[13] = 45.83006 * (outarray[13]- .1)
outarray(5) = 16.90467 * (outarray[5)- .1) 1 1.8 + 5.092229;
.8 + 1.878297; if (outarray[13]< 5.092229) outarray(13] =
if (outarray(5]< 1.878297) outarray[5] = 5.092229;
1.878297; if (outarray(13]> 50.92229) outarray(13] =
if (outarray[5]> 18.78297) outarray(5] = 50.92229;
18.78297;
outarray[14) =49.88306 * (outarray(14]- .1)
outarray(6] = 23.90682 * (outarray(6]- .1) 1 1.8 + 5.542562;
.8 + 2.656313; if (outarray[14]< 5.542562) outarray[14] =
if (outarray[6]< 2.656313) outarray[6] = 5.542562;
2.656313; if (outarray(14]> 55.42562) outarray(14] =
if (outarray(6]> 26.56313) outarray(6] = 55.42562;
26.56313;
=
outarray[15] 54.5596 * (outarray(15]- .1) 1
outarray[7) = 34.50652 * (outarray[7]- .1) 1 .8 + 6.062178;
.8 + 3.834058; if(outarray[15]< 6.062178) outarray(15] =
if (outarray[7)< 3.834058) outarray(7] = 6.062178;
3.834058; if (outarray(15)> 60.62178) outarray[15] =
if (outarray[7]> 38.34058) outarray[7] = 60.62178;
38.34058;
outarray[16) = 1588.626 * (outarray[16]- .1)
outarray(8) = 2994.421 * (outarray(8)- .1) 1 /.8 + 193.6794;
.8 + 52.23381; if (outarray[16]< 193.6794) outarray[16] =
if (outarray[8)< 52.23381) outarray[8)= 193.6794;
52.23381; =
if (outarray(16]> 1782.305) outarray(16]
if (outarray[8)> 3046.655) outarray[8) = 1782.305;
. 3046.655;
249
outarray(17) = 1435.485 * (outarray[17)- .1) if (outarray[25]< 45.503) outarray[25) =

1.8 + 175.0091; 45.503;
if (outarray[17]< 175.0091) outarray[17] = if (outarray{25]> 4788.296) outarray[25) =
175.0091; 4788.296;
if (outarray(17]> 1610.494) outarray[17) =
1610.494; outarray{26] =3988.198 * (outarray{26]- .1)
1.8 + 38.26331;
outarray(18) = 1207.094 * (outarray[18)- .1) if (outarray{26]< 38.26331) outarray{26] =
/.8 + 147.1645; 38.26331;
if (outarray[18)< 147.1645) outarray[18] = if (outarray[26]> 4026.461) outarray[26] =
147.1645; 4026.461;
=
if (outarray[18]> 1354.259) outarray[18]
1354.259; outarray[27) = 3319.609 * (outarray[27]- .1)
1.8 + 31.84878;
outarray[19) = 2686.88 * (outarray[19]- .1) 1 if (outarray[27]< 31.84878) outarray[27) =
.8 + 207.5974; 31.84878;
if (outarray[19]< 207.5974) outarray[19] = if (outarray[27]> 3351.458) outarray[27) =
207.5974; 3351.458;
2894.477; outarray{28] =35.42667 * (outarray{28]- .1)
/.8 + -16.66848;
outarray[20] = 1884.143 * (outarray[20]- .1) =-
if (outarray{28]<-16.66848) outarray{28]
1.8 + 50.99396; 16.66848;
if(outarray[20]< 50.99396) outarray[20] = =
if (outarray[28]> 18.75819) outarray[28]
50.99396; 18.75819;
if(outarray[20)> 1935.137) outarray[20) =
1935.137; =
outarray[29] 46.05468 * (outarray[29]- .1)
1.8 + -26.76903;
outarray[21] = 2919.206 * (outarray[21)- .1) if (outarray[29]<-26.76903) outarray[29] =-
1.8 + 79.00773; 26.76903;
if (outarray(21]< 79.00773) outarray[21] = if (outarray[29]> 19.28565) outarray[29] =
79.00773; 19.28565;
if(outarray[21)> 2998.214) outarray[21) =
2998.214; outarray[30] =36.84374 * (outarray[30]- .1)
/.8 + -18.41522;
outarray(22] = 3778.547 * (outarray[22]- .1) if (outarray[30]<-18.41522) outarray[30] =-
1.8 + 102.2656; 18.41522;
if (outarray[22]< 102.2656) outarray[22] = if (outarray[30]> 18.42852) outarray[30] =
102.2656; 18.42852;
if(outarray[22]> 3880.813) outarray[22] =
3880.813; outarray[31j =23.02734 * (outarray[31]- .1)
1.8 + -6.634514;
outarray(23] = 2275 * (outarray[23]- .1) 1.8 if (outarray[31]<-6.634514) outarray{31] =-
+ 225; 6.634514; .
if (outarray[23]< 225) outarray[23] =225; if (outarray[31]> 16.39283) outarray[31] =
if (outarray[23]> 2500) outarray[23] = 2500; 16.39283;
=
outarray[24] 5248.764 * (outarray[24]- .1) outarray[32] =3173.586 * (outarray[32]- .1)
1,8 + 50.35735; /.8 + 10.63496;
if (outarray[24]< 50.35735) outarray{24] = if (outarray(32)< 10.63496) outarray[32] =
50.35735; 10.63496;
5299.121; 3184.221;
outarray[25) = 4742.793 * (outarray[25]- .1) outarray[33] = 3969.239 * (outarray[33]- .1)

1.8 + 45.503; /.8 + -29.25188;
250
if (outarray[33]<-29.25188) outarray[33] =-29.25188;

if (outarray[33]> 3939.987) outarray[33] =3939.987;
outarray[34] = 3928.705 * (outarray[34]- .1) /.8 + -91.49915;

if (outarray[34]<-91.49915) outarray[34] = -91.49915;
if (outarray[34]> 3837.206) outarray[34] = 3837.206;
outarray[35] = 1081.068 * (outarray[35]- .1) 1.a + 65.61992;

if (outarray[35]< 65.61992) outarray[35] = 65.61992;
if(outarray[35)> 1146.6aa) outarray[35] = 1146.6aa;
outarray[36] = 10 * (outarray[36]- .1) 1.a;

=
outarray[37] = 10 * (outarray[37]- .1) /.a;

if (outarray[37)> 10) outarray[37] = 10;
outarray[3a) = 1O* (outarray[3a) - .1) 1.a ;

if (outarray[3a]< O) outarray[3a) = O;
if (outarray[3a]> 10) outarray[3a] = 10;
outarray[39] = 10 * (outarray[39]- .1) /.a;


Vidal BV

Cargado por

Información del documento

Título original

Derechos de autor

Formatos disponibles

Compartir este documento

Compartir o incrustar documentos

Opciones para compartir

¿Le pareció útil este documento?

¿Este contenido es inapropiado?

Copyright:

Formatos disponibles

Vidal BV

Cargado por

Copyright:

Formatos disponibles

UNIVERSIDAD NACIONAL DE INGENIERiA

FACULTAD DE INGENIERA MECNICA

ANLISIS DEL DIMENSIONAMIENTO DE UNA TURBINA

MAESTRO EN CIENCIAS, MENCIN INGENIERA

VCTOR BEDER VIDAL BARRENA

A mi madre: Graciela Barrena de

Agradezco a mis asesores del proyecto, a /os doctores Csar Cebreros

1.1 Revisin Bibliogrfica 11

DISEO DE LAS DIMENSIONES PRINCIPALES

3.1 Diseo de las Dimensiones de una turbina por el mtodo

REFERENCIAS BIBLIOGRFICAS 175

ANEXO A NEUROSHELL2 181

ANEXO B CODIGO GENERADOR POR NEUROSHELL 2 193

Fig. 1.1 Comparacin de la demanda de energa hidrulica - 4

Fig. 2.17 Turbina Michell 48

Fig. 3.25 Entrenamiento a los 5 minutos 122

Fig. 4.16 Dimensiones de una turbina Kaplan: M4 147

Fig. A.4 Barra de men al seleccionar: examples 183

Tabla 1.1 Clasificacin de las turbinas hidrulicas 17

Tabla 4.1 Clculo de seleccin de una turbina Michell 134

Tabla 5.18 Desviacin de resultados: Potencia Hlice 168

Ancho entre labes

mo la capacidad de aprendizaje, de auto correccin y razonamiento.

Palabras Claves: Turbinas Hidrulicas, Experto, Red Neuronal artificial, neuronas,

Keywords: Hydraulic Turbines, Expert, Artificial neural network, neurons, den-

Desde la antigedad, el hombre ha buscado medios para que su labor

Puede decirse que el cerebro humano es un elemento de procesamiento

Los sistemas expertos constituyen una de las principales aplicaciones de

La clasificacin como: grandes centrales producen energa elctrica su-

En el primer captulo de este trabajo se trata sobre el estado del arte de

En el segundo captulo, se expone en forma detallada la informacin te-

En el tercer captulo, se utilizan los mtodos: tradicional y el proceso se-

puedan ser fcilmente aplicadas y programadas como las que utilizaramos en un

Luego se exhibe los resultados del proyecto y el anlisis comparativo en-

Durante la ltima dcada, las RNA han atrado la atencin de multitud de

PLANTEAMIENTO DEL PROBLEMA.

Como resuelvo el dimensionamiento de las turbinas hidrulicas uti-

Como utilizo el lenguaje C++ generado por el NeuroShell 2 en la so-

Actualmente la generacin de energa elctrica es tal vez una de las prin-

Segn el Ministerio de Energa y Minas, el Per requiere de una inversin

PARnCJPAON DE LA PRODUCCIN DE ENERGfA EliCTRICA POR EMPRESA YORIGEN

El Ministerio de Energa y Minas (MEM), a travs de la Direccin General

FORMULACIN DEL PROBLEMA.

Para resolver el dimensionamiento y seleccin, ante la gran variedad de

un mtodo que permita la seleccin y dimensionamiento de las dimensiones

Actualmente no se conoce con informacin publicada para calcular y

El Software el NeuroShell 2 es un programa para Windows que se utiliza

NeuroShell 2 genera/compila automticamente una DLL, que podr ser

1. Mtodo analtico o tradicional,

OBJETO DEL ESTUDIO.

Es desarrollar un software que permita a los usuarios llevar a cabo varias

El objetivo de la presente investigacin, es desarrollar una metodologa

El desarrollo del presente trabajo comprende:

Determinacin de la potencia y el nmero especfico que se producen

Determinacin de las dimensiones principales de una turbina hidrulica,

Se realizaran predicciones para caudales que varan desde los 0.03

La importancia de este proyecto se basa en lo siguiente:

1. En el Per existen muchos poblados y se estima que hay un 40% de

2. En la actualidad en el Per no se tiene la experiencia necesaria para

3. Las energas renovables constituyen para nuestro pas, nuevas alterna-

4. Un sistema inteligente es capaz de asesorar al diseador inexperto en

El proyecto de investigacin realizada utiliza el NeuroShell2 que genera

La investigacin se ha realizado en el laboratorio CIM de la Facultad de