function calculo_linea1($nombre1,&$tipoa,&$largo1,&$ancho1,&$alto1,&$aislamiento,&$tipo1,&$texto)
{
//CALCULO 
$Cubicaje = $largo1 * $ancho1 * $alto1;
//POTENCIA
$potencia = round($Cubicaje) * $aislamiento ;

$potencia_total = $potencia;

//SE DIVIDE LA POTENCIA PARA ASIGNAR
if ($potencia >= 2100){
switch ($potencia) {
case ($potencia >= 2100 && $potencia <= 4200  ):
$potencia = $potencia / 2;
break;
case ($potencia >= 4200 && $potencia <= 6300 ):
$potencia = $potencia / 3;
break;
case ($potencia >= 6300 && $potencia <= 8400 ):
$potencia = $potencia / 4;
break;
case ($potencia >= 8400 && $potencia <= 10500 ):
$potencia = $potencia / 5;
break;
	}
}
if ($tipo1 == "R"){
// Obtenemos los W del radiador 
switch ($potencia) {
case ($potencia >= 1 && $potencia <= 400 ):
$pradiador = 350;
break;
case ($potencia >= 401 && $potencia <= 750 ):
$pradiador = 600;
break;
case ($potencia >= 751 && $potencia <=1050  ):
$pradiador = 900;
break;
case ($potencia >= 1051 && $potencia <= 1350 ):
$pradiador = 1200;
break;
case ($potencia >= 1351 && $potencia <= 1650  ):
$pradiador = 1500 ;
break;
case ($potencia >= 1651  && $potencia <= 1900 ):
$pradiador = 1800;
break;
case ($potencia >= 1901  && $potencia <= 2149 ):
$pradiador = 2000;
break;
	}
//CALCULO RADIADORES
$potencia = $potencia_total;
$necesita = $potencia_total / $pradiador ;
}

$GLOBALS['necesita_linea1'] = round($necesita) ;
$GLOBALS['pradiador_linea1']= $pradiador ;
$GLOBALS['potencia_linea1']= $potencia_total ;
$GLOBALS['nombre_linea1']= $nombre1 ;
$GLOBALS['tipoa_linea1']= $tipoa ;
$GLOBALS['largo1_linea1']= $largo1 ;
$GLOBALS['ancho1_linea1']= $ancho1 ;
$GLOBALS['alto1_linea1']= $alto1 ;
$GLOBALS['aislamiento_linea1']= $aislamiento ;
$GLOBALS['cubicaje1']= $Cubicaje ;
$GLOBALS['texto1']= $texto ;
$GLOBALS['tipo1']= $tipo1;

}