package Libsens.Data.bass is   
   subtype Bass_Value_type is Value_Type range 36..60;  
   subtype Bass_Sentence_Type is Sentence_type (Bass_Value_Type);   
   
   task Bass_Gen is
      pragma Storage_size(8388608);
      entry Initialize(Filename : in String; Reuse : in Boolean; Converged : in Float; Max_Epochs : in Positive);
      entry Respond(Filename : in String; Channel : in Channel_Type; Seq : in out Seq_Vectors.Vector);      
      entry Halt;
   end Bass_Gen;
end Libsens.Data.bass;