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

Text File | 1988-05-03 | 8.5 KB | 406 lines

procedure z000254 is
    package package_1 is
    package package_2 is
    package package_3 is
    package package_4 is
    package package_5 is
    package package_6 is
    package package_7 is
    package package_8 is
    package package_9 is
    package package_10 is
    package package_11 is
    package package_12 is
    package package_13 is
    package package_14 is
    package package_15 is
    package package_16 is
    package package_17 is
    package package_18 is
    package package_19 is
    package package_20 is
    package package_21 is
    package package_22 is
    package package_23 is
    package package_24 is
    package package_25 is
    package package_26 is
    package package_27 is
    package package_28 is
    package package_29 is
    package package_30 is
    package package_31 is
    package package_32 is
    package package_33 is
    package package_34 is
    package package_35 is
    package package_36 is
    package package_37 is
    package package_38 is
    package package_39 is
    package package_40 is
    package package_41 is
    package package_42 is
    package package_43 is
    package package_44 is
    package package_45 is
    package package_46 is
    package package_47 is
    package package_48 is
    package package_49 is
    package package_50 is
    package package_51 is
    package package_52 is
    package package_53 is
    package package_54 is
    package package_55 is
    package package_56 is
    package package_57 is
    package package_58 is
    package package_59 is
    package package_60 is
    package package_61 is
    package package_62 is
    package package_63 is
    package package_64 is
    package package_65 is
    package package_66 is
    package package_67 is
    package package_68 is
    package package_69 is
    package package_70 is
    package package_71 is
    package package_72 is
    package package_73 is
    package package_74 is
    package package_75 is
    package package_76 is
    package package_77 is
    package package_78 is
    package package_79 is
    package package_80 is
    package package_81 is
    package package_82 is
    package package_83 is
    package package_84 is
    package package_85 is
    package package_86 is
    package package_87 is
    package package_88 is
    package package_89 is
    package package_90 is
    package package_91 is
    package package_92 is
    package package_93 is
    package package_94 is
    package package_95 is
    package package_96 is
    package package_97 is
    package package_98 is
    package package_99 is
    package package_100 is
    package package_101 is
    package package_102 is
    package package_103 is
    package package_104 is
    package package_105 is
    package package_106 is
    package package_107 is
    package package_108 is
    package package_109 is
    package package_110 is
    package package_111 is
    package package_112 is
    package package_113 is
    package package_114 is
    package package_115 is
    package package_116 is
    package package_117 is
    package package_118 is
    package package_119 is
    package package_120 is
    package package_121 is
    package package_122 is
    package package_123 is
    package package_124 is
    package package_125 is
    package package_126 is
    package package_127 is
    package package_128 is
    package package_129 is
    package package_130 is
    package package_131 is
    package package_132 is
    package package_133 is
    package package_134 is
    package package_135 is
    package package_136 is
    package package_137 is
    package package_138 is
    package package_139 is
    package package_140 is
    package package_141 is
    package package_142 is
    package package_143 is
    package package_144 is
    package package_145 is
    package package_146 is
    package package_147 is
    package package_148 is
    package package_149 is
    package package_150 is
    package package_151 is
    package package_152 is
    package package_153 is
    package package_154 is
    package package_155 is
    package package_156 is
    package package_157 is
    package package_158 is
    package package_159 is
    package package_160 is
    package package_161 is
    package package_162 is
    package package_163 is
    package package_164 is
    package package_165 is
    package package_166 is
    package package_167 is
    package package_168 is
    package package_169 is
    package package_170 is
    package package_171 is
    package package_172 is
    package package_173 is
    package package_174 is
    package package_175 is
    package package_176 is
    package package_177 is
    package package_178 is
    package package_179 is
    package package_180 is
    package package_181 is
    package package_182 is
    package package_183 is
    package package_184 is
    package package_185 is
    package package_186 is
    package package_187 is
    package package_188 is
    package package_189 is
    package package_190 is
    package package_191 is
    package package_192 is
    package package_193 is
    package package_194 is
    package package_195 is
    package package_196 is
    package package_197 is
    package package_198 is
    package package_199 is
    package package_200 is
        type A is digits 3;
    end package_200;
    end package_199;
    end package_198;
    end package_197;
    end package_196;
    end package_195;
    end package_194;
    end package_193;
    end package_192;
    end package_191;
    end package_190;
    end package_189;
    end package_188;
    end package_187;
    end package_186;
    end package_185;
    end package_184;
    end package_183;
    end package_182;
    end package_181;
    end package_180;
    end package_179;
    end package_178;
    end package_177;
    end package_176;
    end package_175;
    end package_174;
    end package_173;
    end package_172;
    end package_171;
    end package_170;
    end package_169;
    end package_168;
    end package_167;
    end package_166;
    end package_165;
    end package_164;
    end package_163;
    end package_162;
    end package_161;
    end package_160;
    end package_159;
    end package_158;
    end package_157;
    end package_156;
    end package_155;
    end package_154;
    end package_153;
    end package_152;
    end package_151;
    end package_150;
    end package_149;
    end package_148;
    end package_147;
    end package_146;
    end package_145;
    end package_144;
    end package_143;
    end package_142;
    end package_141;
    end package_140;
    end package_139;
    end package_138;
    end package_137;
    end package_136;
    end package_135;
    end package_134;
    end package_133;
    end package_132;
    end package_131;
    end package_130;
    end package_129;
    end package_128;
    end package_127;
    end package_126;
    end package_125;
    end package_124;
    end package_123;
    end package_122;
    end package_121;
    end package_120;
    end package_119;
    end package_118;
    end package_117;
    end package_116;
    end package_115;
    end package_114;
    end package_113;
    end package_112;
    end package_111;
    end package_110;
    end package_109;
    end package_108;
    end package_107;
    end package_106;
    end package_105;
    end package_104;
    end package_103;
    end package_102;
    end package_101;
    end package_100;
    end package_99;
    end package_98;
    end package_97;
    end package_96;
    end package_95;
    end package_94;
    end package_93;
    end package_92;
    end package_91;
    end package_90;
    end package_89;
    end package_88;
    end package_87;
    end package_86;
    end package_85;
    end package_84;
    end package_83;
    end package_82;
    end package_81;
    end package_80;
    end package_79;
    end package_78;
    end package_77;
    end package_76;
    end package_75;
    end package_74;
    end package_73;
    end package_72;
    end package_71;
    end package_70;
    end package_69;
    end package_68;
    end package_67;
    end package_66;
    end package_65;
    end package_64;
    end package_63;
    end package_62;
    end package_61;
    end package_60;
    end package_59;
    end package_58;
    end package_57;
    end package_56;
    end package_55;
    end package_54;
    end package_53;
    end package_52;
    end package_51;
    end package_50;
    end package_49;
    end package_48;
    end package_47;
    end package_46;
    end package_45;
    end package_44;
    end package_43;
    end package_42;
    end package_41;
    end package_40;
    end package_39;
    end package_38;
    end package_37;
    end package_36;
    end package_35;
    end package_34;
    end package_33;
    end package_32;
    end package_31;
    end package_30;
    end package_29;
    end package_28;
    end package_27;
    end package_26;
    end package_25;
    end package_24;
    end package_23;
    end package_22;
    end package_21;
    end package_20;
    end package_19;
    end package_18;
    end package_17;
    end package_16;
    end package_15;
    end package_14;
    end package_13;
    end package_12;
    end package_11;
    end package_10;
    end package_9;
    end package_8;
    end package_7;
    end package_6;
    end package_5;
    end package_4;
    end package_3;
    end package_2;
    end package_1;
    begin
    null;
    end z000254;