Programmer's ROM - The Computer Language Library/programmersrom.iso/ada/piwg/z000303.ada

Text File | 1988-05-03 | 5.9 KB | 201 lines

with text_io; use text_io;
package package_1 is
    package package_1s is  new float_io ( float );
    end package_1;
with package_1; use package_1;
package package_2 is
    package package_2s renames package_1s;
    end package_2;
with package_2; use package_2;
package package_3 is
    package package_3s renames package_2s;
    end package_3;
with package_3; use package_3;
package package_4 is
    package package_4s renames package_3s;
    end package_4;
with package_4; use package_4;
package package_5 is
    package package_5s renames package_4s;
    end package_5;
with package_5; use package_5;
package package_6 is
    package package_6s renames package_5s;
    end package_6;
with package_6; use package_6;
package package_7 is
    package package_7s renames package_6s;
    end package_7;
with package_7; use package_7;
package package_8 is
    package package_8s renames package_7s;
    end package_8;
with package_8; use package_8;
package package_9 is
    package package_9s renames package_8s;
    end package_9;
with package_9; use package_9;
package package_10 is
    package package_10s renames package_9s;
    end package_10;
with package_10; use package_10;
package package_11 is
    package package_11s renames package_10s;
    end package_11;
with package_11; use package_11;
package package_12 is
    package package_12s renames package_11s;
    end package_12;
with package_12; use package_12;
package package_13 is
    package package_13s renames package_12s;
    end package_13;
with package_13; use package_13;
package package_14 is
    package package_14s renames package_13s;
    end package_14;
with package_14; use package_14;
package package_15 is
    package package_15s renames package_14s;
    end package_15;
with package_15; use package_15;
package package_16 is
    package package_16s renames package_15s;
    end package_16;
with package_16; use package_16;
package package_17 is
    package package_17s renames package_16s;
    end package_17;
with package_17; use package_17;
package package_18 is
    package package_18s renames package_17s;
    end package_18;
with package_18; use package_18;
package package_19 is
    package package_19s renames package_18s;
    end package_19;
with package_19; use package_19;
package package_20 is
    package package_20s renames package_19s;
    end package_20;
with package_20; use package_20;
package package_21 is
    package package_21s renames package_20s;
    end package_21;
with package_21; use package_21;
package package_22 is
    package package_22s renames package_21s;
    end package_22;
with package_22; use package_22;
package package_23 is
    package package_23s renames package_22s;
    end package_23;
with package_23; use package_23;
package package_24 is
    package package_24s renames package_23s;
    end package_24;
with package_24; use package_24;
package package_25 is
    package package_25s renames package_24s;
    end package_25;
with package_25; use package_25;
package package_26 is
    package package_26s renames package_25s;
    end package_26;
with package_26; use package_26;
package package_27 is
    package package_27s renames package_26s;
    end package_27;
with package_27; use package_27;
package package_28 is
    package package_28s renames package_27s;
    end package_28;
with package_28; use package_28;
package package_29 is
    package package_29s renames package_28s;
    end package_29;
with package_29; use package_29;
package package_30 is
    package package_30s renames package_29s;
    end package_30;
with package_30; use package_30;
package package_31 is
    package package_31s renames package_30s;
    end package_31;
with package_31; use package_31;
package package_32 is
    package package_32s renames package_31s;
    end package_32;
with package_32; use package_32;
package package_33 is
    package package_33s renames package_32s;
    end package_33;
with package_33; use package_33;
package package_34 is
    package package_34s renames package_33s;
    end package_34;
with package_34; use package_34;
package package_35 is
    package package_35s renames package_34s;
    end package_35;
with package_35; use package_35;
package package_36 is
    package package_36s renames package_35s;
    end package_36;
with package_36; use package_36;
package package_37 is
    package package_37s renames package_36s;
    end package_37;
with package_37; use package_37;
package package_38 is
    package package_38s renames package_37s;
    end package_38;
with package_38; use package_38;
package package_39 is
    package package_39s renames package_38s;
    end package_39;
with package_39; use package_39;
package package_40 is
    package package_40s renames package_39s;
    end package_40;
with package_40; use package_40;
package package_41 is
    package package_41s renames package_40s;
    end package_41;
with package_41; use package_41;
package package_42 is
    package package_42s renames package_41s;
    end package_42;
with package_42; use package_42;
package package_43 is
    package package_43s renames package_42s;
    end package_43;
with package_43; use package_43;
package package_44 is
    package package_44s renames package_43s;
    end package_44;
with package_44; use package_44;
package package_45 is
    package package_45s renames package_44s;
    end package_45;
with package_45; use package_45;
package package_46 is
    package package_46s renames package_45s;
    end package_46;
with package_46; use package_46;
package package_47 is
    package package_47s renames package_46s;
    end package_47;
with package_47; use package_47;
package package_48 is
    package package_48s renames package_47s;
    end package_48;
with package_48; use package_48;
package package_49 is
    package package_49s renames package_48s;
    end package_49;
with package_49; use package_49;
package package_50 is
    package package_50s renames package_49s;
    end package_50;