DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400 Tapes

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Rational R1000/400 Tapes

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - download
Index: ┃ T V ┃

⟦d8ef6312f⟧ TextFile

    Length: 835 (0x343)
    Types: TextFile
    Names: »V«

Derivation

└─⟦149519bd4⟧ Bits:30000546 8mm tape, Rational 1000, !projects 93-07-13
    └─ ⟦124ff5788⟧ »DATA« 
        └─⟦this⟧

TextFile

with Default_User_Operators;
with Generic_Kbs;
package A is
    type Rule_Bundles is (One, Two);
    package Kbs is new Generic_Kbs
                          (Max_Frame_Count => 100,
                           Max_Slots => 5,
                           Max_Condition_Elements_By_Rule => 5,
                           Max_Condition_Elements => 10,
                           Max_Rules => 20,
                           Max_Expression_Count => 200,
                           User_Defined_Operators =>
                              Default_User_Operators.Operators,
                           User_Defined_Match => Default_User_Operators.Match,
                           User_Defined_Evaluate =>
                              Default_User_Operators.Evaluate,
                           Rule_Bundles => Rule_Bundles);
    use Kbs;
end A;