package body sistematiemporeal is
   ST1: TemperList;
   ST2: TemperList;
   ST3: TemperList; -- Hay que introducir los valores
   ST4: TemperList; -- Hay que introducir los valores -- Txt import
   SR1: TemperList; -- Hay que introducir los valores
   SC1Fijo: Float:= 20.0; -- Fijo INIT 20L/MIN
   SC2Fijo: Float:= 400.0; -- Fijo INIT 400L/H
   SC1: TemperList;
   SC2: TemperList;
   SD1: TemperList;
   SD1opt: Float:= 25.0; --Punto de operación óptimo SD1
   T: TemperList;
   ST1_ini : Float := 50.0; --Valor inicial de ST1
   ST2_ini : Float := 60.0; --Valor inicial de ST2
   ST2opt : Float := 80.0; --Valor optimo de ST2
   Float_File : File_Type;
   Archivo : File_Type;