home *** CD-ROM | disk | FTP | other *** search
/ Programmer's ROM - The Computer Language Library / programmersrom.iso / ada / piwg / z000152.ada < prev    next >
Encoding:
Text File  |  1988-05-03  |  12.2 KB  |  404 lines
  1. package z000152 is
  2.     type type_1 is private;
  3.     type type_2 is private;
  4.     type type_3 is private;
  5.     type type_4 is private;
  6.     type type_5 is private;
  7.     type type_6 is private;
  8.     type type_7 is private;
  9.     type type_8 is private;
  10.     type type_9 is private;
  11.     type type_10 is private;
  12.     type type_11 is private;
  13.     type type_12 is private;
  14.     type type_13 is private;
  15.     type type_14 is private;
  16.     type type_15 is private;
  17.     type type_16 is private;
  18.     type type_17 is private;
  19.     type type_18 is private;
  20.     type type_19 is private;
  21.     type type_20 is private;
  22.     type type_21 is private;
  23.     type type_22 is private;
  24.     type type_23 is private;
  25.     type type_24 is private;
  26.     type type_25 is private;
  27.     type type_26 is private;
  28.     type type_27 is private;
  29.     type type_28 is private;
  30.     type type_29 is private;
  31.     type type_30 is private;
  32.     type type_31 is private;
  33.     type type_32 is private;
  34.     type type_33 is private;
  35.     type type_34 is private;
  36.     type type_35 is private;
  37.     type type_36 is private;
  38.     type type_37 is private;
  39.     type type_38 is private;
  40.     type type_39 is private;
  41.     type type_40 is private;
  42.     type type_41 is private;
  43.     type type_42 is private;
  44.     type type_43 is private;
  45.     type type_44 is private;
  46.     type type_45 is private;
  47.     type type_46 is private;
  48.     type type_47 is private;
  49.     type type_48 is private;
  50.     type type_49 is private;
  51.     type type_50 is private;
  52.     type type_51 is private;
  53.     type type_52 is private;
  54.     type type_53 is private;
  55.     type type_54 is private;
  56.     type type_55 is private;
  57.     type type_56 is private;
  58.     type type_57 is private;
  59.     type type_58 is private;
  60.     type type_59 is private;
  61.     type type_60 is private;
  62.     type type_61 is private;
  63.     type type_62 is private;
  64.     type type_63 is private;
  65.     type type_64 is private;
  66.     type type_65 is private;
  67.     type type_66 is private;
  68.     type type_67 is private;
  69.     type type_68 is private;
  70.     type type_69 is private;
  71.     type type_70 is private;
  72.     type type_71 is private;
  73.     type type_72 is private;
  74.     type type_73 is private;
  75.     type type_74 is private;
  76.     type type_75 is private;
  77.     type type_76 is private;
  78.     type type_77 is private;
  79.     type type_78 is private;
  80.     type type_79 is private;
  81.     type type_80 is private;
  82.     type type_81 is private;
  83.     type type_82 is private;
  84.     type type_83 is private;
  85.     type type_84 is private;
  86.     type type_85 is private;
  87.     type type_86 is private;
  88.     type type_87 is private;
  89.     type type_88 is private;
  90.     type type_89 is private;
  91.     type type_90 is private;
  92.     type type_91 is private;
  93.     type type_92 is private;
  94.     type type_93 is private;
  95.     type type_94 is private;
  96.     type type_95 is private;
  97.     type type_96 is private;
  98.     type type_97 is private;
  99.     type type_98 is private;
  100.     type type_99 is private;
  101.     type type_100 is private;
  102.     type type_101 is private;
  103.     type type_102 is private;
  104.     type type_103 is private;
  105.     type type_104 is private;
  106.     type type_105 is private;
  107.     type type_106 is private;
  108.     type type_107 is private;
  109.     type type_108 is private;
  110.     type type_109 is private;
  111.     type type_110 is private;
  112.     type type_111 is private;
  113.     type type_112 is private;
  114.     type type_113 is private;
  115.     type type_114 is private;
  116.     type type_115 is private;
  117.     type type_116 is private;
  118.     type type_117 is private;
  119.     type type_118 is private;
  120.     type type_119 is private;
  121.     type type_120 is private;
  122.     type type_121 is private;
  123.     type type_122 is private;
  124.     type type_123 is private;
  125.     type type_124 is private;
  126.     type type_125 is private;
  127.     type type_126 is private;
  128.     type type_127 is private;
  129.     type type_128 is private;
  130.     type type_129 is private;
  131.     type type_130 is private;
  132.     type type_131 is private;
  133.     type type_132 is private;
  134.     type type_133 is private;
  135.     type type_134 is private;
  136.     type type_135 is private;
  137.     type type_136 is private;
  138.     type type_137 is private;
  139.     type type_138 is private;
  140.     type type_139 is private;
  141.     type type_140 is private;
  142.     type type_141 is private;
  143.     type type_142 is private;
  144.     type type_143 is private;
  145.     type type_144 is private;
  146.     type type_145 is private;
  147.     type type_146 is private;
  148.     type type_147 is private;
  149.     type type_148 is private;
  150.     type type_149 is private;
  151.     type type_150 is private;
  152.     type type_151 is private;
  153.     type type_152 is private;
  154.     type type_153 is private;
  155.     type type_154 is private;
  156.     type type_155 is private;
  157.     type type_156 is private;
  158.     type type_157 is private;
  159.     type type_158 is private;
  160.     type type_159 is private;
  161.     type type_160 is private;
  162.     type type_161 is private;
  163.     type type_162 is private;
  164.     type type_163 is private;
  165.     type type_164 is private;
  166.     type type_165 is private;
  167.     type type_166 is private;
  168.     type type_167 is private;
  169.     type type_168 is private;
  170.     type type_169 is private;
  171.     type type_170 is private;
  172.     type type_171 is private;
  173.     type type_172 is private;
  174.     type type_173 is private;
  175.     type type_174 is private;
  176.     type type_175 is private;
  177.     type type_176 is private;
  178.     type type_177 is private;
  179.     type type_178 is private;
  180.     type type_179 is private;
  181.     type type_180 is private;
  182.     type type_181 is private;
  183.     type type_182 is private;
  184.     type type_183 is private;
  185.     type type_184 is private;
  186.     type type_185 is private;
  187.     type type_186 is private;
  188.     type type_187 is private;
  189.     type type_188 is private;
  190.     type type_189 is private;
  191.     type type_190 is private;
  192.     type type_191 is private;
  193.     type type_192 is private;
  194.     type type_193 is private;
  195.     type type_194 is private;
  196.     type type_195 is private;
  197.     type type_196 is private;
  198.     type type_197 is private;
  199.     type type_198 is private;
  200.     type type_199 is private;
  201.     type type_200 is private;
  202.     private
  203.     type type_200 is access type_199;
  204.     type type_199 is access type_198;
  205.     type type_198 is access type_197;
  206.     type type_197 is access type_196;
  207.     type type_196 is access type_195;
  208.     type type_195 is access type_194;
  209.     type type_194 is access type_193;
  210.     type type_193 is access type_192;
  211.     type type_192 is access type_191;
  212.     type type_191 is access type_190;
  213.     type type_190 is access type_189;
  214.     type type_189 is access type_188;
  215.     type type_188 is access type_187;
  216.     type type_187 is access type_186;
  217.     type type_186 is access type_185;
  218.     type type_185 is access type_184;
  219.     type type_184 is access type_183;
  220.     type type_183 is access type_182;
  221.     type type_182 is access type_181;
  222.     type type_181 is access type_180;
  223.     type type_180 is access type_179;
  224.     type type_179 is access type_178;
  225.     type type_178 is access type_177;
  226.     type type_177 is access type_176;
  227.     type type_176 is access type_175;
  228.     type type_175 is access type_174;
  229.     type type_174 is access type_173;
  230.     type type_173 is access type_172;
  231.     type type_172 is access type_171;
  232.     type type_171 is access type_170;
  233.     type type_170 is access type_169;
  234.     type type_169 is access type_168;
  235.     type type_168 is access type_167;
  236.     type type_167 is access type_166;
  237.     type type_166 is access type_165;
  238.     type type_165 is access type_164;
  239.     type type_164 is access type_163;
  240.     type type_163 is access type_162;
  241.     type type_162 is access type_161;
  242.     type type_161 is access type_160;
  243.     type type_160 is access type_159;
  244.     type type_159 is access type_158;
  245.     type type_158 is access type_157;
  246.     type type_157 is access type_156;
  247.     type type_156 is access type_155;
  248.     type type_155 is access type_154;
  249.     type type_154 is access type_153;
  250.     type type_153 is access type_152;
  251.     type type_152 is access type_151;
  252.     type type_151 is access type_150;
  253.     type type_150 is access type_149;
  254.     type type_149 is access type_148;
  255.     type type_148 is access type_147;
  256.     type type_147 is access type_146;
  257.     type type_146 is access type_145;
  258.     type type_145 is access type_144;
  259.     type type_144 is access type_143;
  260.     type type_143 is access type_142;
  261.     type type_142 is access type_141;
  262.     type type_141 is access type_140;
  263.     type type_140 is access type_139;
  264.     type type_139 is access type_138;
  265.     type type_138 is access type_137;
  266.     type type_137 is access type_136;
  267.     type type_136 is access type_135;
  268.     type type_135 is access type_134;
  269.     type type_134 is access type_133;
  270.     type type_133 is access type_132;
  271.     type type_132 is access type_131;
  272.     type type_131 is access type_130;
  273.     type type_130 is access type_129;
  274.     type type_129 is access type_128;
  275.     type type_128 is access type_127;
  276.     type type_127 is access type_126;
  277.     type type_126 is access type_125;
  278.     type type_125 is access type_124;
  279.     type type_124 is access type_123;
  280.     type type_123 is access type_122;
  281.     type type_122 is access type_121;
  282.     type type_121 is access type_120;
  283.     type type_120 is access type_119;
  284.     type type_119 is access type_118;
  285.     type type_118 is access type_117;
  286.     type type_117 is access type_116;
  287.     type type_116 is access type_115;
  288.     type type_115 is access type_114;
  289.     type type_114 is access type_113;
  290.     type type_113 is access type_112;
  291.     type type_112 is access type_111;
  292.     type type_111 is access type_110;
  293.     type type_110 is access type_109;
  294.     type type_109 is access type_108;
  295.     type type_108 is access type_107;
  296.     type type_107 is access type_106;
  297.     type type_106 is access type_105;
  298.     type type_105 is access type_104;
  299.     type type_104 is access type_103;
  300.     type type_103 is access type_102;
  301.     type type_102 is access type_101;
  302.     type type_101 is access type_100;
  303.     type type_100 is access type_99;
  304.     type type_99 is access type_98;
  305.     type type_98 is access type_97;
  306.     type type_97 is access type_96;
  307.     type type_96 is access type_95;
  308.     type type_95 is access type_94;
  309.     type type_94 is access type_93;
  310.     type type_93 is access type_92;
  311.     type type_92 is access type_91;
  312.     type type_91 is access type_90;
  313.     type type_90 is access type_89;
  314.     type type_89 is access type_88;
  315.     type type_88 is access type_87;
  316.     type type_87 is access type_86;
  317.     type type_86 is access type_85;
  318.     type type_85 is access type_84;
  319.     type type_84 is access type_83;
  320.     type type_83 is access type_82;
  321.     type type_82 is access type_81;
  322.     type type_81 is access type_80;
  323.     type type_80 is access type_79;
  324.     type type_79 is access type_78;
  325.     type type_78 is access type_77;
  326.     type type_77 is access type_76;
  327.     type type_76 is access type_75;
  328.     type type_75 is access type_74;
  329.     type type_74 is access type_73;
  330.     type type_73 is access type_72;
  331.     type type_72 is access type_71;
  332.     type type_71 is access type_70;
  333.     type type_70 is access type_69;
  334.     type type_69 is access type_68;
  335.     type type_68 is access type_67;
  336.     type type_67 is access type_66;
  337.     type type_66 is access type_65;
  338.     type type_65 is access type_64;
  339.     type type_64 is access type_63;
  340.     type type_63 is access type_62;
  341.     type type_62 is access type_61;
  342.     type type_61 is access type_60;
  343.     type type_60 is access type_59;
  344.     type type_59 is access type_58;
  345.     type type_58 is access type_57;
  346.     type type_57 is access type_56;
  347.     type type_56 is access type_55;
  348.     type type_55 is access type_54;
  349.     type type_54 is access type_53;
  350.     type type_53 is access type_52;
  351.     type type_52 is access type_51;
  352.     type type_51 is access type_50;
  353.     type type_50 is access type_49;
  354.     type type_49 is access type_48;
  355.     type type_48 is access type_47;
  356.     type type_47 is access type_46;
  357.     type type_46 is access type_45;
  358.     type type_45 is access type_44;
  359.     type type_44 is access type_43;
  360.     type type_43 is access type_42;
  361.     type type_42 is access type_41;
  362.     type type_41 is access type_40;
  363.     type type_40 is access type_39;
  364.     type type_39 is access type_38;
  365.     type type_38 is access type_37;
  366.     type type_37 is access type_36;
  367.     type type_36 is access type_35;
  368.     type type_35 is access type_34;
  369.     type type_34 is access type_33;
  370.     type type_33 is access type_32;
  371.     type type_32 is access type_31;
  372.     type type_31 is access type_30;
  373.     type type_30 is access type_29;
  374.     type type_29 is access type_28;
  375.     type type_28 is access type_27;
  376.     type type_27 is access type_26;
  377.     type type_26 is access type_25;
  378.     type type_25 is access type_24;
  379.     type type_24 is access type_23;
  380.     type type_23 is access type_22;
  381.     type type_22 is access type_21;
  382.     type type_21 is access type_20;
  383.     type type_20 is access type_19;
  384.     type type_19 is access type_18;
  385.     type type_18 is access type_17;
  386.     type type_17 is access type_16;
  387.     type type_16 is access type_15;
  388.     type type_15 is access type_14;
  389.     type type_14 is access type_13;
  390.     type type_13 is access type_12;
  391.     type type_12 is access type_11;
  392.     type type_11 is access type_10;
  393.     type type_10 is access type_9;
  394.     type type_9 is access type_8;
  395.     type type_8 is access type_7;
  396.     type type_7 is access type_6;
  397.     type type_6 is access type_5;
  398.     type type_5 is access type_4;
  399.     type type_4 is access type_3;
  400.     type type_3 is access type_2;
  401.     type type_2 is access type_1;
  402.     type type_1 is range 1..500;
  403.     end z000152;
  404.