<?xml version="1.0" encoding="ISO-8859-1"?><article xmlns:mml="http://www.w3.org/1998/Math/MathML" xmlns:xlink="http://www.w3.org/1999/xlink" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
<front>
<journal-meta>
<journal-id>1815-5901</journal-id>
<journal-title><![CDATA[Ingeniería Energética]]></journal-title>
<abbrev-journal-title><![CDATA[Energética]]></abbrev-journal-title>
<issn>1815-5901</issn>
<publisher>
<publisher-name><![CDATA[Universidad Tecnológica de La Habana José Antonio Echeverría, Cujae]]></publisher-name>
</publisher>
</journal-meta>
<article-meta>
<article-id>S1815-59012017000100009</article-id>
<title-group>
<article-title xml:lang="es"><![CDATA[Wolfram Mathematica, aplicado a la transferencia de calor, método, solución exacta, para procesos de extrusión]]></article-title>
<article-title xml:lang="en"><![CDATA[Wolfram Mathematica, applied to the heat transfer method exact solution for extrusion processes]]></article-title>
</title-group>
<contrib-group>
<contrib contrib-type="author">
<name>
<surname><![CDATA[Jiménez Ramos]]></surname>
<given-names><![CDATA[Antonio]]></given-names>
</name>
<xref ref-type="aff" rid="A01"/>
</contrib>
<contrib contrib-type="author">
<name>
<surname><![CDATA[Puertas Fernández]]></surname>
<given-names><![CDATA[Juan Francisco]]></given-names>
</name>
<xref ref-type="aff" rid="A02"/>
</contrib>
<contrib contrib-type="author">
<name>
<surname><![CDATA[Lapido Rodríguez]]></surname>
<given-names><![CDATA[Margarita J]]></given-names>
</name>
<xref ref-type="aff" rid="A03"/>
</contrib>
<contrib contrib-type="author">
<name>
<surname><![CDATA[Gómez Sarduy]]></surname>
<given-names><![CDATA[Julio Rafael]]></given-names>
</name>
<xref ref-type="aff" rid="A03"/>
</contrib>
<contrib contrib-type="author">
<name>
<surname><![CDATA[Jiménez Santana]]></surname>
<given-names><![CDATA[Yulier]]></given-names>
</name>
<xref ref-type="aff" rid="A04"/>
</contrib>
<contrib contrib-type="author">
<name>
<surname><![CDATA[Sosa Núñez]]></surname>
<given-names><![CDATA[Fidel]]></given-names>
</name>
<xref ref-type="aff" rid="A04"/>
</contrib>
</contrib-group>
<aff id="A01">
<institution><![CDATA[,Empresa de Producciones Plásticas Vasil Levski.  ]]></institution>
<addr-line><![CDATA[ ]]></addr-line>
<country>Cuba</country>
</aff>
<aff id="A02">
<institution><![CDATA[,Facultad de Ingeniería  ]]></institution>
<addr-line><![CDATA[ ]]></addr-line>
<country>Cuba</country>
</aff>
<aff id="A03">
<institution><![CDATA[,CEEMA  ]]></institution>
<addr-line><![CDATA[ ]]></addr-line>
</aff>
<aff id="A04">
<institution><![CDATA[,Universidad de Guanajuato  ]]></institution>
<addr-line><![CDATA[ ]]></addr-line>
<country>Méjico</country>
</aff>
<pub-date pub-type="pub">
<day>00</day>
<month>04</month>
<year>2017</year>
</pub-date>
<pub-date pub-type="epub">
<day>00</day>
<month>04</month>
<year>2017</year>
</pub-date>
<volume>38</volume>
<numero>1</numero>
<fpage>73</fpage>
<lpage>84</lpage>
<copyright-statement/>
<copyright-year/>
<self-uri xlink:href="http://scielo.sld.cu/scielo.php?script=sci_arttext&amp;pid=S1815-59012017000100009&amp;lng=en&amp;nrm=iso"></self-uri><self-uri xlink:href="http://scielo.sld.cu/scielo.php?script=sci_abstract&amp;pid=S1815-59012017000100009&amp;lng=en&amp;nrm=iso"></self-uri><self-uri xlink:href="http://scielo.sld.cu/scielo.php?script=sci_pdf&amp;pid=S1815-59012017000100009&amp;lng=en&amp;nrm=iso"></self-uri><abstract abstract-type="short" xml:lang="es"><p><![CDATA[Los programas computacionales, para la solución a problemas de la cotidianidad, son muy comunes, por la rapidez en que pueden obtenerse resultados, que por los métodos tradicionales, serían muy trabajosos y sobre todo, aquellos en que las soluciones llevan repetidos cálculos. El trabajo pretende demostrar, como a través de la programación, aplicando el método de la solución exacta, se logran resultados rápidos, precisos, sobre similitudes y diferencias entre distintas geometrías en la transferencia de calor, que demuestran el comportamiento, según parámetros, en igualdad de condiciones, (propiedades geométricas; diámetros, longitud, espesores, volúmenes) y físicas, (conductividad térmica, calor específico y densidad), apreciando cómo influyen, en resultados como, tiempos de enfriamiento, producción según las propiedades físicas y el diseño del equipo, índices de consumo, temperaturas en el centro y superficie y otras, según, el método de extrusión de tuberías plásticas, necesarios en procesos productivos que requieren de monitoreo constantes.]]></p></abstract>
<abstract abstract-type="short" xml:lang="en"><p><![CDATA[Computer programs for the solution to problems of everyday life, are very common, how quickly results can be obtained, than by traditional methods would be very laborious, and the conclusions to be arrived, for those in solutions , lead repeated calculations, even more. The aim of this work is to demonstrate, and through programming with Wolfram Mathematica 8.0 for the method of the exact solution, quick results are achieved and more accurately than by the method of approximation, the first term or any other, making it possible, depending on the worked geometries, perform different types of comparisons or studies demonstrating their behavior, to various parameters taken into account, on equal terms, as they are, geometric properties, as diameter, length, thickness, volume and physical properties such as thermal conductivity, specific heat and density, appreciating how they influence on results as cooling times, production according to the physical properties and equipment design, consumption rates, temperatures in the center and surface and others, according to the method of extruding plastic pipes, very necessary in production processes requiring precise monitoring and constant]]></p></abstract>
<kwd-group>
<kwd lng="es"><![CDATA[procesos de extrusión]]></kwd>
<kwd lng="es"><![CDATA[geometrías simples]]></kwd>
<kwd lng="es"><![CDATA[modelación]]></kwd>
<kwd lng="es"><![CDATA[propiedades físicas]]></kwd>
<kwd lng="es"><![CDATA[transferencia de calor]]></kwd>
<kwd lng="es"><![CDATA[software wolfram mathematica]]></kwd>
<kwd lng="en"><![CDATA[plastic extrusion]]></kwd>
<kwd lng="en"><![CDATA[simple geometries]]></kwd>
<kwd lng="en"><![CDATA[modeling]]></kwd>
<kwd lng="en"><![CDATA[physical properties]]></kwd>
<kwd lng="en"><![CDATA[heat transfer]]></kwd>
<kwd lng="en"><![CDATA[software wolfram mathematica]]></kwd>
</kwd-group>
</article-meta>
</front><body><![CDATA[ <p align="right"><font face="Verdana" size="2"><b>APLICACI&Oacute;N DE LA COMPUTACION</b>    </font></p>     <p>&nbsp; </p>     <P><b><font face="Verdana" size="4">Wolfram Mathematica, aplicado a la transferencia de calor, método, solución exacta, para procesos de extrusión</font></b>     <P>      <p><b><font face="Verdana" size="3">Wolfram Mathematica, applied to the heat transfer method exact solution for extrusion processes</font></b></p>     <p>&nbsp;</p>     <p><font size="2" face="Verdana"><b>MSc. Antonio Jiménez Ramos<sup>1</sup>, Dr. C. Juan Francisco Puertas Fernández<sup>2</sup>, Dr. C. Margarita J. Lapido Rodríguez<sup>3</sup>. Dr. C. Julio Rafael Gómez Sarduy<sup>3</sup>, Lic. Yulier Jiménez Santana<sup>4</sup>, MSc. Fidel Sosa Núñez<sup>4</sup></b></font></p>     <p><font size="2"><font face="Verdana, Arial, Helvetica, sans-serif"><sup>1</sup> Empresa de Producciones Plásticas Vasil Levski.     <br>   <sup>2</sup> Departamento Mecánica, Facultad de Ingeniería, Universidad de Cienfuegos, Cuba. <sup>    <br>   3</sup> Centro de Estudio de Energía y Medio Ambiente (CEEMA), Facultad de Ingeniería, Universidad de Cienfuegos.    ]]></body>
<body><![CDATA[<br>    <sup>4</sup> Universidad de Guanajuato, Méjico.     <br>     </font></font></p>     <p>     <p>&nbsp;</p>     <p>&nbsp;</p> <hr>     <P><font face="Verdana" size="2"><b>RESUMEN</b></font>      <P><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> Los programas computacionales, para la solución a problemas de la cotidianidad, son muy comunes, por la rapidez en que pueden obtenerse resultados, que por los métodos tradicionales, serían muy trabajosos y sobre todo, aquellos en que las soluciones llevan repetidos cálculos. El trabajo pretende demostrar, como a través de la programación, aplicando el método de la solución exacta, se logran resultados rápidos, precisos, sobre similitudes y diferencias entre distintas geometrías en la transferencia de calor, que demuestran el comportamiento, según  parámetros, en igualdad de condiciones, (propiedades geométricas; diámetros, longitud, espesores, volúmenes) y físicas, (conductividad térmica, calor específico y densidad), apreciando cómo influyen, en resultados como, tiempos de enfriamiento, producción según las propiedades físicas y el diseño del equipo, índices de consumo, temperaturas en el centro y superficie y otras, según, el método de extrusión de tuberías plásticas, necesarios en procesos productivos que requieren de monitoreo constantes. </font>     <P><font size="2" face="Verdana, Arial, Helvetica, sans-serif"><b>Palabras clave:</b> procesos de extrusión, geometrías simples, modelación, propiedades físicas, transferencia de calor, software wolfram mathematica.</font> <hr>     <P><font face="Verdana" size="2"><b>ABSTRACT</b></font>      <P><font size="2"><font face="Verdana, Arial, Helvetica, sans-serif">Computer programs for the solution to problems of everyday life, are very common, how quickly results can be obtained, than by traditional methods would be very laborious, and the conclusions to be arrived, for those in solutions , lead repeated calculations, even more. The aim of this work is to demonstrate, and through programming with Wolfram Mathematica 8.0 for the method of the exact solution, quick results are achieved and more accurately than by the method of approximation, the first term or any other, making it possible, depending on the worked geometries, perform different types of comparisons or studies demonstrating their behavior, to various parameters taken into account, on equal terms, as they are, geometric properties, as diameter, length, thickness, volume and physical properties such as thermal conductivity, specific heat and density, appreciating how they influence on results as cooling times, production according to the physical properties and equipment design, consumption rates, temperatures in the center and surface and others, according to the method of extruding plastic pipes, very necessary in production processes requiring precise monitoring and constant. </font></font>     ]]></body>
<body><![CDATA[<P><font size="2"><font face="Verdana, Arial, Helvetica, sans-serif"><b>Keywords: </b>plastic extrusion, simple geometries, modeling, physical properties, heat transfer, software wolfram mathematica. </font></font> <hr>     <P>&nbsp;</P>     <P>&nbsp;</P>     <P><b><font face="Verdana" size="3">INTRODUCCI&Oacute;N </font></b></p>     <p><font size="2" face="Verdana, Arial, Helvetica, sans-serif">El Wolfram Mathematica, por sus características, es  utilizado en áreas científicas de ingeniería, en sus variadas especialidades,  matemáticas y computacionales. Comúnmente considerado como un sistema de álgebra computacional, Mathematica es  también, una poderosa herramienta para las programaciones, de  propósito general. De ahí, que puede ser utilizado, para múltiples soluciones,  a problemas ingenieriles [1-3], siendo un lenguaje, que se actualiza  constantemente, siempre con mayores posibilidades de aplicación.</font></p>     <p><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> Generalmente la solución a problemas de transferencia de  calor en tuberías y placas en la tecnología por extrusión se realizan por el  método de la aproximación del primer término, teniendo en cuenta la facilidad  de cálculo sobre todo para problemas donde no se requiere de una elevada  exactitud, pudiéndose alcanzar con él hasta un 96-98 %, aproximadamente  haciéndose muy complejo alcanzar precisiones superiores sin que se utilice el  de la solución exacta.</font></p>     <p><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> El método de la solución exacta requiere de análisis  numéricos para su solución por la complejidad de sus ecuaciones y de ahí la  utilización de distintos software. Para este caso la solución con Wolfram  Mathematica 8.0, parte siempre de la conformación de las ecuaciones que  representan a cada una de estas geometrías, para el caso de las placas,  coordenadas cartesianas y para las tuberías   coordenadas cilíndricas, las cuales deben ser meticulosamente  desarrolladas, para obtener los resultados deseados, pues la solución para cada  una de ellas, tienen semejanzas [4-6].</font></p>     <p><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> El trabajo pretende demostrar, la viabilidad del uso de  este software, para lograr resultados rápidos y con las presiones que se  requieren, para cada una de las particularidades que  se presenten, pudiendo ser una forma de  comparación de parámetros, como el    comportamiento energético de geometrías diferentes. En este caso, las  placas y tuberías, en volúmenes,   teniendo en cuenta parámetros y materias primas similares, en cuanto a  producción, índices de consumo, tiempos de enfriamiento, temperaturas  exteriores e interiores y otras [7-9]. </font></p>     <P>     <P><b><font size="3" face="Verdana, Arial, Helvetica, sans-serif">MATERIALES Y MÉTODOS</font></b>     ]]></body>
<body><![CDATA[<p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">En la transferencia  de calor, existen muchas formas para la solución de problemas, utilizados en  ingeniería, en este  primer caso,  la solución para la  programación en, Wolfram Mathematica 8.0, corresponde a una placa, rodeada por  un fluido convector, a la temperatura final T<sub>f</sub>, que se introduce  instantáneamente en el fluido en las condiciones en que la resistencia a la  transferencia de calor es muy pequeña, <a href="/img/revistas/rie/v38n1/f0109117.jpg">figura 1</a>. Por el concepto de placa y que  el fluido es el  mismo y se encuentra por  ambos lados, existe simetría y resulta que el coeficiente convectivo hc,  será el mismo entre ambas semiplacas, de forma que, considerando esta placa  infinita de espesor (esp. = 2 L) para la que en el tiempo  (<i>t</i> =  0), existe una distribución de temperatura conocida y en la que no existen  efectos de bordes, se aplica la  ecuación  diferencial [1-10-11],  <a href="#e1">ecuación (1)</a>.</font></p>     
<p align="center"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"><img src="/img/revistas/rie/v38n1/e0109117.gif" width="316" height="72"><a name="e1"></a></font></p>     
<p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Haciendo cambio de  variable Ф = <i>T </i>- <i>T</i>f con <i>Tf </i>≠  0;  <a href="#e2">ecuación  (2)</a>:</font></p>     <p align="center"><img src="/img/revistas/rie/v38n1/e0209117.gif" width="191" height="55"><a name="e2"></a></p>     
<p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">  Cuya solución general  es; <a href="#e3">ecuación (3)</a>:</font></p>     <p align="center"><img src="/img/revistas/rie/v38n1/e0309117.gif" width="371" height="50"><a name="e3"></a></p>     
<p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> Y las condiciones de  contorno.</font></p>     <p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> Para <i>T</i> = 0,    -<i>L</i> ≤ <i>X</i> ≥ <i>L</i>; Ф =<i> f</i><sub>(x) </sub>ó <i>T</i><sub>o</sub> 2- Para<i>  T &gt; </i>0 se cumplirá  que<i>; </i><a href="#e4"></a><a href="/img/revistas/rie/v38n1/e0409117.gif">ecuación (4)</a>:</font></p>     
<p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Como el fluido a  ambos lados de la placa es el mismo entonces.    <br> Ф - <i>x</i> = Ф + <i>x;</i> entonces <img src="/img/revistas/rie/v38n1/s0109117.gif" width="138" height="55" align="middle">  y la igualdad se  cumple para cualquier valor de Ф.</font></p>     
]]></body>
<body><![CDATA[<p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Teniendo en cuenta la  condición de contorno <i>x</i> = 0      <a href="#e5">ecuación (5)</a>:</font></p>     <p align="center"><img src="/img/revistas/rie/v38n1/e0509117.gif" width="533" height="69"><a name="e5"></a></p>     
<p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> La solución se reduce  a, <a href="#e6">ecuación   (6)</a>:</font></p>     <p align="center"><img src="/img/revistas/rie/v38n1/e0609117.gif" width="199" height="46"><a name="e6"></a></p>     
<p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> La condición de  contorno en (<i>x</i> = ±<i>L</i>) permite obtener los valores de λ; <a href="/img/revistas/rie/v38n1/e0709117.gif">ecuación  (7)</a>:</font></p>     
<p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">  Dicha ecuación se  satisface para un número infinito de valores del parámetro (&lambda;<i>L</i>), por lo que para  un valor de <i>L</i> dado, sus soluciones  se  encuentran para diversos valores de      &lambda;, con intersección en las curvas: <a href="#e8">ecuación (8)</a>,</font></p>     <p align="center"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"><img src="/img/revistas/rie/v38n1/e0809117.gif" width="254" height="68"><a name="e8"></a>, </font></p>     
<p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">nótese la dependencia  de la ecuación con respecto a <i>B<sub>i</sub></i>.</font></p>     <p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Por lo que la  distribución de temperatura, es una serie de la forma; <a href="#e9">ecuación  (9)</a>:</font></p>     <p align="center"><img src="/img/revistas/rie/v38n1/e0909117.gif" width="571" height="76"><a name="e9"></a></p>     
]]></body>
<body><![CDATA[<p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">En la que      &lambda;n, es la raíz   enésima de la ecuación;  <a href="#e10">ecuación (10)</a></font>:</p>     <p align="center"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"><img src="/img/revistas/rie/v38n1/e1009117.gif" width="230" height="71"><a name="e10"></a></font></p>     
<p align="left">    <br>   <font size="2" face="Verdana, Arial, Helvetica, sans-serif">La condición  inicial &Phi; = <i>f</i>(x) = &Phi;<sub>0</sub>=<i> Cte</i>, para (<i>t</i> = 0) es <a href="#e11">ecuación (11)</a>:</font></p>     <p align="center"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"><img src="/img/revistas/rie/v38n1/e1109117.gif" width="306" height="45"><a name="e11"></a></font></p>     
<p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">  A partir de la cual  se obtiene B<sub>n</sub>, teniendo en cuenta, la teoría de las funciones  ortogonales. </font></p>     <p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> La expresión de la  distribución de temperatura, en la placa infinita,  función de la posición y el tiempo es; <a href="#e12">ecuación  (12)</a>:</font></p>     <p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"><img src="/img/revistas/rie/v38n1/e1209117.gif" width="576" height="77"><a name="e12"></a></font></p>     
<p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Para el caso  particular, en que la primera condición de contorno fuese de la forma &Phi; = <i>f</i>(x) = &Phi;<sub>0</sub>=<i> Cte</i>;  la ecuación anterior se transforma en; <a href="#e13">ecuación  (13)</a>:</font></p>     <p align="center"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"><img src="/img/revistas/rie/v38n1/e1309117.gif" width="516" height="68"><a name="e13"></a></font></p>     
]]></body>
<body><![CDATA[<p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">  La temperatura Ф<i><sub>c </sub></i>= <i>T<sub>c</sub></i> – <i>T<sub>f</sub></i>  en el eje de la placa (<i>x </i>= 0) de espesor (2 L) es;  <a href="#e14">ecuación (14)</a>:</font></p>     <p align="center"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"><img src="/img/revistas/rie/v38n1/e1409117.gif" width="578" height="72"><a name="e14"></a></font></p>     
<p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">  Para el segundo caso,  la  programación en Wolfram Mathematica  8.0, para la tubería,  el procedimiento  es similar al anterior, pero la longitud característica de la placa (L), que  varía de la superficie al centro, es sustituida por la (<i>r</i>), que es el radio, que varía desde la superficie de la tubería,  hasta su radio interior, otra diferencia, en   este caso, es que se resuelve con la ecuación en coordenadas cilíndricas  y son utilizadas, las ecuaciones de Bessel y Newman, debido a la distribución  de temperatura, que existe en este tipo de geometría, además, en la placa,  existe dependencia del número de Biot y en la tubería no; <a href="#e15">ecuación (15</a>):</font></p>     <p align="center"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"><img src="/img/revistas/rie/v38n1/e1509117.gif" width="381" height="76"><a name="e15"></a></font></p>     
<p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">  donde Φ, es la temperatura   adimensional, que es una función del radio y el tiempo, <i>T</i> es la temperatura en grados celsius, <i>T<sub>f</sub>  </i>es la temperatura final.</font></p>     <p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Aplicando  el método de separación de variables, las ecuaciones diferenciales ordinarias  resultantes y sus soluciones son; <a href="/img/revistas/rie/v38n1/e1609117.gif ">ecuación (16)</a>: donde <i>R </i>es una  función, que depende solamente del radio, <i>J</i><sub>0</sub> es la función de <i>Bessel</i> de  primera especie, de orden cero, <i>Y</i><sub>0</sub> es la función de <i>Bessel</i> de segunda  especie, de orden cero o (función de <i>Newman</i>), <i>B<sub>1</sub></i> y <i>B<sub>2</sub></i> son constantes; <a href="#e1117">ecuación (17)</a>:</font></p>     
<p align="center"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"><img src="/img/revistas/rie/v38n1/e1709117.gif" width="513" height="70">  </font></p>     
<p><font size="2" face="Verdana, Arial, Helvetica, sans-serif">  donde θ,  es una función que depende solamente del  tiempo y <i>B</i> es una constante.</font></p>     <p><font size="2" face="Verdana, Arial, Helvetica, sans-serif">  Si se tratara de un cilindro macizo, entonces, como este no  puede admitir en su eje (<i>r</i> = 0), una  solución infinita, por cuanto <i>Y</i><sub>0</sub><i> = </i>- ∞ resulta que <i>B</i><sub>2</sub> tiene que ser (0) y se obtiene una ecuación de la forma;  <a href="#e18">ecuación (18)</a>: </font></p>     <p align="center"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"><img src="/img/revistas/rie/v38n1/e1809117.gif" width="241" height="36"><a name="e18"></a></font></p>     
]]></body>
<body><![CDATA[<p><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> La solución general que proporciona la distribución de  temperatura es; ecuación (19): </font></p>     <p align="center"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"><img src="/img/revistas/rie/v38n1/e1909117.gif" width="441" height="51"><a name="e19"></a></font></p>     
<p><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> En la que <i>B</i>  y &lambda; son constantes que se determinan por las  condiciones de contorno.   La condición inicial es: <img src="/img/revistas/rie/v38n1/s0209117.gif" alt="" width="261" height="20">.</font></p>     
<p><font size="2" face="Verdana, Arial, Helvetica, sans-serif">  La condición para un  cambio brusco de temperatura en la superficie lateral del cilindro infinito es;  <a href="/img/revistas/rie/v38n1/e2009117.gif">ecuación (20)</a>: </font></p>     
<p><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Por lo que <a href="#e21">ecuación (21)</a>:</font></p>     <p align="center"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"><img src="/img/revistas/rie/v38n1/e2109117.gif" width="311" height="44"><a name="e21"></a></font></p>     
<p><font size="2" face="Verdana, Arial, Helvetica, sans-serif">  Que se tiene que  cumplir para cualquier valor de <i>t</i> con  las condiciones:</font></p>     <p><font size="2" face="Verdana, Arial, Helvetica, sans-serif">1) Para, <i>t</i> = 0; 0 ≤ <i>r</i> ≤ <i>R</i>; Φ = <i>f</i>(r) o´ Φ = <i>T</i><sub>0</sub></font><font size="2"><sub></sub></font> </p>     <p><font size="2" face="Verdana, Arial, Helvetica, sans-serif">2) Para t &gt; 0;</font> <img src="/img/revistas/rie/v38n1/s0509117.gif" width="128" height="43"></p>     
<p>  <font size="2" face="Verdana, Arial, Helvetica, sans-serif">Teniendo en cuenta la segunda condición de contorno y que      ,     ]]></body>
<body><![CDATA[<br>   Resulta; <a href="/img/revistas/rie/v38n1/e2209117.gif">ecuación (22)</a>:</font></p>     
<p><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Que se satisface  para infinitos valores de λ con la intersección de las curvas. </font></p>     <p><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> Siendo  los valores de λn raíces de la ecuación; <a href="#e23">ecuación  (23)</a>:</font></p>     <p align="center"><img src="/img/revistas/rie/v38n1/e2309117.gif" width="241" height="73"><a name="e23"></a></p>     
<p><font size="2" face="Verdana, Arial, Helvetica, sans-serif">  Para el caso de una tubería, con condiciones iníciales: <i>t</i> = 0; <i>r<sub>i</sub></i> ≤<i> r</i> ≤ <i>r<sub>e</sub></i>; Ф = <i>f</i>(<i>r</i>) ó Ф<sub>0</sub>, la segunda constante no se hace cero,  como en el cilindro, [1],  esta se busca  también, con las condiciones de contorno según <a href="#f2">figura 2</a>. Su obtención es más  compleja, pues la constate B<sub>2</sub>, no puede ser cero, debido a que el  centro (<i>r</i> = 0), no entra en el dominio  y para poder obtener una solución del problema, se escribe una constante en  función de la otra, a partir de las condiciones de contorno y de esta forma,  aplicando la teoría de funciones ortogonales, se obtiene una expresión para  esta constante. Condiciones de contorno para <i>t </i>&gt; 0; <a href="#e24">ecuación (24)</a>:</font></p>     <p align="center"><img src="/img/revistas/rie/v38n1/f0209117.jpg" width="364" height="491"><a name="f2"></a></p>     
<p align="center"><img src="/img/revistas/rie/v38n1/e2409117.gif" width="575" height="71"><a name="e24"></a></p>     
<p><font size="2" face="Verdana, Arial, Helvetica, sans-serif">  De las condiciones de  contorno, se obtiene la ecuación transcendente, cuyas raíces son los      n de la ecuación solución;   <a href="/img/revistas/rie/v38n1/e2509117.gif ">ecuación (25)</a>. D</font><font size="2" face="Verdana, Arial, Helvetica, sans-serif">onde <i>J</i><sub>1</sub> es la función de <i>Bessel</i> de primera especie, de primer orden y <i>Y</i>1 es la función de <i>Bessel</i> de segunda especie de primer orden.</font></p>     
<p><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> Resultando que la  solución general del problema, es una combinación lineal de infinitas  soluciones, para los infinitos auto valores de λ; <a href="/img/revistas/rie/v38n1/e2609117.gif">ecuación (26)</a>:</font></p>     
<p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">  La  temperatura <i>a</i> dimensional  queda en  función del tiempo y el radio, (<i>ri </i>y <i>re</i>).</font> <font size="2" face="Verdana, Arial, Helvetica, sans-serif">Donde: tempí, es la  temperatura <i>a</i> dimensional en el radio  interior de la tubería;  temp = Ф(<i>re</i>,<i>t</i>): Temperatura <i>a </i>dimensional  en el radio exterior de la tubería.</font></p>     ]]></body>
<body><![CDATA[<p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> Se calcula finalmente, la temperatura para  cualquier tiempo y espesor [14]. Para la temperatura en la superficie o  radio exterior (<i>T<sub>s</sub></i>); <a href="#e27">ecuación 27</a>:</font></p>     <p align="center"><img src="/img/revistas/rie/v38n1/e2709117.gif" width="239" height="52"><a name="e27"></a></p>     
<p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> y para la temperatura intermedia o radio  interior  (<i>T</i>0); <a href="#e28">ecuación (28)</a>:</font></p>     <p align="center"><img src="/img/revistas/rie/v38n1/e2809117.gif" width="248" height="55"><a name="e28"></a></p>     
<p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">  Suposiciones, la  convección es forzada pues el agua se mueve impulsada por bombas.</font></p>     <p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> Para darle solución a  todos estos casos, es necesario conocer o hacer algunos cálculos como:</font></p>     <p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> Ancho: l<sub>1</sub> = Altura:  l<sub>2</sub> Longitud: Por lo tanto área de la bañera será: A<sub>b</sub> = l<sub>1</sub> X l<sub>2</sub></font></p>     <p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Flujo de agua: <i>Q</i>,     <br> Cálculo de la  velocidad del agua: Área de flujo de agua, <i>A<sub>a</sub></i> = Área de bañera – Área de (tubería, cilindro, o placa).</font></p>     <p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> Área de tubería = π.  (D/2)<sup>2</sup> Si se conoce el flujo de agua entonces, <i>Q</i> = <i>A<sub>a</sub>V </i> y  V = <i>Q</i> / <i>A<sub>a</sub></i> </font></p>     ]]></body>
<body><![CDATA[<p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">  Se calcula el  coeficiente de transferencia de calor (<i>h</i>),  mediante el cálculo del número de Reynolds, para saber si el régimen es laminar  o turbulento y Utilizar las correlaciones de Nusselt correspondiente; ecuación  (29):</font></p>     <p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> Reynolds:<img src="/img/revistas/rie/v38n1/e2909117.gif" width="181" height="69"></font></p>     
<p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> donde: ρ = Densidad  de agua:(kg/m<sup>3</sup>), V = Velocidad de agua: (m/s) <i>D</i> = Diámetro o espesor:  (m)    <br>   µ= Viscosidad  dinámica del agua:( N.s/m<sup>2</sup>).  Con <i>R<sub>eD</sub></i> y el número de <i>Prandt </i>(<i>P<sub>r</sub></i>) se calcula el    Número de <i>Nusselt </i>(<i>N<sub>us</sub></i>). El  <i>Pr </i>se calcula por, <a href="#e30">ecuación (30)</a>:</font></p>     <p align="center"><img src="/img/revistas/rie/v38n1/e3009117.gif" width="247" height="71"><a name="e30"></a></p>     
<p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">  donde: <i>v </i>= velocidad de difusión de momento y &alpha; = velocidad del calor; </font><font size="2" face="Verdana, Arial, Helvetica, sans-serif"><i>&mu;</i> = viscosidad dinámica del agua; <i>Cp</i> = calor específico del agua; <i>K</i> =  conductividad térmica del agua <i>W</i> / <i>m</i>. <i>K</i>     <br>       <br> Este valor es fácilmente encontrado en tablas.</font></p>     <p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> Cálculo del número de Nusselt<b>; </b><a href="#e31">ecuación (31)</a>:</font></p>     <p align="center"><img src="/img/revistas/rie/v38n1/e3109117.gif" width="245" height="48"><a name="e31"></a></p>     
]]></body>
<body><![CDATA[<p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> Régimen aplicable  para: 0,4 &lt;<i> Re</i> &lt; 4 X  10<sup>5</sup>;  <i>Pr </i>≥ 0,7; donde:     <i>C</i> y <i>m</i> son constantes que se toman por tabla  según el valor de <i>Reynolds</i>. Otras correlaciones; <a href="/img/revistas/rie/v38n1/e3109117.gif">ecuación (32)</a>  y <a href="#e33">(33)</a>:</font></p>     
<p align="center"><img src="/img/revistas/rie/v38n1/e3309117.gif" width="440" height="54"><a name="e33"></a></p>     
<p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Régimen aplicable  para: <i>Re</i> &gt; 200 y <i>Pr </i>&gt; 0,7</font></p>     <p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> Coeficiente convectivo; <a href="@e34">ecuación (34)</a>: </font></p>     <p align="center"><img src="/img/revistas/rie/v38n1/e3409117.gif" width="177" height="75"><a name="e34"></a></p>     
<p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> Las propiedades físicas del material utilizado fueron:</font></p>     <p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif">  <i>k</i> = 0,22 W/m. <sup>0</sup>K  Conductividad térmica.  ρ = 1400 kg/m<sup>3</sup> Densidad.      <br>   <i>Cp</i>. = 1273J/ kg0K Calor  especifico.</font></p>     <p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> Además, deben  conocerse o calcularse, las propiedades del sólido, que se enfría o  calienta,  como densidad, calor  específico y Conductividad térmica y con estos elementos se procede a la  programación. El flujo de la máquina utilizada, fue de 270 kg/h, con 143 kW de  potencia general, se consideró un 85 %, de esa potencia, igual a 122 kW.</font></p>     <p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> El programa se  inicia, con la introducción de los datos: Diámetro de la tubería o ancho fr la  placa (mm), Espesor para ambas (mm), temperatura inicial del material (⁰C),  temperatura del agua de enfriamiento <sup>0</sup>C),temperatura deseada (<sup>0</sup>C) para la superficie,  radio interior o centro, flujo de la máquina (kg/h), dimensiones del  intercambiador de calor, propiedades del material y del agua, 0 tipo de  superficie de intercambio. Con estos datos, realiza el cálculo del tiempo de  enfriamiento, basado en el flujo según diseño de la máquina. Posteriormente,  calcula <i>Ti</i> y <i>Te</i> según la temperatura  deseada en rió <i>re</i>, o  centro y con estos datos el tiempo que demora el enfriamiento para llegar a la  temperatura deseada  según sea el caso  que tiene en cuenta las propiedades termofísicas del material, mediante la  herramienta de trabajo  (software  Wolfram Mathematica 8.0),  se compara con la temperatura deseada de ser  mayor o menor  le suma, o le resta el  valor deseado, hasta llegar a la diferencia necesaria, según la precisión requerida. </font></p>     ]]></body>
<body><![CDATA[<p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> Del resultado de este  proceso, surge un tiempo de enfriamiento, que tiene que ver con las propiedades  termo físicas, de la materia prima introducida, con el cual se realiza, un  nuevo cálculo del flujo máximo para la máquina, que no tiene que ver  directamente, con el de diseño y a partir de estos resultados, se obtienen los  demás, la mayor eficiencia del equipo, es aquella que el resultado, según las  propiedades termo físicas, estén lo más cercano posible al diseño productivo de  la máquina, calculando a partir de este resultado, los índices productivos y de  consumos óptimos, al final hace un reporte de todos los indicadores que se le  solicitan, dando la posibilidad además de conocer los valores de cada una de  las ecuaciones y variables  que  participan en el proceso. Una muestra de esto se visualiza en la <a href="/img/revistas/rie/v38n1/t0109117.gif">tabla 1</a>, que es solamente  una muestra de un reporte solicitado. Las gráficas con las cuales se calculan  los intervalos y los coeficientes para la placa y la tubería son diferentes,  pues la placa es dependiente del número de Biot y la tubería no, por ser  diferentes geometrías,  apreciado  en la <a href="/img/revistas/rie/v38n1/g0109117.gif">gráficas   1</a> y <a href="/img/revistas/rie/v38n1/g0209117.gif">2</a>, para un espesor de 4,3 mm. La <a href="/img/revistas/rie/v38n1/f0309117.gif">figura 3</a>,  muestra el procedimiento de cálculo descrito.</font></p>     
<p>&nbsp;</p>     <p><font size="3" face="Verdana, Arial, Helvetica, sans-serif"><b>RESULTADOS Y DISCUSIÓN</b></font></p>     <p><font size="2" face="Verdana, Arial, Helvetica, sans-serif">La posibilidad de tomar  parámetros, como una misma  diferencia de temperatura, a la salida del extrusor y  de entrada a la bañera,  iguales  espesores, distancias de enfriamiento, temperatura en el radio interior y  exterior, así como las propiedades termo físicas del material, y demostrar como  varían los tiempos de enfriamiento, las producciones, los índices de consumo y  los volúmenes de las geometrías en estudio.</font></p>     <p><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> La <a href="/img/revistas/rie/v38n1/t0109117.gif">tabla 1</a>, muestra, un reporte  de parámetros obtenidos con la aplicación de la herramienta, a los que se le  pueden agregar otros. El nivel de precisión    en tiempo real, que se quiera obtener   como es de (<i>n</i> = 1 hasta ∞), será fijada según la necesidad del proceso que se  ejecute, (productivo o investigativo), facilidad que  existe por utilizarse una programación de  este tipo. </font></p>     
<p><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Otro ejemplo de las bondades de  esta  aplicación, se aprecia, al comparar  basada en su exactitud, como los volúmenes y el tiempo  de enfriamiento, disminuyen, en la medida, en  que disminuyen los espesores, tendiendo a cero, demostrando esta condición, que  verdaderamente, mientras más fino el espesor, más se acercan los valores entre  ambas geometrías,  no obstante, se  demuestra la no conveniencia, de usar, para la solución a problemas de tuberías  de espesores finos, el darle el tratamiento como si fuera una placa, pues el  resto de los indicadores a medir no presentan la misma situación.</font></p>     <p><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Con la herramienta pudo definirse  los dos parámetros principales a tener en cuenta, para lograr  una eficiencia productiva y energética de  este proceso. La densidad, con correspondencia directa, con el flujo del equipo  y la alcanzada con las propiedades termo físicas  del material, en función del proceso de  enfriamiento, que aporta un parámetro más a tener en cuenta, para cualquier  análisis energético y productivo. </font></p>     <p>&nbsp;</p>     <p><font size="2" face="Verdana, Arial, Helvetica, sans-serif"><b><font size="3">CONCLUSIONES</font></b></font></p>     <p><font size="2" face="Verdana, Arial, Helvetica, sans-serif">1-. Con la utilización de esta  herramienta de trabajo, (Wolfram  Mathematica 8.0)se demostró que para desarrollar  cualquier análisis, del proceso productivo y definir un mejoramiento energético,en  las máquinas extrusoras de tuberías plásticas, es necesario, tener en cuenta,  dos elementos esenciales. Para el flujo productivo, como base principal, la  densidad de la materia prima y desde el punto de vista energético, la  conjugación, de las propiedades termo físicas presentes en la misma, pues ambas  actúan diferentes en el proceso.</font></p>     ]]></body>
<body><![CDATA[<p><font size="2" face="Verdana, Arial, Helvetica, sans-serif"> 2-. Se trabaja el programa como  base con la temperatura deseada en ri y re para la tubería que nos aporta el  tiempo mínimo en alcanzarla para ambos y con este, se busca la temperatura  deseada  en la placa, para calcular la  producción y los índices de consumo, en ambas geometrías.    <br>   3-. Se demostró además que los  volúmenes de la placa y la tubería se reducen y tienden a cero en la medida que  disminuyen sus espesores, pero referido a la producción aumenta en la tubería  con respecto al flujo de la maquina,  y  según las características de la materia prima, la producción es menor que la de  la placa, con estas características se comportan igualmente los índices de  consumo.</font></p>     <p>&nbsp;</p>     <p align="left"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"><b><font size="3">REFERENCIAS</font></b></font></p>     <!-- ref --><p><font size="2" face="Verdana, Arial, Helvetica, sans-serif">1.  González De Brito Francisco. Condición de Contorno  de convección en salidos infinitos. Octava ed. Cap.  IV.  p.  79-90.  Concepción Hernández: Madrid, 30 de mayo de 2011. [Consulta 15 de  noviembre de 2015]. Disponible en <a href="http://es.scribd.com/doc/56672254/IV-Condicion-de-Contorno-de-Conveccion-en-Solidos-Infinitos#scribd" target="_blank">http://es.scribd.com/doc/56672254/IV-Condicion-de-Contorno-de-Conveccion-en-Solidos-Infinitos#scribd</a>.  ISBN 007-844785-2.       </font></p>     <!-- ref --><p><font size="2" face="Verdana, Arial, Helvetica, sans-serif">2. MACKOWSKI DW. Conduction  Heat Transfer Notes for MECH 7210<i>.</i> Mechanical  Engineering Department Auburn University 2. Preface<i> 8</i> Hybrid Analytical/Numerical Methods  in Conduction. Cap.  3  p.  80–82. [Consulta 12 de octubre de 2015]. Disponible en <a href="http://www.eng.auburn.edu/~dmckwski/mech7210/condbook.pdf" target="_blank">http://www.eng.auburn.edu/~dmckwski/mech7210/condbook.pdf</a>.    </font></p>     <!-- ref --><p><font size="2" face="Verdana, Arial, Helvetica, sans-serif">3. ABASCAL R. Ecuaciones Diferenciales de Orden  Superior, Funciones    de Bessel.  Ed.  Universitaria de la U.T.N. Facultad Regional Avellaneda:Buenos Aires, Argentina. 2006. p. 2-5.   [consulta  23 de diciembre de 2015]. Disponible en <a href="http://www.edutecne.utn.ed" target="_blank">http://www.edutecne.utn.ed</a>. ISBN  978-950-42-0078-9.    </font></p>     ]]></body>
<body><![CDATA[<!-- ref --><p><font size="2" face="Verdana, Arial, Helvetica, sans-serif">4. Ramírez Carrera YR. Tecnología para la producción de tubos de  polietileno de alta densidad para la conducción  de agua en la empresa Holplast de Holguín<i>. </i>Ciencia  &amp; Futuro. 2014;4(2). ISSN 2306-823X.    </font></p>     <!-- ref --><p><font size="2" face="Verdana, Arial, Helvetica, sans-serif">5. Suéscum J., Correa C., Rigail-Cedeño A. Mejora  de la eficiencia de una extrusora de doble tornillo utilizada en la fabricación  de tuberías de PVC. Revista Tecnológica ESPOL. 2007;20(1):3-5.     [consulta 12 de enero de 2016]. Disponible en <a href="http://www.rte.espol.edu.ec/index.php/tecnologica/article/view/158" target="_blank">http://www.rte.espol.edu.ec/index.php/tecnologica/article/view/158</a>.   ISSN  0257-1749.</font></p>     <!-- ref --><p><font size="2" face="Verdana, Arial, Helvetica, sans-serif">6. Tim Osswald et al. Retos en  la Industria del procesamiento de plásticos y compuestos. Dyna. 2012;79(175):20-28.      [consulta 10 de diciembre de  2015]. Disponible en <a href="http://www.redalyc.org/articulo.oa?id=49624956005" target="_blank">http://www.redalyc.org/articulo.oa?id=49624956005</a>.  ISSN 0012-7353.</font></p>     <p><font size="2" face="Verdana, Arial, Helvetica, sans-serif">7. Vargas Isasa CA et al. Consumo  de energía en la Industria del plástico: Revisión de estudios realizados.  Revista CEA. 20151;(1):3-7. [consulta 17 de febrero de 2016]. Disponible  en: http//<a href="http://www.itm.edu.co/cienciaseconomicas/Documentos/RevistaCEA/705-1520-2-PB.pdf" target="_blank">www.itm.edu.co/cienciaseconomicas/Documentos/RevistaCEA/705-1520-2-PB.pdf</a>.  ISSN 2390-0725.     <br>   .    <br>   8. Jiménez Ramos A et al. Mejoramiento de la eficiencia energética en  los procesos de extrusión de tuberías plásticas. Ingeniería Energética. 2015;XXXVI(2):220-229. ISSN 1815 – 5901. </font></p>     <!-- ref --><p><font size="2" face="Verdana, Arial, Helvetica, sans-serif">9. Holman JP. Transferencia de calor. 8va. ed. Traducido  por MacGraw-Hill Companies, inc. Concepción Fernández: Madrid. [consulta  17 de noviembre de 2015]. Disponible en <a href="https://dredgarayalaherrera.files.wordpress.com" target="_blank">https://dredgarayalaherrera.files.wordpress.com</a>. ISBN 007-844785-2.     </font></p>     <!-- ref --><p><font size="2" face="Verdana, Arial, Helvetica, sans-serif">10. López E, et al. Modelo  Matemático de la transferencia de calor para predecir el perfil de dureza en  probetas Jominy. Revista  Metalurgia. 2013;49(2):111-121. [consulta  12 de enero de 2016]. Disponible  en http//<a href="http://www.scielo.org.mx/pdf/rmiq/v12n3/v12n3a22.pdf" target="_blank">www.scielo.org.mx/pdf/rmiq/v12n3/v12n3a22.pdf</a>. ISSN 0034-8570. DOI10.3989/revmetalm 1233.     </font></p>     <!-- ref --><p><font size="2" face="Verdana, Arial, Helvetica, sans-serif">11. Krastek RR, Saibel Duarte Á. Formulación de un modelo  matemático para optimizar el tiempo de producción en una planta extrusoras de  tubos<i>. </i>U niversidad, Ciencia y Tecnología. 2012;16(62). [consulta 9 de febrero de 2016] disponible en <a href="http//www.scielo.org.ve/scielo.php?script=sci_arttext&pid=S1316" target="_blank">http//www.scielo.org.ve/scielo.php?script=sci_arttext&amp;pid=S1316</a>.  ISSN  1316-4821</font>.    </p>     <p>     <p>&nbsp;</p>     <p><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Recibido: febrero de 2016     <br>   Aprobado: agosto de 2016 </font>     <p>&nbsp;</p>       ]]></body>
<body><![CDATA[<p>&nbsp;</p>     <p><font size="3" face="Verdana, Arial, Helvetica, sans-serif"><b>AUTOR</b></font></p>     <p><font size="2"><font face="Verdana, Arial, Helvetica, sans-serif"><i>Antonio Jiménez Ramos</i>. Ingeniero Termoenergético. Máster en Eficiencia Energética. Director General  Empresa de Producciones Plásticas Vasil Levski. Cienfuegos. E-mail: <a href="mailto:antonio@petrocasa.minem.cu">antonio@petrocasa.minem.cu</a>. </font></font></p>      ]]></body>
<back>
<ref-list>
<ref id="B1">
<label>1</label><nlm-citation citation-type="book">
<person-group person-group-type="author">
<name>
<surname><![CDATA[González De Brito]]></surname>
<given-names><![CDATA[Francisco]]></given-names>
</name>
</person-group>
<source><![CDATA[Condición de Contorno de convección en salidos infinitos]]></source>
<year>30 d</year>
<month>e </month>
<day>ma</day>
<edition>Octava</edition>
<page-range>79-90</page-range><publisher-name><![CDATA[Concepción Hernández]]></publisher-name>
</nlm-citation>
</ref>
<ref id="B2">
<label>2</label><nlm-citation citation-type="">
<person-group person-group-type="author">
<name>
<surname><![CDATA[MACKOWSKI]]></surname>
<given-names><![CDATA[DW]]></given-names>
</name>
</person-group>
<source><![CDATA[Conduction Heat Transfer Notes for MECH 7210]]></source>
<year></year>
<page-range>80-82</page-range></nlm-citation>
</ref>
<ref id="B3">
<label>3</label><nlm-citation citation-type="book">
<person-group person-group-type="author">
<name>
<surname><![CDATA[ABASCAL]]></surname>
<given-names><![CDATA[R]]></given-names>
</name>
</person-group>
<source><![CDATA[Ecuaciones Diferenciales de Orden Superior: Funciones de Bessel]]></source>
<year>2006</year>
<page-range>2-5</page-range><publisher-loc><![CDATA[^eBuenos Aires Buenos Aires]]></publisher-loc>
<publisher-name><![CDATA[Facultad Regional Avellaneda]]></publisher-name>
</nlm-citation>
</ref>
<ref id="B4">
<label>4</label><nlm-citation citation-type="journal">
<person-group person-group-type="author">
<name>
<surname><![CDATA[Ramírez Carrera]]></surname>
<given-names><![CDATA[YR]]></given-names>
</name>
</person-group>
<article-title xml:lang="es"><![CDATA[Tecnología para la producción de tubos de polietileno de alta densidad para la conducción de agua en la empresa Holplast de Holguín]]></article-title>
<source><![CDATA[Ciencia & Futuro]]></source>
<year>2014</year>
<volume>4</volume>
<numero>2</numero>
<issue>2</issue>
</nlm-citation>
</ref>
<ref id="B5">
<label>5</label><nlm-citation citation-type="journal">
<person-group person-group-type="author">
<name>
<surname><![CDATA[Suéscum]]></surname>
<given-names><![CDATA[J]]></given-names>
</name>
<name>
<surname><![CDATA[Correa]]></surname>
<given-names><![CDATA[C]]></given-names>
</name>
<name>
<surname><![CDATA[Rigail Cedeño]]></surname>
<given-names><![CDATA[A]]></given-names>
</name>
</person-group>
<article-title xml:lang="es"><![CDATA[Mejora de la eficiencia de una extrusora de doble tornillo utilizada en la fabricación de tuberÃas de PVC]]></article-title>
<source><![CDATA[Revista Tecnológica ESPOL]]></source>
<year>2007</year>
<volume>20</volume>
<numero>1</numero>
<issue>1</issue>
<page-range>3-5</page-range></nlm-citation>
</ref>
<ref id="B6">
<label>6</label><nlm-citation citation-type="journal">
<article-title xml:lang="pt"><![CDATA[Tim Osswald et al: Retos en la Industria del procesamiento de plásticos y compuestos]]></article-title>
<source><![CDATA[Dyna]]></source>
<year>2012</year>
<volume>79</volume>
<numero>175</numero>
<issue>175</issue>
<page-range>20-28</page-range></nlm-citation>
</ref>
<ref id="B7">
<label>7</label><nlm-citation citation-type="journal">
<person-group person-group-type="author">
<name>
<surname><![CDATA[Vargas Isasa]]></surname>
<given-names><![CDATA[CA]]></given-names>
</name>
</person-group>
<article-title xml:lang="es"><![CDATA[Consumo de energía en la Industria del plástico: Revisión de estudios realizados]]></article-title>
<source><![CDATA[Revista CEA]]></source>
<year>2015</year>
<month>17</month>
<day> d</day>
<numero>1</numero>
<issue>1</issue>
<page-range>3-7</page-range></nlm-citation>
</ref>
<ref id="B8">
<label>8</label><nlm-citation citation-type="journal">
<person-group person-group-type="author">
<name>
<surname><![CDATA[Jimenez Ramos]]></surname>
<given-names><![CDATA[A]]></given-names>
</name>
</person-group>
<article-title xml:lang="es"><![CDATA[Mejoramiento de la eficiencia energÃ(c)tica en los procesos de extrusión de tuberÃas plásticas]]></article-title>
<source><![CDATA[IngenierÃa EnergÃ(c)tica]]></source>
<year>2015</year>
<volume>XXXVI</volume>
<numero>2</numero>
<issue>2</issue>
<page-range>220-229</page-range></nlm-citation>
</ref>
<ref id="B9">
<label>9</label><nlm-citation citation-type="book">
<person-group person-group-type="author">
<name>
<surname><![CDATA[Holman]]></surname>
<given-names><![CDATA[JP]]></given-names>
</name>
</person-group>
<source><![CDATA[Transferencia de calor]]></source>
<year></year>
<edition>8</edition>
<publisher-name><![CDATA[Concepción Fernández]]></publisher-name>
</nlm-citation>
</ref>
<ref id="B10">
<label>10</label><nlm-citation citation-type="journal">
<person-group person-group-type="author">
<name>
<surname><![CDATA[López]]></surname>
<given-names><![CDATA[E]]></given-names>
</name>
</person-group>
<article-title xml:lang="en"><![CDATA[Modelo Matemático de la transferencia de calor para predecir el perfil de dureza en probetas Jominy]]></article-title>
<source><![CDATA[Revista Metalurgia]]></source>
<year>2013</year>
<volume>49</volume>
<numero>2</numero>
<issue>2</issue>
<page-range>111-121</page-range></nlm-citation>
</ref>
<ref id="B11">
<label>11</label><nlm-citation citation-type="journal">
<person-group person-group-type="author">
<name>
<surname><![CDATA[Krastek]]></surname>
<given-names><![CDATA[RR]]></given-names>
</name>
<name>
<surname><![CDATA[Saibel]]></surname>
<given-names><![CDATA[Duarte Á]]></given-names>
</name>
</person-group>
<article-title xml:lang="es"><![CDATA[Formulación de un modelo matemático para optimizar el tiempo de producción en una planta extrusoras de tubos]]></article-title>
<source><![CDATA[Universidad, Ciencia y Tecnología]]></source>
<year>2012</year>
<volume>16</volume>
<numero>62</numero>
<issue>62</issue>
</nlm-citation>
</ref>
</ref-list>
</back>
</article>
