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 - metrics - download
Index: B T

⟦89082fd33⟧ TextFile

    Length: 3466 (0xd8a)
    Types: TextFile
    Names: »B«

Derivation

└─⟦180fe333a⟧ Bits:30000405 8mm tape, Rational 1000, SW CATALOG, 10_20_0
└─⟦180fe333a⟧ Bits:30000537 8mm tape, Rational 1000, SW Catalog 10_20_0
    └─⟦5cb1d1d7f⟧ »DATA« 
        └─⟦3b1ee7bd8⟧ 
            └─⟦this⟧

TextFile

package body Compk is

    package body Compk1 is
        function K1 return Integer is
        begin
            return 1;
        end K1;
    end Compk1;

    package body Compk2 is
        function K2 return Integer is
        begin
            return 2;
        end K2;
    end Compk2;

    package body Compk3 is
        function K3 return Integer is
        begin
            return 3;
        end K3;
    end Compk3;

    package body Compk4 is
        function K4 return Integer is
        begin
            return 4;
        end K4;
    end Compk4;

    package body Compk5 is
        function K5 return Integer is
        begin
            return 5;
        end K5;
    end Compk5;

    package body Compk6 is
        function K6 return Integer is
        begin
            return 6;
        end K6;
    end Compk6;

    package body Compk7 is
        function K7 return Integer is
        begin
            return 7;
        end K7;
    end Compk7;

    package body Compk8 is
        function K8 return Integer is
        begin
            return 8;
        end K8;
    end Compk8;

    package body Compk9 is
        function K9 return Integer is
        begin
            return 9;
        end K9;
    end Compk9;

    package body Compk10 is
        function K10 return Integer is
        begin
            return 10;
        end K10;
    end Compk10;

    package body Compk11 is
        function K11 return Integer is
        begin
            return 11;
        end K11;
    end Compk11;

    package body Compk12 is
        function K12 return Integer is
        begin
            return 12;
        end K12;
    end Compk12;

    package body Compk13 is
        function K13 return Integer is
        begin
            return 13;
        end K13;
    end Compk13;

    package body Compk14 is
        function K14 return Integer is
        begin
            return 14;
        end K14;
    end Compk14;

    package body Compk15 is
        function K15 return Integer is
        begin
            return 15;
        end K15;
    end Compk15;

    package body Compk16 is
        function K16 return Integer is
        begin
            return 16;
        end K16;
    end Compk16;

    package body Compk17 is
        function K17 return Integer is
        begin
            return 17;
        end K17;
    end Compk17;

    package body Compk18 is
        function K18 return Integer is
        begin
            return 18;
        end K18;
    end Compk18;

    package body Compk19 is
        function K19 return Integer is
        begin
            return 19;
        end K19;
    end Compk19;

    package body Compk20 is
        function K20 return Integer is
        begin
            return 20;
        end K20;
    end Compk20;

    package body Compk21 is
        function K21 return Integer is
        begin
            return 21;
        end K21;
    end Compk21;

    package body Compk22 is
        function K22 return Integer is
        begin
            return 22;
        end K22;
    end Compk22;

    package body Compk23 is
        function K23 return Integer is
        begin
            return 23;
        end K23;
    end Compk23;

    package body Compk24 is
        function K24 return Integer is
        begin
            return 24;
        end K24;
    end Compk24;

    package body Compk25 is
        function K25 return Integer is
        begin
            return 25;
        end K25;
    end Compk25;

end Compk;