1------------------------------------------------------------------------------
2--                                                                          --
3--                            Matreshka Project                             --
4--                                                                          --
5--                          Ada Modeling Framework                          --
6--                                                                          --
7--                        Runtime Library Component                         --
8--                                                                          --
9------------------------------------------------------------------------------
10--                                                                          --
11-- Copyright © 2012, Vadim Godunko <vgodunko@gmail.com>                     --
12-- All rights reserved.                                                     --
13--                                                                          --
14-- Redistribution and use in source and binary forms, with or without       --
15-- modification, are permitted provided that the following conditions       --
16-- are met:                                                                 --
17--                                                                          --
18--  * Redistributions of source code must retain the above copyright        --
19--    notice, this list of conditions and the following disclaimer.         --
20--                                                                          --
21--  * Redistributions in binary form must reproduce the above copyright     --
22--    notice, this list of conditions and the following disclaimer in the   --
23--    documentation and/or other materials provided with the distribution.  --
24--                                                                          --
25--  * Neither the name of the Vadim Godunko, IE nor the names of its        --
26--    contributors may be used to endorse or promote products derived from  --
27--    this software without specific prior written permission.              --
28--                                                                          --
29-- THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS      --
30-- "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT        --
31-- LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR    --
32-- A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT     --
33-- HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,   --
34-- SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED --
35-- TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR   --
36-- PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF   --
37-- LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING     --
38-- NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS       --
39-- SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.             --
40--                                                                          --
41------------------------------------------------------------------------------
42--  $Revision: 3637 $ $Date: 2013-01-07 21:22:12 +0400 (Mon, 07 Jan 2013) $
43------------------------------------------------------------------------------
44--  This file is generated, don't edit it.
45------------------------------------------------------------------------------
46with AMF.CMOF;
47with AMF.Internals.Tables.CMOF_Attributes;
48with AMF.Internals.Tables.UML_String_Data_00;
49with AMF.Internals.Tables.UML_String_Data_01;
50with AMF.Internals.Tables.UML_String_Data_02;
51with AMF.Internals.Tables.UML_String_Data_03;
52with AMF.Internals.Tables.UML_String_Data_04;
53with AMF.Internals.Tables.UML_String_Data_05;
54with AMF.Internals.Tables.UML_String_Data_06;
55with AMF.Internals.Tables.UML_String_Data_07;
56with AMF.Internals.Tables.UML_String_Data_08;
57with AMF.Internals.Tables.UML_String_Data_09;
58with AMF.Internals.Tables.UML_String_Data_0A;
59with AMF.Internals.Tables.UML_String_Data_0B;
60with AMF.Internals.Tables.UML_String_Data_0C;
61
62package body AMF.Internals.Tables.UML_Metamodel.Properties is
63
64   ----------------
65   -- Initialize --
66   ----------------
67
68   procedure Initialize is
69   begin
70      Initialize_1;
71      Initialize_2;
72      Initialize_3;
73      Initialize_4;
74      Initialize_5;
75      Initialize_6;
76      Initialize_7;
77      Initialize_8;
78      Initialize_9;
79      Initialize_10;
80      Initialize_11;
81      Initialize_12;
82      Initialize_13;
83      Initialize_14;
84      Initialize_15;
85      Initialize_16;
86      Initialize_17;
87      Initialize_18;
88      Initialize_19;
89      Initialize_20;
90      Initialize_21;
91      Initialize_22;
92      Initialize_23;
93      Initialize_24;
94      Initialize_25;
95      Initialize_26;
96      Initialize_27;
97      Initialize_28;
98      Initialize_29;
99      Initialize_30;
100      Initialize_31;
101      Initialize_32;
102      Initialize_33;
103      Initialize_34;
104      Initialize_35;
105      Initialize_36;
106      Initialize_37;
107      Initialize_38;
108      Initialize_39;
109      Initialize_40;
110      Initialize_41;
111      Initialize_42;
112      Initialize_43;
113      Initialize_44;
114      Initialize_45;
115      Initialize_46;
116      Initialize_47;
117      Initialize_48;
118      Initialize_49;
119      Initialize_50;
120      Initialize_51;
121      Initialize_52;
122      Initialize_53;
123      Initialize_54;
124      Initialize_55;
125      Initialize_56;
126      Initialize_57;
127      Initialize_58;
128      Initialize_59;
129      Initialize_60;
130      Initialize_61;
131      Initialize_62;
132      Initialize_63;
133      Initialize_64;
134      Initialize_65;
135      Initialize_66;
136      Initialize_67;
137      Initialize_68;
138      Initialize_69;
139      Initialize_70;
140      Initialize_71;
141      Initialize_72;
142      Initialize_73;
143      Initialize_74;
144      Initialize_75;
145      Initialize_76;
146      Initialize_77;
147      Initialize_78;
148      Initialize_79;
149      Initialize_80;
150      Initialize_81;
151      Initialize_82;
152      Initialize_83;
153      Initialize_84;
154      Initialize_85;
155      Initialize_86;
156      Initialize_87;
157      Initialize_88;
158      Initialize_89;
159      Initialize_90;
160      Initialize_91;
161      Initialize_92;
162      Initialize_93;
163      Initialize_94;
164      Initialize_95;
165      Initialize_96;
166      Initialize_97;
167      Initialize_98;
168      Initialize_99;
169      Initialize_100;
170      Initialize_101;
171      Initialize_102;
172      Initialize_103;
173      Initialize_104;
174      Initialize_105;
175      Initialize_106;
176      Initialize_107;
177      Initialize_108;
178      Initialize_109;
179      Initialize_110;
180      Initialize_111;
181      Initialize_112;
182      Initialize_113;
183      Initialize_114;
184      Initialize_115;
185      Initialize_116;
186      Initialize_117;
187      Initialize_118;
188      Initialize_119;
189      Initialize_120;
190      Initialize_121;
191      Initialize_122;
192      Initialize_123;
193      Initialize_124;
194      Initialize_125;
195      Initialize_126;
196      Initialize_127;
197      Initialize_128;
198      Initialize_129;
199      Initialize_130;
200      Initialize_131;
201      Initialize_132;
202      Initialize_133;
203      Initialize_134;
204      Initialize_135;
205      Initialize_136;
206      Initialize_137;
207      Initialize_138;
208      Initialize_139;
209      Initialize_140;
210      Initialize_141;
211      Initialize_142;
212      Initialize_143;
213      Initialize_144;
214      Initialize_145;
215      Initialize_146;
216      Initialize_147;
217      Initialize_148;
218      Initialize_149;
219      Initialize_150;
220      Initialize_151;
221      Initialize_152;
222      Initialize_153;
223      Initialize_154;
224      Initialize_155;
225      Initialize_156;
226      Initialize_157;
227      Initialize_158;
228      Initialize_159;
229      Initialize_160;
230      Initialize_161;
231      Initialize_162;
232      Initialize_163;
233      Initialize_164;
234      Initialize_165;
235      Initialize_166;
236      Initialize_167;
237      Initialize_168;
238      Initialize_169;
239      Initialize_170;
240      Initialize_171;
241      Initialize_172;
242      Initialize_173;
243      Initialize_174;
244      Initialize_175;
245      Initialize_176;
246      Initialize_177;
247      Initialize_178;
248      Initialize_179;
249      Initialize_180;
250      Initialize_181;
251      Initialize_182;
252      Initialize_183;
253      Initialize_184;
254      Initialize_185;
255      Initialize_186;
256      Initialize_187;
257      Initialize_188;
258      Initialize_189;
259      Initialize_190;
260      Initialize_191;
261      Initialize_192;
262      Initialize_193;
263      Initialize_194;
264      Initialize_195;
265      Initialize_196;
266      Initialize_197;
267      Initialize_198;
268      Initialize_199;
269      Initialize_200;
270      Initialize_201;
271      Initialize_202;
272      Initialize_203;
273      Initialize_204;
274      Initialize_205;
275      Initialize_206;
276      Initialize_207;
277      Initialize_208;
278      Initialize_209;
279      Initialize_210;
280      Initialize_211;
281      Initialize_212;
282      Initialize_213;
283      Initialize_214;
284      Initialize_215;
285      Initialize_216;
286      Initialize_217;
287      Initialize_218;
288      Initialize_219;
289      Initialize_220;
290      Initialize_221;
291      Initialize_222;
292      Initialize_223;
293      Initialize_224;
294      Initialize_225;
295      Initialize_226;
296      Initialize_227;
297      Initialize_228;
298      Initialize_229;
299      Initialize_230;
300      Initialize_231;
301      Initialize_232;
302      Initialize_233;
303      Initialize_234;
304      Initialize_235;
305      Initialize_236;
306      Initialize_237;
307      Initialize_238;
308      Initialize_239;
309      Initialize_240;
310      Initialize_241;
311      Initialize_242;
312      Initialize_243;
313      Initialize_244;
314      Initialize_245;
315      Initialize_246;
316      Initialize_247;
317      Initialize_248;
318      Initialize_249;
319      Initialize_250;
320      Initialize_251;
321      Initialize_252;
322      Initialize_253;
323      Initialize_254;
324      Initialize_255;
325      Initialize_256;
326      Initialize_257;
327      Initialize_258;
328      Initialize_259;
329      Initialize_260;
330      Initialize_261;
331      Initialize_262;
332      Initialize_263;
333      Initialize_264;
334      Initialize_265;
335      Initialize_266;
336      Initialize_267;
337      Initialize_268;
338      Initialize_269;
339      Initialize_270;
340      Initialize_271;
341      Initialize_272;
342      Initialize_273;
343      Initialize_274;
344      Initialize_275;
345      Initialize_276;
346      Initialize_277;
347      Initialize_278;
348      Initialize_279;
349      Initialize_280;
350      Initialize_281;
351      Initialize_282;
352      Initialize_283;
353      Initialize_284;
354      Initialize_285;
355      Initialize_286;
356      Initialize_287;
357      Initialize_288;
358      Initialize_289;
359      Initialize_290;
360      Initialize_291;
361      Initialize_292;
362      Initialize_293;
363      Initialize_294;
364      Initialize_295;
365      Initialize_296;
366      Initialize_297;
367      Initialize_298;
368      Initialize_299;
369      Initialize_300;
370      Initialize_301;
371      Initialize_302;
372      Initialize_303;
373      Initialize_304;
374      Initialize_305;
375      Initialize_306;
376      Initialize_307;
377      Initialize_308;
378      Initialize_309;
379      Initialize_310;
380      Initialize_311;
381      Initialize_312;
382      Initialize_313;
383      Initialize_314;
384      Initialize_315;
385      Initialize_316;
386      Initialize_317;
387      Initialize_318;
388      Initialize_319;
389      Initialize_320;
390      Initialize_321;
391      Initialize_322;
392      Initialize_323;
393      Initialize_324;
394      Initialize_325;
395      Initialize_326;
396      Initialize_327;
397      Initialize_328;
398      Initialize_329;
399      Initialize_330;
400      Initialize_331;
401      Initialize_332;
402      Initialize_333;
403      Initialize_334;
404      Initialize_335;
405      Initialize_336;
406      Initialize_337;
407      Initialize_338;
408      Initialize_339;
409      Initialize_340;
410      Initialize_341;
411      Initialize_342;
412      Initialize_343;
413      Initialize_344;
414      Initialize_345;
415      Initialize_346;
416      Initialize_347;
417      Initialize_348;
418      Initialize_349;
419      Initialize_350;
420      Initialize_351;
421      Initialize_352;
422      Initialize_353;
423      Initialize_354;
424      Initialize_355;
425      Initialize_356;
426      Initialize_357;
427      Initialize_358;
428      Initialize_359;
429      Initialize_360;
430      Initialize_361;
431      Initialize_362;
432      Initialize_363;
433      Initialize_364;
434      Initialize_365;
435      Initialize_366;
436      Initialize_367;
437      Initialize_368;
438      Initialize_369;
439      Initialize_370;
440      Initialize_371;
441      Initialize_372;
442      Initialize_373;
443      Initialize_374;
444      Initialize_375;
445      Initialize_376;
446      Initialize_377;
447      Initialize_378;
448      Initialize_379;
449      Initialize_380;
450      Initialize_381;
451      Initialize_382;
452      Initialize_383;
453      Initialize_384;
454      Initialize_385;
455      Initialize_386;
456      Initialize_387;
457      Initialize_388;
458      Initialize_389;
459      Initialize_390;
460      Initialize_391;
461      Initialize_392;
462      Initialize_393;
463      Initialize_394;
464      Initialize_395;
465      Initialize_396;
466      Initialize_397;
467      Initialize_398;
468      Initialize_399;
469      Initialize_400;
470      Initialize_401;
471      Initialize_402;
472      Initialize_403;
473      Initialize_404;
474      Initialize_405;
475      Initialize_406;
476      Initialize_407;
477      Initialize_408;
478      Initialize_409;
479      Initialize_410;
480      Initialize_411;
481      Initialize_412;
482      Initialize_413;
483      Initialize_414;
484      Initialize_415;
485      Initialize_416;
486      Initialize_417;
487      Initialize_418;
488      Initialize_419;
489      Initialize_420;
490      Initialize_421;
491      Initialize_422;
492      Initialize_423;
493      Initialize_424;
494      Initialize_425;
495      Initialize_426;
496      Initialize_427;
497      Initialize_428;
498      Initialize_429;
499      Initialize_430;
500      Initialize_431;
501      Initialize_432;
502      Initialize_433;
503      Initialize_434;
504      Initialize_435;
505      Initialize_436;
506      Initialize_437;
507      Initialize_438;
508      Initialize_439;
509      Initialize_440;
510      Initialize_441;
511      Initialize_442;
512      Initialize_443;
513      Initialize_444;
514      Initialize_445;
515      Initialize_446;
516      Initialize_447;
517      Initialize_448;
518      Initialize_449;
519      Initialize_450;
520      Initialize_451;
521      Initialize_452;
522      Initialize_453;
523      Initialize_454;
524      Initialize_455;
525      Initialize_456;
526      Initialize_457;
527      Initialize_458;
528      Initialize_459;
529      Initialize_460;
530      Initialize_461;
531      Initialize_462;
532      Initialize_463;
533      Initialize_464;
534      Initialize_465;
535      Initialize_466;
536      Initialize_467;
537      Initialize_468;
538      Initialize_469;
539      Initialize_470;
540      Initialize_471;
541      Initialize_472;
542      Initialize_473;
543      Initialize_474;
544      Initialize_475;
545      Initialize_476;
546      Initialize_477;
547      Initialize_478;
548      Initialize_479;
549      Initialize_480;
550      Initialize_481;
551      Initialize_482;
552      Initialize_483;
553      Initialize_484;
554      Initialize_485;
555      Initialize_486;
556      Initialize_487;
557      Initialize_488;
558      Initialize_489;
559      Initialize_490;
560      Initialize_491;
561      Initialize_492;
562      Initialize_493;
563      Initialize_494;
564      Initialize_495;
565      Initialize_496;
566      Initialize_497;
567      Initialize_498;
568      Initialize_499;
569      Initialize_500;
570      Initialize_501;
571      Initialize_502;
572      Initialize_503;
573      Initialize_504;
574      Initialize_505;
575      Initialize_506;
576      Initialize_507;
577      Initialize_508;
578      Initialize_509;
579      Initialize_510;
580      Initialize_511;
581      Initialize_512;
582      Initialize_513;
583      Initialize_514;
584      Initialize_515;
585      Initialize_516;
586      Initialize_517;
587      Initialize_518;
588      Initialize_519;
589      Initialize_520;
590      Initialize_521;
591      Initialize_522;
592      Initialize_523;
593      Initialize_524;
594      Initialize_525;
595      Initialize_526;
596      Initialize_527;
597      Initialize_528;
598      Initialize_529;
599      Initialize_530;
600      Initialize_531;
601      Initialize_532;
602      Initialize_533;
603      Initialize_534;
604      Initialize_535;
605      Initialize_536;
606      Initialize_537;
607      Initialize_538;
608      Initialize_539;
609      Initialize_540;
610      Initialize_541;
611      Initialize_542;
612      Initialize_543;
613      Initialize_544;
614      Initialize_545;
615      Initialize_546;
616      Initialize_547;
617      Initialize_548;
618      Initialize_549;
619      Initialize_550;
620      Initialize_551;
621      Initialize_552;
622      Initialize_553;
623      Initialize_554;
624      Initialize_555;
625      Initialize_556;
626      Initialize_557;
627      Initialize_558;
628      Initialize_559;
629      Initialize_560;
630      Initialize_561;
631      Initialize_562;
632      Initialize_563;
633      Initialize_564;
634      Initialize_565;
635      Initialize_566;
636      Initialize_567;
637      Initialize_568;
638      Initialize_569;
639      Initialize_570;
640      Initialize_571;
641      Initialize_572;
642      Initialize_573;
643      Initialize_574;
644      Initialize_575;
645      Initialize_576;
646      Initialize_577;
647      Initialize_578;
648      Initialize_579;
649      Initialize_580;
650      Initialize_581;
651      Initialize_582;
652      Initialize_583;
653      Initialize_584;
654      Initialize_585;
655      Initialize_586;
656      Initialize_587;
657      Initialize_588;
658      Initialize_589;
659      Initialize_590;
660      Initialize_591;
661      Initialize_592;
662      Initialize_593;
663      Initialize_594;
664      Initialize_595;
665      Initialize_596;
666      Initialize_597;
667      Initialize_598;
668      Initialize_599;
669      Initialize_600;
670      Initialize_601;
671      Initialize_602;
672      Initialize_603;
673      Initialize_604;
674      Initialize_605;
675      Initialize_606;
676      Initialize_607;
677      Initialize_608;
678      Initialize_609;
679      Initialize_610;
680      Initialize_611;
681      Initialize_612;
682      Initialize_613;
683      Initialize_614;
684      Initialize_615;
685      Initialize_616;
686      Initialize_617;
687      Initialize_618;
688      Initialize_619;
689      Initialize_620;
690      Initialize_621;
691      Initialize_622;
692      Initialize_623;
693      Initialize_624;
694      Initialize_625;
695      Initialize_626;
696      Initialize_627;
697      Initialize_628;
698      Initialize_629;
699      Initialize_630;
700      Initialize_631;
701      Initialize_632;
702      Initialize_633;
703      Initialize_634;
704      Initialize_635;
705      Initialize_636;
706      Initialize_637;
707      Initialize_638;
708      Initialize_639;
709      Initialize_640;
710      Initialize_641;
711      Initialize_642;
712      Initialize_643;
713      Initialize_644;
714      Initialize_645;
715      Initialize_646;
716      Initialize_647;
717      Initialize_648;
718      Initialize_649;
719      Initialize_650;
720      Initialize_651;
721      Initialize_652;
722      Initialize_653;
723      Initialize_654;
724      Initialize_655;
725      Initialize_656;
726      Initialize_657;
727      Initialize_658;
728      Initialize_659;
729      Initialize_660;
730      Initialize_661;
731      Initialize_662;
732      Initialize_663;
733      Initialize_664;
734      Initialize_665;
735      Initialize_666;
736      Initialize_667;
737      Initialize_668;
738      Initialize_669;
739      Initialize_670;
740      Initialize_671;
741      Initialize_672;
742      Initialize_673;
743      Initialize_674;
744      Initialize_675;
745      Initialize_676;
746      Initialize_677;
747      Initialize_678;
748      Initialize_679;
749      Initialize_680;
750      Initialize_681;
751      Initialize_682;
752      Initialize_683;
753      Initialize_684;
754      Initialize_685;
755      Initialize_686;
756      Initialize_687;
757      Initialize_688;
758      Initialize_689;
759      Initialize_690;
760      Initialize_691;
761      Initialize_692;
762      Initialize_693;
763      Initialize_694;
764      Initialize_695;
765      Initialize_696;
766      Initialize_697;
767      Initialize_698;
768      Initialize_699;
769      Initialize_700;
770      Initialize_701;
771      Initialize_702;
772      Initialize_703;
773      Initialize_704;
774      Initialize_705;
775      Initialize_706;
776      Initialize_707;
777      Initialize_708;
778      Initialize_709;
779      Initialize_710;
780      Initialize_711;
781      Initialize_712;
782      Initialize_713;
783      Initialize_714;
784      Initialize_715;
785      Initialize_716;
786      Initialize_717;
787      Initialize_718;
788      Initialize_719;
789      Initialize_720;
790      Initialize_721;
791      Initialize_722;
792      Initialize_723;
793      Initialize_724;
794      Initialize_725;
795      Initialize_726;
796      Initialize_727;
797      Initialize_728;
798      Initialize_729;
799      Initialize_730;
800      Initialize_731;
801      Initialize_732;
802      Initialize_733;
803      Initialize_734;
804      Initialize_735;
805      Initialize_736;
806      Initialize_737;
807      Initialize_738;
808      Initialize_739;
809      Initialize_740;
810      Initialize_741;
811      Initialize_742;
812      Initialize_743;
813      Initialize_744;
814      Initialize_745;
815      Initialize_746;
816      Initialize_747;
817      Initialize_748;
818      Initialize_749;
819      Initialize_750;
820      Initialize_751;
821      Initialize_752;
822      Initialize_753;
823      Initialize_754;
824      Initialize_755;
825      Initialize_756;
826      Initialize_757;
827      Initialize_758;
828      Initialize_759;
829      Initialize_760;
830      Initialize_761;
831      Initialize_762;
832      Initialize_763;
833      Initialize_764;
834      Initialize_765;
835      Initialize_766;
836      Initialize_767;
837      Initialize_768;
838      Initialize_769;
839      Initialize_770;
840      Initialize_771;
841      Initialize_772;
842      Initialize_773;
843      Initialize_774;
844      Initialize_775;
845      Initialize_776;
846      Initialize_777;
847      Initialize_778;
848      Initialize_779;
849      Initialize_780;
850      Initialize_781;
851      Initialize_782;
852      Initialize_783;
853      Initialize_784;
854      Initialize_785;
855      Initialize_786;
856      Initialize_787;
857      Initialize_788;
858      Initialize_789;
859      Initialize_790;
860      Initialize_791;
861      Initialize_792;
862      Initialize_793;
863      Initialize_794;
864      Initialize_795;
865      Initialize_796;
866      Initialize_797;
867      Initialize_798;
868      Initialize_799;
869      Initialize_800;
870      Initialize_801;
871      Initialize_802;
872      Initialize_803;
873      Initialize_804;
874      Initialize_805;
875      Initialize_806;
876      Initialize_807;
877      Initialize_808;
878      Initialize_809;
879      Initialize_810;
880      Initialize_811;
881      Initialize_812;
882      Initialize_813;
883      Initialize_814;
884      Initialize_815;
885      Initialize_816;
886      Initialize_817;
887      Initialize_818;
888      Initialize_819;
889      Initialize_820;
890      Initialize_821;
891      Initialize_822;
892      Initialize_823;
893      Initialize_824;
894      Initialize_825;
895      Initialize_826;
896      Initialize_827;
897      Initialize_828;
898      Initialize_829;
899      Initialize_830;
900      Initialize_831;
901      Initialize_832;
902      Initialize_833;
903      Initialize_834;
904      Initialize_835;
905      Initialize_836;
906      Initialize_837;
907      Initialize_838;
908      Initialize_839;
909      Initialize_840;
910      Initialize_841;
911      Initialize_842;
912      Initialize_843;
913      Initialize_844;
914      Initialize_845;
915      Initialize_846;
916      Initialize_847;
917      Initialize_848;
918      Initialize_849;
919      Initialize_850;
920      Initialize_851;
921      Initialize_852;
922      Initialize_853;
923      Initialize_854;
924      Initialize_855;
925      Initialize_856;
926      Initialize_857;
927      Initialize_858;
928      Initialize_859;
929      Initialize_860;
930      Initialize_861;
931      Initialize_862;
932      Initialize_863;
933      Initialize_864;
934      Initialize_865;
935      Initialize_866;
936      Initialize_867;
937      Initialize_868;
938      Initialize_869;
939      Initialize_870;
940      Initialize_871;
941      Initialize_872;
942      Initialize_873;
943      Initialize_874;
944      Initialize_875;
945      Initialize_876;
946      Initialize_877;
947      Initialize_878;
948      Initialize_879;
949      Initialize_880;
950      Initialize_881;
951      Initialize_882;
952      Initialize_883;
953      Initialize_884;
954      Initialize_885;
955      Initialize_886;
956      Initialize_887;
957      Initialize_888;
958      Initialize_889;
959      Initialize_890;
960      Initialize_891;
961      Initialize_892;
962      Initialize_893;
963      Initialize_894;
964      Initialize_895;
965      Initialize_896;
966      Initialize_897;
967      Initialize_898;
968      Initialize_899;
969      Initialize_900;
970      Initialize_901;
971      Initialize_902;
972      Initialize_903;
973      Initialize_904;
974      Initialize_905;
975      Initialize_906;
976      Initialize_907;
977      Initialize_908;
978      Initialize_909;
979      Initialize_910;
980      Initialize_911;
981      Initialize_912;
982      Initialize_913;
983      Initialize_914;
984      Initialize_915;
985      Initialize_916;
986      Initialize_917;
987      Initialize_918;
988      Initialize_919;
989      Initialize_920;
990      Initialize_921;
991      Initialize_922;
992      Initialize_923;
993      Initialize_924;
994      Initialize_925;
995      Initialize_926;
996      Initialize_927;
997      Initialize_928;
998      Initialize_929;
999      Initialize_930;
1000      Initialize_931;
1001      Initialize_932;
1002      Initialize_933;
1003      Initialize_934;
1004      Initialize_935;
1005      Initialize_936;
1006      Initialize_937;
1007      Initialize_938;
1008      Initialize_939;
1009      Initialize_940;
1010      Initialize_941;
1011      Initialize_942;
1012      Initialize_943;
1013      Initialize_944;
1014      Initialize_945;
1015      Initialize_946;
1016      Initialize_947;
1017      Initialize_948;
1018      Initialize_949;
1019      Initialize_950;
1020      Initialize_951;
1021      Initialize_952;
1022      Initialize_953;
1023      Initialize_954;
1024      Initialize_955;
1025      Initialize_956;
1026      Initialize_957;
1027      Initialize_958;
1028      Initialize_959;
1029      Initialize_960;
1030      Initialize_961;
1031      Initialize_962;
1032      Initialize_963;
1033      Initialize_964;
1034      Initialize_965;
1035      Initialize_966;
1036      Initialize_967;
1037      Initialize_968;
1038      Initialize_969;
1039      Initialize_970;
1040      Initialize_971;
1041      Initialize_972;
1042      Initialize_973;
1043      Initialize_974;
1044      Initialize_975;
1045      Initialize_976;
1046      Initialize_977;
1047      Initialize_978;
1048      Initialize_979;
1049      Initialize_980;
1050      Initialize_981;
1051      Initialize_982;
1052      Initialize_983;
1053      Initialize_984;
1054      Initialize_985;
1055      Initialize_986;
1056      Initialize_987;
1057      Initialize_988;
1058      Initialize_989;
1059      Initialize_990;
1060      Initialize_991;
1061      Initialize_992;
1062      Initialize_993;
1063      Initialize_994;
1064      Initialize_995;
1065      Initialize_996;
1066      Initialize_997;
1067      Initialize_998;
1068      Initialize_999;
1069      Initialize_1000;
1070      Initialize_1001;
1071      Initialize_1002;
1072      Initialize_1003;
1073      Initialize_1004;
1074      Initialize_1005;
1075      Initialize_1006;
1076      Initialize_1007;
1077      Initialize_1008;
1078      Initialize_1009;
1079      Initialize_1010;
1080      Initialize_1011;
1081      Initialize_1012;
1082      Initialize_1013;
1083      Initialize_1014;
1084      Initialize_1015;
1085      Initialize_1016;
1086      Initialize_1017;
1087      Initialize_1018;
1088      Initialize_1019;
1089      Initialize_1020;
1090      Initialize_1021;
1091      Initialize_1022;
1092      Initialize_1023;
1093      Initialize_1024;
1094      Initialize_1025;
1095      Initialize_1026;
1096      Initialize_1027;
1097      Initialize_1028;
1098      Initialize_1029;
1099      Initialize_1030;
1100      Initialize_1031;
1101      Initialize_1032;
1102      Initialize_1033;
1103      Initialize_1034;
1104      Initialize_1035;
1105      Initialize_1036;
1106      Initialize_1037;
1107      Initialize_1038;
1108      Initialize_1039;
1109      Initialize_1040;
1110      Initialize_1041;
1111      Initialize_1042;
1112      Initialize_1043;
1113      Initialize_1044;
1114      Initialize_1045;
1115      Initialize_1046;
1116      Initialize_1047;
1117      Initialize_1048;
1118      Initialize_1049;
1119      Initialize_1050;
1120      Initialize_1051;
1121      Initialize_1052;
1122      Initialize_1053;
1123      Initialize_1054;
1124      Initialize_1055;
1125      Initialize_1056;
1126      Initialize_1057;
1127      Initialize_1058;
1128      Initialize_1059;
1129      Initialize_1060;
1130      Initialize_1061;
1131      Initialize_1062;
1132      Initialize_1063;
1133      Initialize_1064;
1134      Initialize_1065;
1135      Initialize_1066;
1136      Initialize_1067;
1137      Initialize_1068;
1138      Initialize_1069;
1139      Initialize_1070;
1140      Initialize_1071;
1141      Initialize_1072;
1142      Initialize_1073;
1143      Initialize_1074;
1144      Initialize_1075;
1145      Initialize_1076;
1146      Initialize_1077;
1147      Initialize_1078;
1148      Initialize_1079;
1149      Initialize_1080;
1150      Initialize_1081;
1151      Initialize_1082;
1152      Initialize_1083;
1153      Initialize_1084;
1154      Initialize_1085;
1155      Initialize_1086;
1156      Initialize_1087;
1157      Initialize_1088;
1158      Initialize_1089;
1159      Initialize_1090;
1160      Initialize_1091;
1161      Initialize_1092;
1162      Initialize_1093;
1163      Initialize_1094;
1164      Initialize_1095;
1165      Initialize_1096;
1166      Initialize_1097;
1167      Initialize_1098;
1168      Initialize_1099;
1169      Initialize_1100;
1170      Initialize_1101;
1171      Initialize_1102;
1172      Initialize_1103;
1173      Initialize_1104;
1174      Initialize_1105;
1175      Initialize_1106;
1176      Initialize_1107;
1177      Initialize_1108;
1178      Initialize_1109;
1179      Initialize_1110;
1180      Initialize_1111;
1181      Initialize_1112;
1182      Initialize_1113;
1183      Initialize_1114;
1184      Initialize_1115;
1185      Initialize_1116;
1186      Initialize_1117;
1187      Initialize_1118;
1188      Initialize_1119;
1189      Initialize_1120;
1190      Initialize_1121;
1191      Initialize_1122;
1192      Initialize_1123;
1193      Initialize_1124;
1194      Initialize_1125;
1195      Initialize_1126;
1196      Initialize_1127;
1197      Initialize_1128;
1198      Initialize_1129;
1199      Initialize_1130;
1200      Initialize_1131;
1201      Initialize_1132;
1202      Initialize_1133;
1203      Initialize_1134;
1204      Initialize_1135;
1205      Initialize_1136;
1206      Initialize_1137;
1207      Initialize_1138;
1208      Initialize_1139;
1209      Initialize_1140;
1210      Initialize_1141;
1211      Initialize_1142;
1212      Initialize_1143;
1213      Initialize_1144;
1214      Initialize_1145;
1215      Initialize_1146;
1216      Initialize_1147;
1217      Initialize_1148;
1218      Initialize_1149;
1219      Initialize_1150;
1220      Initialize_1151;
1221      Initialize_1152;
1222      Initialize_1153;
1223      Initialize_1154;
1224      Initialize_1155;
1225      Initialize_1156;
1226      Initialize_1157;
1227      Initialize_1158;
1228      Initialize_1159;
1229      Initialize_1160;
1230      Initialize_1161;
1231      Initialize_1162;
1232      Initialize_1163;
1233      Initialize_1164;
1234      Initialize_1165;
1235      Initialize_1166;
1236      Initialize_1167;
1237      Initialize_1168;
1238      Initialize_1169;
1239      Initialize_1170;
1240      Initialize_1171;
1241      Initialize_1172;
1242      Initialize_1173;
1243      Initialize_1174;
1244      Initialize_1175;
1245      Initialize_1176;
1246      Initialize_1177;
1247      Initialize_1178;
1248      Initialize_1179;
1249      Initialize_1180;
1250      Initialize_1181;
1251      Initialize_1182;
1252      Initialize_1183;
1253      Initialize_1184;
1254      Initialize_1185;
1255      Initialize_1186;
1256      Initialize_1187;
1257      Initialize_1188;
1258      Initialize_1189;
1259      Initialize_1190;
1260      Initialize_1191;
1261      Initialize_1192;
1262      Initialize_1193;
1263      Initialize_1194;
1264      Initialize_1195;
1265      Initialize_1196;
1266      Initialize_1197;
1267      Initialize_1198;
1268      Initialize_1199;
1269      Initialize_1200;
1270      Initialize_1201;
1271      Initialize_1202;
1272      Initialize_1203;
1273      Initialize_1204;
1274      Initialize_1205;
1275      Initialize_1206;
1276      Initialize_1207;
1277      Initialize_1208;
1278      Initialize_1209;
1279      Initialize_1210;
1280      Initialize_1211;
1281      Initialize_1212;
1282      Initialize_1213;
1283      Initialize_1214;
1284      Initialize_1215;
1285      Initialize_1216;
1286      Initialize_1217;
1287      Initialize_1218;
1288      Initialize_1219;
1289      Initialize_1220;
1290      Initialize_1221;
1291      Initialize_1222;
1292      Initialize_1223;
1293      Initialize_1224;
1294      Initialize_1225;
1295      Initialize_1226;
1296      Initialize_1227;
1297      Initialize_1228;
1298      Initialize_1229;
1299      Initialize_1230;
1300      Initialize_1231;
1301      Initialize_1232;
1302      Initialize_1233;
1303      Initialize_1234;
1304      Initialize_1235;
1305      Initialize_1236;
1306      Initialize_1237;
1307      Initialize_1238;
1308      Initialize_1239;
1309      Initialize_1240;
1310      Initialize_1241;
1311      Initialize_1242;
1312      Initialize_1243;
1313      Initialize_1244;
1314      Initialize_1245;
1315      Initialize_1246;
1316      Initialize_1247;
1317      Initialize_1248;
1318      Initialize_1249;
1319      Initialize_1250;
1320      Initialize_1251;
1321      Initialize_1252;
1322      Initialize_1253;
1323      Initialize_1254;
1324      Initialize_1255;
1325      Initialize_1256;
1326      Initialize_1257;
1327      Initialize_1258;
1328      Initialize_1259;
1329      Initialize_1260;
1330      Initialize_1261;
1331      Initialize_1262;
1332      Initialize_1263;
1333      Initialize_1264;
1334      Initialize_1265;
1335      Initialize_1266;
1336      Initialize_1267;
1337      Initialize_1268;
1338      Initialize_1269;
1339      Initialize_1270;
1340      Initialize_1271;
1341      Initialize_1272;
1342      Initialize_1273;
1343      Initialize_1274;
1344      Initialize_1275;
1345      Initialize_1276;
1346      Initialize_1277;
1347      Initialize_1278;
1348      Initialize_1279;
1349      Initialize_1280;
1350      Initialize_1281;
1351      Initialize_1282;
1352      Initialize_1283;
1353      Initialize_1284;
1354      Initialize_1285;
1355      Initialize_1286;
1356      Initialize_1287;
1357      Initialize_1288;
1358      Initialize_1289;
1359      Initialize_1290;
1360      Initialize_1291;
1361      Initialize_1292;
1362      Initialize_1293;
1363      Initialize_1294;
1364      Initialize_1295;
1365      Initialize_1296;
1366      Initialize_1297;
1367      Initialize_1298;
1368      Initialize_1299;
1369      Initialize_1300;
1370      Initialize_1301;
1371      Initialize_1302;
1372      Initialize_1303;
1373      Initialize_1304;
1374      Initialize_1305;
1375      Initialize_1306;
1376      Initialize_1307;
1377      Initialize_1308;
1378      Initialize_1309;
1379      Initialize_1310;
1380      Initialize_1311;
1381      Initialize_1312;
1382      Initialize_1313;
1383      Initialize_1314;
1384      Initialize_1315;
1385      Initialize_1316;
1386      Initialize_1317;
1387      Initialize_1318;
1388      Initialize_1319;
1389      Initialize_1320;
1390      Initialize_1321;
1391      Initialize_1322;
1392      Initialize_1323;
1393      Initialize_1324;
1394      Initialize_1325;
1395      Initialize_1326;
1396      Initialize_1327;
1397      Initialize_1328;
1398      Initialize_1329;
1399      Initialize_1330;
1400      Initialize_1331;
1401      Initialize_1332;
1402      Initialize_1333;
1403      Initialize_1334;
1404      Initialize_1335;
1405      Initialize_1336;
1406      Initialize_1337;
1407      Initialize_1338;
1408      Initialize_1339;
1409      Initialize_1340;
1410      Initialize_1341;
1411      Initialize_1342;
1412      Initialize_1343;
1413      Initialize_1344;
1414      Initialize_1345;
1415      Initialize_1346;
1416      Initialize_1347;
1417      Initialize_1348;
1418      Initialize_1349;
1419      Initialize_1350;
1420      Initialize_1351;
1421      Initialize_1352;
1422      Initialize_1353;
1423      Initialize_1354;
1424      Initialize_1355;
1425      Initialize_1356;
1426      Initialize_1357;
1427      Initialize_1358;
1428      Initialize_1359;
1429      Initialize_1360;
1430      Initialize_1361;
1431      Initialize_1362;
1432      Initialize_1363;
1433      Initialize_1364;
1434      Initialize_1365;
1435      Initialize_1366;
1436      Initialize_1367;
1437      Initialize_1368;
1438      Initialize_1369;
1439      Initialize_1370;
1440      Initialize_1371;
1441      Initialize_1372;
1442      Initialize_1373;
1443      Initialize_1374;
1444      Initialize_1375;
1445      Initialize_1376;
1446      Initialize_1377;
1447      Initialize_1378;
1448      Initialize_1379;
1449      Initialize_1380;
1450      Initialize_1381;
1451      Initialize_1382;
1452      Initialize_1383;
1453      Initialize_1384;
1454      Initialize_1385;
1455      Initialize_1386;
1456      Initialize_1387;
1457      Initialize_1388;
1458      Initialize_1389;
1459      Initialize_1390;
1460      Initialize_1391;
1461      Initialize_1392;
1462      Initialize_1393;
1463      Initialize_1394;
1464      Initialize_1395;
1465      Initialize_1396;
1466      Initialize_1397;
1467      Initialize_1398;
1468      Initialize_1399;
1469      Initialize_1400;
1470      Initialize_1401;
1471      Initialize_1402;
1472      Initialize_1403;
1473      Initialize_1404;
1474      Initialize_1405;
1475      Initialize_1406;
1476      Initialize_1407;
1477      Initialize_1408;
1478      Initialize_1409;
1479      Initialize_1410;
1480      Initialize_1411;
1481      Initialize_1412;
1482      Initialize_1413;
1483      Initialize_1414;
1484      Initialize_1415;
1485      Initialize_1416;
1486      Initialize_1417;
1487      Initialize_1418;
1488      Initialize_1419;
1489      Initialize_1420;
1490      Initialize_1421;
1491      Initialize_1422;
1492      Initialize_1423;
1493      Initialize_1424;
1494      Initialize_1425;
1495      Initialize_1426;
1496      Initialize_1427;
1497      Initialize_1428;
1498      Initialize_1429;
1499      Initialize_1430;
1500      Initialize_1431;
1501      Initialize_1432;
1502      Initialize_1433;
1503      Initialize_1434;
1504      Initialize_1435;
1505      Initialize_1436;
1506      Initialize_1437;
1507      Initialize_1438;
1508      Initialize_1439;
1509      Initialize_1440;
1510      Initialize_1441;
1511      Initialize_1442;
1512      Initialize_1443;
1513      Initialize_1444;
1514      Initialize_1445;
1515      Initialize_1446;
1516      Initialize_1447;
1517      Initialize_1448;
1518      Initialize_1449;
1519      Initialize_1450;
1520      Initialize_1451;
1521      Initialize_1452;
1522      Initialize_1453;
1523      Initialize_1454;
1524      Initialize_1455;
1525      Initialize_1456;
1526      Initialize_1457;
1527      Initialize_1458;
1528      Initialize_1459;
1529      Initialize_1460;
1530      Initialize_1461;
1531      Initialize_1462;
1532      Initialize_1463;
1533      Initialize_1464;
1534      Initialize_1465;
1535      Initialize_1466;
1536      Initialize_1467;
1537      Initialize_1468;
1538      Initialize_1469;
1539      Initialize_1470;
1540      Initialize_1471;
1541      Initialize_1472;
1542      Initialize_1473;
1543      Initialize_1474;
1544      Initialize_1475;
1545      Initialize_1476;
1546      Initialize_1477;
1547      Initialize_1478;
1548      Initialize_1479;
1549      Initialize_1480;
1550      Initialize_1481;
1551      Initialize_1482;
1552      Initialize_1483;
1553      Initialize_1484;
1554      Initialize_1485;
1555      Initialize_1486;
1556      Initialize_1487;
1557      Initialize_1488;
1558      Initialize_1489;
1559      Initialize_1490;
1560      Initialize_1491;
1561      Initialize_1492;
1562      Initialize_1493;
1563      Initialize_1494;
1564      Initialize_1495;
1565      Initialize_1496;
1566      Initialize_1497;
1567      Initialize_1498;
1568      Initialize_1499;
1569      Initialize_1500;
1570      Initialize_1501;
1571      Initialize_1502;
1572      Initialize_1503;
1573      Initialize_1504;
1574      Initialize_1505;
1575      Initialize_1506;
1576      Initialize_1507;
1577      Initialize_1508;
1578      Initialize_1509;
1579      Initialize_1510;
1580      Initialize_1511;
1581      Initialize_1512;
1582      Initialize_1513;
1583      Initialize_1514;
1584      Initialize_1515;
1585      Initialize_1516;
1586      Initialize_1517;
1587      Initialize_1518;
1588      Initialize_1519;
1589      Initialize_1520;
1590      Initialize_1521;
1591      Initialize_1522;
1592      Initialize_1523;
1593      Initialize_1524;
1594      Initialize_1525;
1595      Initialize_1526;
1596      Initialize_1527;
1597      Initialize_1528;
1598      Initialize_1529;
1599      Initialize_1530;
1600      Initialize_1531;
1601      Initialize_1532;
1602      Initialize_1533;
1603      Initialize_1534;
1604      Initialize_1535;
1605      Initialize_1536;
1606      Initialize_1537;
1607      Initialize_1538;
1608      Initialize_1539;
1609      Initialize_1540;
1610      Initialize_1541;
1611      Initialize_1542;
1612      Initialize_1543;
1613      Initialize_1544;
1614      Initialize_1545;
1615      Initialize_1546;
1616      Initialize_1547;
1617      Initialize_1548;
1618      Initialize_1549;
1619      Initialize_1550;
1620      Initialize_1551;
1621      Initialize_1552;
1622      Initialize_1553;
1623      Initialize_1554;
1624      Initialize_1555;
1625      Initialize_1556;
1626      Initialize_1557;
1627      Initialize_1558;
1628      Initialize_1559;
1629      Initialize_1560;
1630      Initialize_1561;
1631      Initialize_1562;
1632      Initialize_1563;
1633      Initialize_1564;
1634      Initialize_1565;
1635      Initialize_1566;
1636      Initialize_1567;
1637      Initialize_1568;
1638      Initialize_1569;
1639      Initialize_1570;
1640      Initialize_1571;
1641      Initialize_1572;
1642      Initialize_1573;
1643      Initialize_1574;
1644      Initialize_1575;
1645      Initialize_1576;
1646      Initialize_1577;
1647      Initialize_1578;
1648      Initialize_1579;
1649      Initialize_1580;
1650      Initialize_1581;
1651      Initialize_1582;
1652      Initialize_1583;
1653      Initialize_1584;
1654      Initialize_1585;
1655      Initialize_1586;
1656      Initialize_1587;
1657      Initialize_1588;
1658      Initialize_1589;
1659      Initialize_1590;
1660      Initialize_1591;
1661      Initialize_1592;
1662      Initialize_1593;
1663      Initialize_1594;
1664      Initialize_1595;
1665      Initialize_1596;
1666      Initialize_1597;
1667      Initialize_1598;
1668      Initialize_1599;
1669      Initialize_1600;
1670      Initialize_1601;
1671      Initialize_1602;
1672      Initialize_1603;
1673      Initialize_1604;
1674      Initialize_1605;
1675      Initialize_1606;
1676      Initialize_1607;
1677      Initialize_1608;
1678      Initialize_1609;
1679      Initialize_1610;
1680      Initialize_1611;
1681      Initialize_1612;
1682      Initialize_1613;
1683      Initialize_1614;
1684      Initialize_1615;
1685      Initialize_1616;
1686      Initialize_1617;
1687      Initialize_1618;
1688      Initialize_1619;
1689      Initialize_1620;
1690      Initialize_1621;
1691      Initialize_1622;
1692      Initialize_1623;
1693      Initialize_1624;
1694      Initialize_1625;
1695      Initialize_1626;
1696      Initialize_1627;
1697      Initialize_1628;
1698      Initialize_1629;
1699      Initialize_1630;
1700      Initialize_1631;
1701      Initialize_1632;
1702      Initialize_1633;
1703      Initialize_1634;
1704      Initialize_1635;
1705      Initialize_1636;
1706      Initialize_1637;
1707      Initialize_1638;
1708      Initialize_1639;
1709      Initialize_1640;
1710      Initialize_1641;
1711      Initialize_1642;
1712      Initialize_1643;
1713      Initialize_1644;
1714      Initialize_1645;
1715      Initialize_1646;
1716      Initialize_1647;
1717      Initialize_1648;
1718      Initialize_1649;
1719      Initialize_1650;
1720      Initialize_1651;
1721      Initialize_1652;
1722      Initialize_1653;
1723      Initialize_1654;
1724      Initialize_1655;
1725      Initialize_1656;
1726      Initialize_1657;
1727      Initialize_1658;
1728      Initialize_1659;
1729      Initialize_1660;
1730      Initialize_1661;
1731      Initialize_1662;
1732      Initialize_1663;
1733      Initialize_1664;
1734      Initialize_1665;
1735      Initialize_1666;
1736      Initialize_1667;
1737      Initialize_1668;
1738      Initialize_1669;
1739      Initialize_1670;
1740      Initialize_1671;
1741      Initialize_1672;
1742      Initialize_1673;
1743      Initialize_1674;
1744      Initialize_1675;
1745      Initialize_1676;
1746      Initialize_1677;
1747      Initialize_1678;
1748      Initialize_1679;
1749      Initialize_1680;
1750      Initialize_1681;
1751      Initialize_1682;
1752      Initialize_1683;
1753      Initialize_1684;
1754      Initialize_1685;
1755      Initialize_1686;
1756      Initialize_1687;
1757      Initialize_1688;
1758      Initialize_1689;
1759      Initialize_1690;
1760      Initialize_1691;
1761      Initialize_1692;
1762      Initialize_1693;
1763      Initialize_1694;
1764      Initialize_1695;
1765      Initialize_1696;
1766      Initialize_1697;
1767      Initialize_1698;
1768      Initialize_1699;
1769      Initialize_1700;
1770      Initialize_1701;
1771      Initialize_1702;
1772      Initialize_1703;
1773      Initialize_1704;
1774      Initialize_1705;
1775      Initialize_1706;
1776      Initialize_1707;
1777      Initialize_1708;
1778      Initialize_1709;
1779      Initialize_1710;
1780      Initialize_1711;
1781      Initialize_1712;
1782      Initialize_1713;
1783      Initialize_1714;
1784      Initialize_1715;
1785      Initialize_1716;
1786      Initialize_1717;
1787      Initialize_1718;
1788      Initialize_1719;
1789      Initialize_1720;
1790      Initialize_1721;
1791      Initialize_1722;
1792      Initialize_1723;
1793      Initialize_1724;
1794      Initialize_1725;
1795      Initialize_1726;
1796      Initialize_1727;
1797      Initialize_1728;
1798      Initialize_1729;
1799      Initialize_1730;
1800      Initialize_1731;
1801      Initialize_1732;
1802      Initialize_1733;
1803      Initialize_1734;
1804      Initialize_1735;
1805      Initialize_1736;
1806      Initialize_1737;
1807      Initialize_1738;
1808      Initialize_1739;
1809      Initialize_1740;
1810      Initialize_1741;
1811      Initialize_1742;
1812      Initialize_1743;
1813      Initialize_1744;
1814      Initialize_1745;
1815      Initialize_1746;
1816      Initialize_1747;
1817      Initialize_1748;
1818      Initialize_1749;
1819      Initialize_1750;
1820      Initialize_1751;
1821      Initialize_1752;
1822      Initialize_1753;
1823      Initialize_1754;
1824      Initialize_1755;
1825      Initialize_1756;
1826      Initialize_1757;
1827      Initialize_1758;
1828      Initialize_1759;
1829      Initialize_1760;
1830      Initialize_1761;
1831      Initialize_1762;
1832      Initialize_1763;
1833      Initialize_1764;
1834      Initialize_1765;
1835      Initialize_1766;
1836      Initialize_1767;
1837      Initialize_1768;
1838      Initialize_1769;
1839      Initialize_1770;
1840      Initialize_1771;
1841      Initialize_1772;
1842      Initialize_1773;
1843      Initialize_1774;
1844      Initialize_1775;
1845      Initialize_1776;
1846      Initialize_1777;
1847      Initialize_1778;
1848      Initialize_1779;
1849      Initialize_1780;
1850      Initialize_1781;
1851      Initialize_1782;
1852      Initialize_1783;
1853      Initialize_1784;
1854      Initialize_1785;
1855      Initialize_1786;
1856      Initialize_1787;
1857      Initialize_1788;
1858      Initialize_1789;
1859      Initialize_1790;
1860      Initialize_1791;
1861      Initialize_1792;
1862      Initialize_1793;
1863      Initialize_1794;
1864      Initialize_1795;
1865      Initialize_1796;
1866      Initialize_1797;
1867      Initialize_1798;
1868      Initialize_1799;
1869      Initialize_1800;
1870      Initialize_1801;
1871      Initialize_1802;
1872      Initialize_1803;
1873      Initialize_1804;
1874      Initialize_1805;
1875      Initialize_1806;
1876      Initialize_1807;
1877      Initialize_1808;
1878      Initialize_1809;
1879      Initialize_1810;
1880      Initialize_1811;
1881      Initialize_1812;
1882      Initialize_1813;
1883      Initialize_1814;
1884      Initialize_1815;
1885      Initialize_1816;
1886      Initialize_1817;
1887      Initialize_1818;
1888      Initialize_1819;
1889      Initialize_1820;
1890      Initialize_1821;
1891      Initialize_1822;
1892      Initialize_1823;
1893      Initialize_1824;
1894      Initialize_1825;
1895      Initialize_1826;
1896      Initialize_1827;
1897      Initialize_1828;
1898      Initialize_1829;
1899      Initialize_1830;
1900      Initialize_1831;
1901      Initialize_1832;
1902      Initialize_1833;
1903      Initialize_1834;
1904      Initialize_1835;
1905      Initialize_1836;
1906      Initialize_1837;
1907      Initialize_1838;
1908      Initialize_1839;
1909      Initialize_1840;
1910      Initialize_1841;
1911      Initialize_1842;
1912      Initialize_1843;
1913      Initialize_1844;
1914      Initialize_1845;
1915      Initialize_1846;
1916      Initialize_1847;
1917      Initialize_1848;
1918      Initialize_1849;
1919      Initialize_1850;
1920      Initialize_1851;
1921      Initialize_1852;
1922      Initialize_1853;
1923      Initialize_1854;
1924      Initialize_1855;
1925      Initialize_1856;
1926      Initialize_1857;
1927      Initialize_1858;
1928      Initialize_1859;
1929      Initialize_1860;
1930      Initialize_1861;
1931      Initialize_1862;
1932      Initialize_1863;
1933      Initialize_1864;
1934      Initialize_1865;
1935      Initialize_1866;
1936      Initialize_1867;
1937      Initialize_1868;
1938      Initialize_1869;
1939      Initialize_1870;
1940      Initialize_1871;
1941      Initialize_1872;
1942      Initialize_1873;
1943      Initialize_1874;
1944      Initialize_1875;
1945      Initialize_1876;
1946      Initialize_1877;
1947      Initialize_1878;
1948      Initialize_1879;
1949      Initialize_1880;
1950      Initialize_1881;
1951      Initialize_1882;
1952      Initialize_1883;
1953      Initialize_1884;
1954      Initialize_1885;
1955      Initialize_1886;
1956      Initialize_1887;
1957      Initialize_1888;
1958      Initialize_1889;
1959      Initialize_1890;
1960      Initialize_1891;
1961      Initialize_1892;
1962      Initialize_1893;
1963      Initialize_1894;
1964      Initialize_1895;
1965      Initialize_1896;
1966      Initialize_1897;
1967      Initialize_1898;
1968      Initialize_1899;
1969      Initialize_1900;
1970      Initialize_1901;
1971      Initialize_1902;
1972      Initialize_1903;
1973      Initialize_1904;
1974      Initialize_1905;
1975      Initialize_1906;
1976      Initialize_1907;
1977      Initialize_1908;
1978      Initialize_1909;
1979      Initialize_1910;
1980      Initialize_1911;
1981      Initialize_1912;
1982      Initialize_1913;
1983      Initialize_1914;
1984      Initialize_1915;
1985      Initialize_1916;
1986      Initialize_1917;
1987      Initialize_1918;
1988      Initialize_1919;
1989      Initialize_1920;
1990      Initialize_1921;
1991      Initialize_1922;
1992      Initialize_1923;
1993      Initialize_1924;
1994      Initialize_1925;
1995      Initialize_1926;
1996      Initialize_1927;
1997      Initialize_1928;
1998      Initialize_1929;
1999      Initialize_1930;
2000      Initialize_1931;
2001      Initialize_1932;
2002      Initialize_1933;
2003      Initialize_1934;
2004      Initialize_1935;
2005      Initialize_1936;
2006      Initialize_1937;
2007      Initialize_1938;
2008      Initialize_1939;
2009      Initialize_1940;
2010      Initialize_1941;
2011      Initialize_1942;
2012      Initialize_1943;
2013      Initialize_1944;
2014      Initialize_1945;
2015      Initialize_1946;
2016      Initialize_1947;
2017      Initialize_1948;
2018      Initialize_1949;
2019      Initialize_1950;
2020      Initialize_1951;
2021      Initialize_1952;
2022      Initialize_1953;
2023      Initialize_1954;
2024      Initialize_1955;
2025      Initialize_1956;
2026      Initialize_1957;
2027      Initialize_1958;
2028      Initialize_1959;
2029      Initialize_1960;
2030      Initialize_1961;
2031      Initialize_1962;
2032      Initialize_1963;
2033      Initialize_1964;
2034      Initialize_1965;
2035      Initialize_1966;
2036      Initialize_1967;
2037      Initialize_1968;
2038      Initialize_1969;
2039      Initialize_1970;
2040      Initialize_1971;
2041      Initialize_1972;
2042      Initialize_1973;
2043      Initialize_1974;
2044      Initialize_1975;
2045      Initialize_1976;
2046      Initialize_1977;
2047      Initialize_1978;
2048      Initialize_1979;
2049      Initialize_1980;
2050      Initialize_1981;
2051      Initialize_1982;
2052      Initialize_1983;
2053      Initialize_1984;
2054      Initialize_1985;
2055      Initialize_1986;
2056      Initialize_1987;
2057      Initialize_1988;
2058      Initialize_1989;
2059      Initialize_1990;
2060      Initialize_1991;
2061      Initialize_1992;
2062      Initialize_1993;
2063      Initialize_1994;
2064      Initialize_1995;
2065      Initialize_1996;
2066      Initialize_1997;
2067      Initialize_1998;
2068      Initialize_1999;
2069      Initialize_2000;
2070      Initialize_2001;
2071      Initialize_2002;
2072      Initialize_2003;
2073      Initialize_2004;
2074      Initialize_2005;
2075      Initialize_2006;
2076      Initialize_2007;
2077      Initialize_2008;
2078      Initialize_2009;
2079      Initialize_2010;
2080      Initialize_2011;
2081      Initialize_2012;
2082      Initialize_2013;
2083      Initialize_2014;
2084      Initialize_2015;
2085      Initialize_2016;
2086      Initialize_2017;
2087      Initialize_2018;
2088      Initialize_2019;
2089      Initialize_2020;
2090      Initialize_2021;
2091      Initialize_2022;
2092      Initialize_2023;
2093      Initialize_2024;
2094      Initialize_2025;
2095      Initialize_2026;
2096      Initialize_2027;
2097      Initialize_2028;
2098      Initialize_2029;
2099      Initialize_2030;
2100      Initialize_2031;
2101      Initialize_2032;
2102      Initialize_2033;
2103      Initialize_2034;
2104      Initialize_2035;
2105      Initialize_2036;
2106      Initialize_2037;
2107      Initialize_2038;
2108      Initialize_2039;
2109      Initialize_2040;
2110      Initialize_2041;
2111      Initialize_2042;
2112      Initialize_2043;
2113      Initialize_2044;
2114      Initialize_2045;
2115      Initialize_2046;
2116      Initialize_2047;
2117      Initialize_2048;
2118      Initialize_2049;
2119      Initialize_2050;
2120      Initialize_2051;
2121      Initialize_2052;
2122      Initialize_2053;
2123      Initialize_2054;
2124      Initialize_2055;
2125      Initialize_2056;
2126      Initialize_2057;
2127      Initialize_2058;
2128      Initialize_2059;
2129      Initialize_2060;
2130      Initialize_2061;
2131      Initialize_2062;
2132      Initialize_2063;
2133      Initialize_2064;
2134      Initialize_2065;
2135      Initialize_2066;
2136      Initialize_2067;
2137      Initialize_2068;
2138      Initialize_2069;
2139      Initialize_2070;
2140      Initialize_2071;
2141      Initialize_2072;
2142      Initialize_2073;
2143      Initialize_2074;
2144      Initialize_2075;
2145      Initialize_2076;
2146      Initialize_2077;
2147      Initialize_2078;
2148      Initialize_2079;
2149      Initialize_2080;
2150      Initialize_2081;
2151      Initialize_2082;
2152      Initialize_2083;
2153      Initialize_2084;
2154      Initialize_2085;
2155      Initialize_2086;
2156      Initialize_2087;
2157      Initialize_2088;
2158      Initialize_2089;
2159      Initialize_2090;
2160      Initialize_2091;
2161      Initialize_2092;
2162      Initialize_2093;
2163      Initialize_2094;
2164      Initialize_2095;
2165      Initialize_2096;
2166      Initialize_2097;
2167      Initialize_2098;
2168      Initialize_2099;
2169      Initialize_2100;
2170      Initialize_2101;
2171      Initialize_2102;
2172      Initialize_2103;
2173      Initialize_2104;
2174      Initialize_2105;
2175      Initialize_2106;
2176      Initialize_2107;
2177      Initialize_2108;
2178      Initialize_2109;
2179      Initialize_2110;
2180      Initialize_2111;
2181      Initialize_2112;
2182      Initialize_2113;
2183      Initialize_2114;
2184      Initialize_2115;
2185      Initialize_2116;
2186      Initialize_2117;
2187      Initialize_2118;
2188      Initialize_2119;
2189      Initialize_2120;
2190      Initialize_2121;
2191      Initialize_2122;
2192      Initialize_2123;
2193      Initialize_2124;
2194      Initialize_2125;
2195      Initialize_2126;
2196      Initialize_2127;
2197      Initialize_2128;
2198      Initialize_2129;
2199      Initialize_2130;
2200      Initialize_2131;
2201      Initialize_2132;
2202      Initialize_2133;
2203      Initialize_2134;
2204      Initialize_2135;
2205      Initialize_2136;
2206      Initialize_2137;
2207      Initialize_2138;
2208      Initialize_2139;
2209      Initialize_2140;
2210      Initialize_2141;
2211      Initialize_2142;
2212      Initialize_2143;
2213      Initialize_2144;
2214      Initialize_2145;
2215      Initialize_2146;
2216      Initialize_2147;
2217      Initialize_2148;
2218      Initialize_2149;
2219      Initialize_2150;
2220      Initialize_2151;
2221      Initialize_2152;
2222      Initialize_2153;
2223      Initialize_2154;
2224      Initialize_2155;
2225      Initialize_2156;
2226      Initialize_2157;
2227      Initialize_2158;
2228      Initialize_2159;
2229      Initialize_2160;
2230      Initialize_2161;
2231      Initialize_2162;
2232      Initialize_2163;
2233      Initialize_2164;
2234      Initialize_2165;
2235      Initialize_2166;
2236      Initialize_2167;
2237      Initialize_2168;
2238      Initialize_2169;
2239      Initialize_2170;
2240      Initialize_2171;
2241      Initialize_2172;
2242      Initialize_2173;
2243      Initialize_2174;
2244      Initialize_2175;
2245      Initialize_2176;
2246      Initialize_2177;
2247      Initialize_2178;
2248      Initialize_2179;
2249      Initialize_2180;
2250      Initialize_2181;
2251      Initialize_2182;
2252      Initialize_2183;
2253      Initialize_2184;
2254      Initialize_2185;
2255      Initialize_2186;
2256      Initialize_2187;
2257      Initialize_2188;
2258      Initialize_2189;
2259      Initialize_2190;
2260      Initialize_2191;
2261      Initialize_2192;
2262      Initialize_2193;
2263      Initialize_2194;
2264      Initialize_2195;
2265      Initialize_2196;
2266      Initialize_2197;
2267      Initialize_2198;
2268      Initialize_2199;
2269      Initialize_2200;
2270      Initialize_2201;
2271      Initialize_2202;
2272      Initialize_2203;
2273      Initialize_2204;
2274      Initialize_2205;
2275      Initialize_2206;
2276      Initialize_2207;
2277      Initialize_2208;
2278      Initialize_2209;
2279      Initialize_2210;
2280      Initialize_2211;
2281      Initialize_2212;
2282      Initialize_2213;
2283      Initialize_2214;
2284      Initialize_2215;
2285      Initialize_2216;
2286      Initialize_2217;
2287      Initialize_2218;
2288      Initialize_2219;
2289      Initialize_2220;
2290      Initialize_2221;
2291      Initialize_2222;
2292      Initialize_2223;
2293      Initialize_2224;
2294      Initialize_2225;
2295      Initialize_2226;
2296      Initialize_2227;
2297      Initialize_2228;
2298      Initialize_2229;
2299      Initialize_2230;
2300      Initialize_2231;
2301      Initialize_2232;
2302      Initialize_2233;
2303      Initialize_2234;
2304      Initialize_2235;
2305      Initialize_2236;
2306      Initialize_2237;
2307      Initialize_2238;
2308      Initialize_2239;
2309      Initialize_2240;
2310      Initialize_2241;
2311      Initialize_2242;
2312      Initialize_2243;
2313      Initialize_2244;
2314      Initialize_2245;
2315      Initialize_2246;
2316      Initialize_2247;
2317      Initialize_2248;
2318      Initialize_2249;
2319      Initialize_2250;
2320      Initialize_2251;
2321      Initialize_2252;
2322      Initialize_2253;
2323      Initialize_2254;
2324      Initialize_2255;
2325      Initialize_2256;
2326      Initialize_2257;
2327      Initialize_2258;
2328      Initialize_2259;
2329      Initialize_2260;
2330      Initialize_2261;
2331      Initialize_2262;
2332      Initialize_2263;
2333      Initialize_2264;
2334      Initialize_2265;
2335      Initialize_2266;
2336      Initialize_2267;
2337      Initialize_2268;
2338      Initialize_2269;
2339      Initialize_2270;
2340      Initialize_2271;
2341      Initialize_2272;
2342      Initialize_2273;
2343      Initialize_2274;
2344      Initialize_2275;
2345      Initialize_2276;
2346      Initialize_2277;
2347      Initialize_2278;
2348      Initialize_2279;
2349      Initialize_2280;
2350      Initialize_2281;
2351      Initialize_2282;
2352      Initialize_2283;
2353      Initialize_2284;
2354      Initialize_2285;
2355      Initialize_2286;
2356      Initialize_2287;
2357      Initialize_2288;
2358      Initialize_2289;
2359      Initialize_2290;
2360      Initialize_2291;
2361      Initialize_2292;
2362      Initialize_2293;
2363      Initialize_2294;
2364      Initialize_2295;
2365      Initialize_2296;
2366      Initialize_2297;
2367      Initialize_2298;
2368      Initialize_2299;
2369      Initialize_2300;
2370      Initialize_2301;
2371      Initialize_2302;
2372      Initialize_2303;
2373      Initialize_2304;
2374      Initialize_2305;
2375      Initialize_2306;
2376      Initialize_2307;
2377      Initialize_2308;
2378      Initialize_2309;
2379      Initialize_2310;
2380      Initialize_2311;
2381      Initialize_2312;
2382      Initialize_2313;
2383      Initialize_2314;
2384      Initialize_2315;
2385      Initialize_2316;
2386      Initialize_2317;
2387      Initialize_2318;
2388      Initialize_2319;
2389      Initialize_2320;
2390      Initialize_2321;
2391      Initialize_2322;
2392      Initialize_2323;
2393      Initialize_2324;
2394      Initialize_2325;
2395      Initialize_2326;
2396      Initialize_2327;
2397      Initialize_2328;
2398      Initialize_2329;
2399      Initialize_2330;
2400      Initialize_2331;
2401      Initialize_2332;
2402      Initialize_2333;
2403      Initialize_2334;
2404      Initialize_2335;
2405      Initialize_2336;
2406      Initialize_2337;
2407      Initialize_2338;
2408      Initialize_2339;
2409      Initialize_2340;
2410      Initialize_2341;
2411      Initialize_2342;
2412      Initialize_2343;
2413      Initialize_2344;
2414      Initialize_2345;
2415      Initialize_2346;
2416      Initialize_2347;
2417      Initialize_2348;
2418      Initialize_2349;
2419      Initialize_2350;
2420      Initialize_2351;
2421      Initialize_2352;
2422      Initialize_2353;
2423      Initialize_2354;
2424      Initialize_2355;
2425      Initialize_2356;
2426      Initialize_2357;
2427      Initialize_2358;
2428      Initialize_2359;
2429      Initialize_2360;
2430      Initialize_2361;
2431      Initialize_2362;
2432      Initialize_2363;
2433      Initialize_2364;
2434      Initialize_2365;
2435      Initialize_2366;
2436      Initialize_2367;
2437      Initialize_2368;
2438      Initialize_2369;
2439      Initialize_2370;
2440      Initialize_2371;
2441      Initialize_2372;
2442      Initialize_2373;
2443      Initialize_2374;
2444      Initialize_2375;
2445      Initialize_2376;
2446      Initialize_2377;
2447      Initialize_2378;
2448      Initialize_2379;
2449      Initialize_2380;
2450      Initialize_2381;
2451      Initialize_2382;
2452      Initialize_2383;
2453      Initialize_2384;
2454      Initialize_2385;
2455      Initialize_2386;
2456      Initialize_2387;
2457      Initialize_2388;
2458      Initialize_2389;
2459      Initialize_2390;
2460      Initialize_2391;
2461      Initialize_2392;
2462      Initialize_2393;
2463      Initialize_2394;
2464      Initialize_2395;
2465      Initialize_2396;
2466      Initialize_2397;
2467      Initialize_2398;
2468      Initialize_2399;
2469      Initialize_2400;
2470      Initialize_2401;
2471      Initialize_2402;
2472      Initialize_2403;
2473      Initialize_2404;
2474      Initialize_2405;
2475      Initialize_2406;
2476      Initialize_2407;
2477      Initialize_2408;
2478      Initialize_2409;
2479      Initialize_2410;
2480      Initialize_2411;
2481      Initialize_2412;
2482      Initialize_2413;
2483      Initialize_2414;
2484      Initialize_2415;
2485      Initialize_2416;
2486      Initialize_2417;
2487      Initialize_2418;
2488      Initialize_2419;
2489      Initialize_2420;
2490      Initialize_2421;
2491      Initialize_2422;
2492      Initialize_2423;
2493      Initialize_2424;
2494      Initialize_2425;
2495      Initialize_2426;
2496      Initialize_2427;
2497      Initialize_2428;
2498      Initialize_2429;
2499      Initialize_2430;
2500      Initialize_2431;
2501      Initialize_2432;
2502      Initialize_2433;
2503      Initialize_2434;
2504      Initialize_2435;
2505      Initialize_2436;
2506      Initialize_2437;
2507      Initialize_2438;
2508      Initialize_2439;
2509      Initialize_2440;
2510      Initialize_2441;
2511      Initialize_2442;
2512      Initialize_2443;
2513      Initialize_2444;
2514      Initialize_2445;
2515      Initialize_2446;
2516      Initialize_2447;
2517      Initialize_2448;
2518      Initialize_2449;
2519      Initialize_2450;
2520      Initialize_2451;
2521      Initialize_2452;
2522      Initialize_2453;
2523      Initialize_2454;
2524      Initialize_2455;
2525      Initialize_2456;
2526      Initialize_2457;
2527      Initialize_2458;
2528      Initialize_2459;
2529      Initialize_2460;
2530      Initialize_2461;
2531      Initialize_2462;
2532      Initialize_2463;
2533      Initialize_2464;
2534      Initialize_2465;
2535      Initialize_2466;
2536      Initialize_2467;
2537      Initialize_2468;
2538      Initialize_2469;
2539      Initialize_2470;
2540      Initialize_2471;
2541      Initialize_2472;
2542      Initialize_2473;
2543      Initialize_2474;
2544      Initialize_2475;
2545      Initialize_2476;
2546      Initialize_2477;
2547      Initialize_2478;
2548      Initialize_2479;
2549      Initialize_2480;
2550      Initialize_2481;
2551      Initialize_2482;
2552      Initialize_2483;
2553      Initialize_2484;
2554      Initialize_2485;
2555      Initialize_2486;
2556      Initialize_2487;
2557      Initialize_2488;
2558      Initialize_2489;
2559      Initialize_2490;
2560      Initialize_2491;
2561      Initialize_2492;
2562      Initialize_2493;
2563      Initialize_2494;
2564      Initialize_2495;
2565      Initialize_2496;
2566      Initialize_2497;
2567      Initialize_2498;
2568      Initialize_2499;
2569      Initialize_2500;
2570      Initialize_2501;
2571      Initialize_2502;
2572      Initialize_2503;
2573      Initialize_2504;
2574      Initialize_2505;
2575      Initialize_2506;
2576      Initialize_2507;
2577      Initialize_2508;
2578      Initialize_2509;
2579      Initialize_2510;
2580      Initialize_2511;
2581      Initialize_2512;
2582      Initialize_2513;
2583      Initialize_2514;
2584      Initialize_2515;
2585      Initialize_2516;
2586      Initialize_2517;
2587      Initialize_2518;
2588      Initialize_2519;
2589      Initialize_2520;
2590      Initialize_2521;
2591      Initialize_2522;
2592      Initialize_2523;
2593      Initialize_2524;
2594      Initialize_2525;
2595      Initialize_2526;
2596      Initialize_2527;
2597      Initialize_2528;
2598      Initialize_2529;
2599      Initialize_2530;
2600      Initialize_2531;
2601      Initialize_2532;
2602      Initialize_2533;
2603      Initialize_2534;
2604      Initialize_2535;
2605      Initialize_2536;
2606      Initialize_2537;
2607      Initialize_2538;
2608      Initialize_2539;
2609      Initialize_2540;
2610      Initialize_2541;
2611      Initialize_2542;
2612      Initialize_2543;
2613      Initialize_2544;
2614      Initialize_2545;
2615      Initialize_2546;
2616      Initialize_2547;
2617      Initialize_2548;
2618      Initialize_2549;
2619      Initialize_2550;
2620      Initialize_2551;
2621      Initialize_2552;
2622      Initialize_2553;
2623      Initialize_2554;
2624      Initialize_2555;
2625      Initialize_2556;
2626      Initialize_2557;
2627      Initialize_2558;
2628      Initialize_2559;
2629      Initialize_2560;
2630      Initialize_2561;
2631      Initialize_2562;
2632      Initialize_2563;
2633      Initialize_2564;
2634      Initialize_2565;
2635      Initialize_2566;
2636      Initialize_2567;
2637      Initialize_2568;
2638      Initialize_2569;
2639      Initialize_2570;
2640      Initialize_2571;
2641      Initialize_2572;
2642      Initialize_2573;
2643      Initialize_2574;
2644      Initialize_2575;
2645      Initialize_2576;
2646      Initialize_2577;
2647      Initialize_2578;
2648      Initialize_2579;
2649      Initialize_2580;
2650      Initialize_2581;
2651      Initialize_2582;
2652      Initialize_2583;
2653      Initialize_2584;
2654      Initialize_2585;
2655      Initialize_2586;
2656      Initialize_2587;
2657      Initialize_2588;
2658      Initialize_2589;
2659      Initialize_2590;
2660      Initialize_2591;
2661      Initialize_2592;
2662      Initialize_2593;
2663      Initialize_2594;
2664      Initialize_2595;
2665      Initialize_2596;
2666      Initialize_2597;
2667      Initialize_2598;
2668      Initialize_2599;
2669      Initialize_2600;
2670      Initialize_2601;
2671      Initialize_2602;
2672      Initialize_2603;
2673      Initialize_2604;
2674      Initialize_2605;
2675      Initialize_2606;
2676      Initialize_2607;
2677      Initialize_2608;
2678      Initialize_2609;
2679      Initialize_2610;
2680      Initialize_2611;
2681      Initialize_2612;
2682      Initialize_2613;
2683      Initialize_2614;
2684      Initialize_2615;
2685      Initialize_2616;
2686      Initialize_2617;
2687      Initialize_2618;
2688      Initialize_2619;
2689      Initialize_2620;
2690      Initialize_2621;
2691      Initialize_2622;
2692      Initialize_2623;
2693      Initialize_2624;
2694      Initialize_2625;
2695      Initialize_2626;
2696      Initialize_2627;
2697      Initialize_2628;
2698      Initialize_2629;
2699      Initialize_2630;
2700      Initialize_2631;
2701      Initialize_2632;
2702      Initialize_2633;
2703      Initialize_2634;
2704      Initialize_2635;
2705      Initialize_2636;
2706      Initialize_2637;
2707      Initialize_2638;
2708      Initialize_2639;
2709      Initialize_2640;
2710      Initialize_2641;
2711      Initialize_2642;
2712      Initialize_2643;
2713      Initialize_2644;
2714      Initialize_2645;
2715      Initialize_2646;
2716      Initialize_2647;
2717      Initialize_2648;
2718      Initialize_2649;
2719      Initialize_2650;
2720      Initialize_2651;
2721      Initialize_2652;
2722      Initialize_2653;
2723      Initialize_2654;
2724      Initialize_2655;
2725      Initialize_2656;
2726      Initialize_2657;
2727      Initialize_2658;
2728      Initialize_2659;
2729      Initialize_2660;
2730      Initialize_2661;
2731      Initialize_2662;
2732      Initialize_2663;
2733      Initialize_2664;
2734      Initialize_2665;
2735      Initialize_2666;
2736      Initialize_2667;
2737      Initialize_2668;
2738      Initialize_2669;
2739      Initialize_2670;
2740      Initialize_2671;
2741      Initialize_2672;
2742      Initialize_2673;
2743      Initialize_2674;
2744      Initialize_2675;
2745      Initialize_2676;
2746      Initialize_2677;
2747      Initialize_2678;
2748      Initialize_2679;
2749      Initialize_2680;
2750      Initialize_2681;
2751      Initialize_2682;
2752      Initialize_2683;
2753      Initialize_2684;
2754      Initialize_2685;
2755      Initialize_2686;
2756      Initialize_2687;
2757      Initialize_2688;
2758      Initialize_2689;
2759      Initialize_2690;
2760      Initialize_2691;
2761      Initialize_2692;
2762      Initialize_2693;
2763      Initialize_2694;
2764      Initialize_2695;
2765      Initialize_2696;
2766      Initialize_2697;
2767      Initialize_2698;
2768      Initialize_2699;
2769      Initialize_2700;
2770      Initialize_2701;
2771      Initialize_2702;
2772      Initialize_2703;
2773      Initialize_2704;
2774      Initialize_2705;
2775      Initialize_2706;
2776      Initialize_2707;
2777      Initialize_2708;
2778      Initialize_2709;
2779      Initialize_2710;
2780      Initialize_2711;
2781      Initialize_2712;
2782      Initialize_2713;
2783      Initialize_2714;
2784      Initialize_2715;
2785      Initialize_2716;
2786      Initialize_2717;
2787      Initialize_2718;
2788      Initialize_2719;
2789      Initialize_2720;
2790      Initialize_2721;
2791      Initialize_2722;
2792      Initialize_2723;
2793      Initialize_2724;
2794      Initialize_2725;
2795      Initialize_2726;
2796      Initialize_2727;
2797      Initialize_2728;
2798      Initialize_2729;
2799      Initialize_2730;
2800      Initialize_2731;
2801      Initialize_2732;
2802      Initialize_2733;
2803      Initialize_2734;
2804      Initialize_2735;
2805      Initialize_2736;
2806      Initialize_2737;
2807      Initialize_2738;
2808      Initialize_2739;
2809      Initialize_2740;
2810      Initialize_2741;
2811      Initialize_2742;
2812      Initialize_2743;
2813      Initialize_2744;
2814      Initialize_2745;
2815      Initialize_2746;
2816      Initialize_2747;
2817      Initialize_2748;
2818      Initialize_2749;
2819      Initialize_2750;
2820      Initialize_2751;
2821      Initialize_2752;
2822      Initialize_2753;
2823      Initialize_2754;
2824      Initialize_2755;
2825      Initialize_2756;
2826      Initialize_2757;
2827      Initialize_2758;
2828      Initialize_2759;
2829      Initialize_2760;
2830      Initialize_2761;
2831      Initialize_2762;
2832      Initialize_2763;
2833      Initialize_2764;
2834      Initialize_2765;
2835      Initialize_2766;
2836      Initialize_2767;
2837      Initialize_2768;
2838      Initialize_2769;
2839      Initialize_2770;
2840      Initialize_2771;
2841      Initialize_2772;
2842      Initialize_2773;
2843      Initialize_2774;
2844      Initialize_2775;
2845      Initialize_2776;
2846      Initialize_2777;
2847      Initialize_2778;
2848      Initialize_2779;
2849      Initialize_2780;
2850      Initialize_2781;
2851      Initialize_2782;
2852      Initialize_2783;
2853      Initialize_2784;
2854      Initialize_2785;
2855      Initialize_2786;
2856      Initialize_2787;
2857      Initialize_2788;
2858      Initialize_2789;
2859      Initialize_2790;
2860      Initialize_2791;
2861      Initialize_2792;
2862      Initialize_2793;
2863      Initialize_2794;
2864      Initialize_2795;
2865      Initialize_2796;
2866      Initialize_2797;
2867      Initialize_2798;
2868      Initialize_2799;
2869      Initialize_2800;
2870      Initialize_2801;
2871      Initialize_2802;
2872      Initialize_2803;
2873      Initialize_2804;
2874      Initialize_2805;
2875      Initialize_2806;
2876      Initialize_2807;
2877      Initialize_2808;
2878      Initialize_2809;
2879      Initialize_2810;
2880      Initialize_2811;
2881      Initialize_2812;
2882      Initialize_2813;
2883      Initialize_2814;
2884      Initialize_2815;
2885      Initialize_2816;
2886      Initialize_2817;
2887      Initialize_2818;
2888      Initialize_2819;
2889      Initialize_2820;
2890      Initialize_2821;
2891      Initialize_2822;
2892      Initialize_2823;
2893      Initialize_2824;
2894      Initialize_2825;
2895      Initialize_2826;
2896      Initialize_2827;
2897      Initialize_2828;
2898      Initialize_2829;
2899      Initialize_2830;
2900      Initialize_2831;
2901      Initialize_2832;
2902      Initialize_2833;
2903      Initialize_2834;
2904      Initialize_2835;
2905      Initialize_2836;
2906      Initialize_2837;
2907      Initialize_2838;
2908      Initialize_2839;
2909      Initialize_2840;
2910      Initialize_2841;
2911      Initialize_2842;
2912      Initialize_2843;
2913      Initialize_2844;
2914      Initialize_2845;
2915      Initialize_2846;
2916      Initialize_2847;
2917      Initialize_2848;
2918      Initialize_2849;
2919      Initialize_2850;
2920      Initialize_2851;
2921      Initialize_2852;
2922      Initialize_2853;
2923      Initialize_2854;
2924      Initialize_2855;
2925      Initialize_2856;
2926      Initialize_2857;
2927      Initialize_2858;
2928      Initialize_2859;
2929      Initialize_2860;
2930      Initialize_2861;
2931      Initialize_2862;
2932      Initialize_2863;
2933      Initialize_2864;
2934      Initialize_2865;
2935      Initialize_2866;
2936      Initialize_2867;
2937      Initialize_2868;
2938      Initialize_2869;
2939      Initialize_2870;
2940      Initialize_2871;
2941      Initialize_2872;
2942      Initialize_2873;
2943      Initialize_2874;
2944      Initialize_2875;
2945      Initialize_2876;
2946      Initialize_2877;
2947      Initialize_2878;
2948      Initialize_2879;
2949      Initialize_2880;
2950      Initialize_2881;
2951      Initialize_2882;
2952      Initialize_2883;
2953      Initialize_2884;
2954      Initialize_2885;
2955      Initialize_2886;
2956      Initialize_2887;
2957      Initialize_2888;
2958      Initialize_2889;
2959      Initialize_2890;
2960      Initialize_2891;
2961      Initialize_2892;
2962      Initialize_2893;
2963      Initialize_2894;
2964      Initialize_2895;
2965      Initialize_2896;
2966      Initialize_2897;
2967      Initialize_2898;
2968      Initialize_2899;
2969      Initialize_2900;
2970      Initialize_2901;
2971      Initialize_2902;
2972      Initialize_2903;
2973      Initialize_2904;
2974      Initialize_2905;
2975      Initialize_2906;
2976      Initialize_2907;
2977      Initialize_2908;
2978      Initialize_2909;
2979      Initialize_2910;
2980      Initialize_2911;
2981      Initialize_2912;
2982      Initialize_2913;
2983      Initialize_2914;
2984      Initialize_2915;
2985      Initialize_2916;
2986      Initialize_2917;
2987      Initialize_2918;
2988      Initialize_2919;
2989      Initialize_2920;
2990      Initialize_2921;
2991      Initialize_2922;
2992      Initialize_2923;
2993      Initialize_2924;
2994      Initialize_2925;
2995      Initialize_2926;
2996      Initialize_2927;
2997      Initialize_2928;
2998      Initialize_2929;
2999      Initialize_2930;
3000      Initialize_2931;
3001      Initialize_2932;
3002      Initialize_2933;
3003      Initialize_2934;
3004      Initialize_2935;
3005      Initialize_2936;
3006      Initialize_2937;
3007      Initialize_2938;
3008      Initialize_2939;
3009      Initialize_2940;
3010      Initialize_2941;
3011      Initialize_2942;
3012      Initialize_2943;
3013      Initialize_2944;
3014      Initialize_2945;
3015      Initialize_2946;
3016      Initialize_2947;
3017      Initialize_2948;
3018      Initialize_2949;
3019      Initialize_2950;
3020      Initialize_2951;
3021      Initialize_2952;
3022      Initialize_2953;
3023      Initialize_2954;
3024      Initialize_2955;
3025      Initialize_2956;
3026      Initialize_2957;
3027      Initialize_2958;
3028      Initialize_2959;
3029      Initialize_2960;
3030      Initialize_2961;
3031      Initialize_2962;
3032      Initialize_2963;
3033      Initialize_2964;
3034      Initialize_2965;
3035      Initialize_2966;
3036      Initialize_2967;
3037      Initialize_2968;
3038      Initialize_2969;
3039      Initialize_2970;
3040      Initialize_2971;
3041      Initialize_2972;
3042      Initialize_2973;
3043      Initialize_2974;
3044      Initialize_2975;
3045      Initialize_2976;
3046      Initialize_2977;
3047      Initialize_2978;
3048      Initialize_2979;
3049      Initialize_2980;
3050      Initialize_2981;
3051      Initialize_2982;
3052      Initialize_2983;
3053      Initialize_2984;
3054      Initialize_2985;
3055      Initialize_2986;
3056      Initialize_2987;
3057      Initialize_2988;
3058      Initialize_2989;
3059      Initialize_2990;
3060      Initialize_2991;
3061      Initialize_2992;
3062      Initialize_2993;
3063      Initialize_2994;
3064      Initialize_2995;
3065      Initialize_2996;
3066      Initialize_2997;
3067      Initialize_2998;
3068      Initialize_2999;
3069      Initialize_3000;
3070      Initialize_3001;
3071      Initialize_3002;
3072      Initialize_3003;
3073      Initialize_3004;
3074      Initialize_3005;
3075      Initialize_3006;
3076      Initialize_3007;
3077      Initialize_3008;
3078      Initialize_3009;
3079      Initialize_3010;
3080      Initialize_3011;
3081      Initialize_3012;
3082      Initialize_3013;
3083      Initialize_3014;
3084      Initialize_3015;
3085      Initialize_3016;
3086      Initialize_3017;
3087      Initialize_3018;
3088      Initialize_3019;
3089      Initialize_3020;
3090      Initialize_3021;
3091      Initialize_3022;
3092      Initialize_3023;
3093      Initialize_3024;
3094      Initialize_3025;
3095      Initialize_3026;
3096      Initialize_3027;
3097      Initialize_3028;
3098      Initialize_3029;
3099      Initialize_3030;
3100      Initialize_3031;
3101      Initialize_3032;
3102      Initialize_3033;
3103      Initialize_3034;
3104      Initialize_3035;
3105      Initialize_3036;
3106      Initialize_3037;
3107      Initialize_3038;
3108      Initialize_3039;
3109      Initialize_3040;
3110      Initialize_3041;
3111      Initialize_3042;
3112      Initialize_3043;
3113      Initialize_3044;
3114      Initialize_3045;
3115      Initialize_3046;
3116      Initialize_3047;
3117      Initialize_3048;
3118      Initialize_3049;
3119      Initialize_3050;
3120      Initialize_3051;
3121      Initialize_3052;
3122      Initialize_3053;
3123      Initialize_3054;
3124      Initialize_3055;
3125      Initialize_3056;
3126      Initialize_3057;
3127      Initialize_3058;
3128      Initialize_3059;
3129      Initialize_3060;
3130      Initialize_3061;
3131      Initialize_3062;
3132      Initialize_3063;
3133      Initialize_3064;
3134      Initialize_3065;
3135      Initialize_3066;
3136      Initialize_3067;
3137      Initialize_3068;
3138      Initialize_3069;
3139      Initialize_3070;
3140      Initialize_3071;
3141      Initialize_3072;
3142      Initialize_3073;
3143      Initialize_3074;
3144      Initialize_3075;
3145      Initialize_3076;
3146      Initialize_3077;
3147      Initialize_3078;
3148      Initialize_3079;
3149      Initialize_3080;
3150      Initialize_3081;
3151      Initialize_3082;
3152      Initialize_3083;
3153      Initialize_3084;
3154      Initialize_3085;
3155      Initialize_3086;
3156      Initialize_3087;
3157      Initialize_3088;
3158      Initialize_3089;
3159      Initialize_3090;
3160      Initialize_3091;
3161      Initialize_3092;
3162      Initialize_3093;
3163      Initialize_3094;
3164      Initialize_3095;
3165      Initialize_3096;
3166      Initialize_3097;
3167      Initialize_3098;
3168      Initialize_3099;
3169      Initialize_3100;
3170      Initialize_3101;
3171      Initialize_3102;
3172      Initialize_3103;
3173      Initialize_3104;
3174      Initialize_3105;
3175      Initialize_3106;
3176      Initialize_3107;
3177      Initialize_3108;
3178      Initialize_3109;
3179      Initialize_3110;
3180      Initialize_3111;
3181      Initialize_3112;
3182      Initialize_3113;
3183      Initialize_3114;
3184      Initialize_3115;
3185      Initialize_3116;
3186      Initialize_3117;
3187      Initialize_3118;
3188      Initialize_3119;
3189      Initialize_3120;
3190      Initialize_3121;
3191      Initialize_3122;
3192      Initialize_3123;
3193      Initialize_3124;
3194      Initialize_3125;
3195      Initialize_3126;
3196      Initialize_3127;
3197      Initialize_3128;
3198      Initialize_3129;
3199      Initialize_3130;
3200      Initialize_3131;
3201      Initialize_3132;
3202      Initialize_3133;
3203      Initialize_3134;
3204      Initialize_3135;
3205      Initialize_3136;
3206      Initialize_3137;
3207      Initialize_3138;
3208      Initialize_3139;
3209      Initialize_3140;
3210      Initialize_3141;
3211      Initialize_3142;
3212      Initialize_3143;
3213      Initialize_3144;
3214      Initialize_3145;
3215      Initialize_3146;
3216      Initialize_3147;
3217      Initialize_3148;
3218      Initialize_3149;
3219      Initialize_3150;
3220      Initialize_3151;
3221      Initialize_3152;
3222      Initialize_3153;
3223      Initialize_3154;
3224      Initialize_3155;
3225      Initialize_3156;
3226      Initialize_3157;
3227      Initialize_3158;
3228      Initialize_3159;
3229      Initialize_3160;
3230      Initialize_3161;
3231      Initialize_3162;
3232      Initialize_3163;
3233      Initialize_3164;
3234      Initialize_3165;
3235      Initialize_3166;
3236      Initialize_3167;
3237      Initialize_3168;
3238      Initialize_3169;
3239      Initialize_3170;
3240      Initialize_3171;
3241      Initialize_3172;
3242      Initialize_3173;
3243      Initialize_3174;
3244      Initialize_3175;
3245      Initialize_3176;
3246      Initialize_3177;
3247      Initialize_3178;
3248      Initialize_3179;
3249      Initialize_3180;
3250      Initialize_3181;
3251      Initialize_3182;
3252      Initialize_3183;
3253      Initialize_3184;
3254      Initialize_3185;
3255      Initialize_3186;
3256      Initialize_3187;
3257      Initialize_3188;
3258      Initialize_3189;
3259      Initialize_3190;
3260      Initialize_3191;
3261      Initialize_3192;
3262      Initialize_3193;
3263      Initialize_3194;
3264      Initialize_3195;
3265      Initialize_3196;
3266      Initialize_3197;
3267      Initialize_3198;
3268      Initialize_3199;
3269      Initialize_3200;
3270      Initialize_3201;
3271      Initialize_3202;
3272      Initialize_3203;
3273      Initialize_3204;
3274      Initialize_3205;
3275      Initialize_3206;
3276      Initialize_3207;
3277      Initialize_3208;
3278      Initialize_3209;
3279      Initialize_3210;
3280      Initialize_3211;
3281      Initialize_3212;
3282      Initialize_3213;
3283      Initialize_3214;
3284      Initialize_3215;
3285      Initialize_3216;
3286      Initialize_3217;
3287      Initialize_3218;
3288      Initialize_3219;
3289      Initialize_3220;
3290      Initialize_3221;
3291      Initialize_3222;
3292      Initialize_3223;
3293      Initialize_3224;
3294      Initialize_3225;
3295      Initialize_3226;
3296      Initialize_3227;
3297      Initialize_3228;
3298      Initialize_3229;
3299      Initialize_3230;
3300      Initialize_3231;
3301      Initialize_3232;
3302      Initialize_3233;
3303      Initialize_3234;
3304      Initialize_3235;
3305      Initialize_3236;
3306      Initialize_3237;
3307      Initialize_3238;
3308      Initialize_3239;
3309      Initialize_3240;
3310      Initialize_3241;
3311      Initialize_3242;
3312      Initialize_3243;
3313      Initialize_3244;
3314      Initialize_3245;
3315      Initialize_3246;
3316      Initialize_3247;
3317      Initialize_3248;
3318      Initialize_3249;
3319      Initialize_3250;
3320      Initialize_3251;
3321      Initialize_3252;
3322      Initialize_3253;
3323      Initialize_3254;
3324      Initialize_3255;
3325      Initialize_3256;
3326      Initialize_3257;
3327      Initialize_3258;
3328      Initialize_3259;
3329      Initialize_3260;
3330      Initialize_3261;
3331      Initialize_3262;
3332      Initialize_3263;
3333      Initialize_3264;
3334      Initialize_3265;
3335      Initialize_3266;
3336      Initialize_3267;
3337      Initialize_3268;
3338      Initialize_3269;
3339      Initialize_3270;
3340      Initialize_3271;
3341      Initialize_3272;
3342      Initialize_3273;
3343      Initialize_3274;
3344      Initialize_3275;
3345      Initialize_3276;
3346      Initialize_3277;
3347      Initialize_3278;
3348      Initialize_3279;
3349      Initialize_3280;
3350      Initialize_3281;
3351      Initialize_3282;
3352      Initialize_3283;
3353      Initialize_3284;
3354      Initialize_3285;
3355      Initialize_3286;
3356      Initialize_3287;
3357      Initialize_3288;
3358      Initialize_3289;
3359      Initialize_3290;
3360      Initialize_3291;
3361      Initialize_3292;
3362      Initialize_3293;
3363      Initialize_3294;
3364      Initialize_3295;
3365      Initialize_3296;
3366      Initialize_3297;
3367      Initialize_3298;
3368      Initialize_3299;
3369      Initialize_3300;
3370      Initialize_3301;
3371      Initialize_3302;
3372      Initialize_3303;
3373      Initialize_3304;
3374      Initialize_3305;
3375      Initialize_3306;
3376      Initialize_3307;
3377      Initialize_3308;
3378      Initialize_3309;
3379      Initialize_3310;
3380      Initialize_3311;
3381      Initialize_3312;
3382      Initialize_3313;
3383      Initialize_3314;
3384      Initialize_3315;
3385      Initialize_3316;
3386      Initialize_3317;
3387      Initialize_3318;
3388      Initialize_3319;
3389      Initialize_3320;
3390      Initialize_3321;
3391      Initialize_3322;
3392      Initialize_3323;
3393      Initialize_3324;
3394      Initialize_3325;
3395      Initialize_3326;
3396      Initialize_3327;
3397      Initialize_3328;
3398      Initialize_3329;
3399      Initialize_3330;
3400      Initialize_3331;
3401      Initialize_3332;
3402      Initialize_3333;
3403      Initialize_3334;
3404      Initialize_3335;
3405      Initialize_3336;
3406      Initialize_3337;
3407      Initialize_3338;
3408      Initialize_3339;
3409      Initialize_3340;
3410      Initialize_3341;
3411      Initialize_3342;
3412      Initialize_3343;
3413      Initialize_3344;
3414      Initialize_3345;
3415      Initialize_3346;
3416      Initialize_3347;
3417      Initialize_3348;
3418      Initialize_3349;
3419      Initialize_3350;
3420      Initialize_3351;
3421      Initialize_3352;
3422      Initialize_3353;
3423      Initialize_3354;
3424      Initialize_3355;
3425      Initialize_3356;
3426      Initialize_3357;
3427      Initialize_3358;
3428      Initialize_3359;
3429      Initialize_3360;
3430      Initialize_3361;
3431      Initialize_3362;
3432      Initialize_3363;
3433      Initialize_3364;
3434      Initialize_3365;
3435      Initialize_3366;
3436      Initialize_3367;
3437      Initialize_3368;
3438      Initialize_3369;
3439      Initialize_3370;
3440      Initialize_3371;
3441      Initialize_3372;
3442      Initialize_3373;
3443      Initialize_3374;
3444      Initialize_3375;
3445      Initialize_3376;
3446      Initialize_3377;
3447      Initialize_3378;
3448      Initialize_3379;
3449      Initialize_3380;
3450      Initialize_3381;
3451      Initialize_3382;
3452      Initialize_3383;
3453      Initialize_3384;
3454      Initialize_3385;
3455      Initialize_3386;
3456      Initialize_3387;
3457      Initialize_3388;
3458      Initialize_3389;
3459      Initialize_3390;
3460      Initialize_3391;
3461      Initialize_3392;
3462      Initialize_3393;
3463      Initialize_3394;
3464      Initialize_3395;
3465      Initialize_3396;
3466      Initialize_3397;
3467      Initialize_3398;
3468      Initialize_3399;
3469      Initialize_3400;
3470      Initialize_3401;
3471      Initialize_3402;
3472      Initialize_3403;
3473      Initialize_3404;
3474      Initialize_3405;
3475      Initialize_3406;
3476      Initialize_3407;
3477      Initialize_3408;
3478      Initialize_3409;
3479      Initialize_3410;
3480      Initialize_3411;
3481      Initialize_3412;
3482      Initialize_3413;
3483      Initialize_3414;
3484      Initialize_3415;
3485      Initialize_3416;
3486      Initialize_3417;
3487      Initialize_3418;
3488      Initialize_3419;
3489      Initialize_3420;
3490      Initialize_3421;
3491      Initialize_3422;
3492      Initialize_3423;
3493      Initialize_3424;
3494      Initialize_3425;
3495      Initialize_3426;
3496      Initialize_3427;
3497      Initialize_3428;
3498      Initialize_3429;
3499      Initialize_3430;
3500      Initialize_3431;
3501      Initialize_3432;
3502      Initialize_3433;
3503      Initialize_3434;
3504      Initialize_3435;
3505      Initialize_3436;
3506      Initialize_3437;
3507      Initialize_3438;
3508      Initialize_3439;
3509      Initialize_3440;
3510      Initialize_3441;
3511      Initialize_3442;
3512      Initialize_3443;
3513      Initialize_3444;
3514      Initialize_3445;
3515      Initialize_3446;
3516      Initialize_3447;
3517      Initialize_3448;
3518      Initialize_3449;
3519      Initialize_3450;
3520      Initialize_3451;
3521      Initialize_3452;
3522      Initialize_3453;
3523      Initialize_3454;
3524      Initialize_3455;
3525      Initialize_3456;
3526      Initialize_3457;
3527      Initialize_3458;
3528      Initialize_3459;
3529      Initialize_3460;
3530      Initialize_3461;
3531      Initialize_3462;
3532      Initialize_3463;
3533      Initialize_3464;
3534      Initialize_3465;
3535      Initialize_3466;
3536      Initialize_3467;
3537      Initialize_3468;
3538      Initialize_3469;
3539      Initialize_3470;
3540      Initialize_3471;
3541      Initialize_3472;
3542      Initialize_3473;
3543      Initialize_3474;
3544      Initialize_3475;
3545      Initialize_3476;
3546      Initialize_3477;
3547      Initialize_3478;
3548      Initialize_3479;
3549      Initialize_3480;
3550      Initialize_3481;
3551      Initialize_3482;
3552      Initialize_3483;
3553      Initialize_3484;
3554      Initialize_3485;
3555      Initialize_3486;
3556      Initialize_3487;
3557      Initialize_3488;
3558      Initialize_3489;
3559      Initialize_3490;
3560      Initialize_3491;
3561      Initialize_3492;
3562      Initialize_3493;
3563      Initialize_3494;
3564      Initialize_3495;
3565      Initialize_3496;
3566      Initialize_3497;
3567      Initialize_3498;
3568      Initialize_3499;
3569      Initialize_3500;
3570      Initialize_3501;
3571      Initialize_3502;
3572      Initialize_3503;
3573      Initialize_3504;
3574      Initialize_3505;
3575      Initialize_3506;
3576      Initialize_3507;
3577      Initialize_3508;
3578      Initialize_3509;
3579      Initialize_3510;
3580      Initialize_3511;
3581      Initialize_3512;
3582      Initialize_3513;
3583      Initialize_3514;
3584      Initialize_3515;
3585      Initialize_3516;
3586      Initialize_3517;
3587      Initialize_3518;
3588      Initialize_3519;
3589      Initialize_3520;
3590      Initialize_3521;
3591      Initialize_3522;
3592      Initialize_3523;
3593      Initialize_3524;
3594      Initialize_3525;
3595      Initialize_3526;
3596      Initialize_3527;
3597      Initialize_3528;
3598      Initialize_3529;
3599      Initialize_3530;
3600      Initialize_3531;
3601      Initialize_3532;
3602      Initialize_3533;
3603      Initialize_3534;
3604      Initialize_3535;
3605      Initialize_3536;
3606      Initialize_3537;
3607      Initialize_3538;
3608      Initialize_3539;
3609      Initialize_3540;
3610      Initialize_3541;
3611      Initialize_3542;
3612      Initialize_3543;
3613      Initialize_3544;
3614      Initialize_3545;
3615      Initialize_3546;
3616      Initialize_3547;
3617      Initialize_3548;
3618      Initialize_3549;
3619      Initialize_3550;
3620      Initialize_3551;
3621      Initialize_3552;
3622      Initialize_3553;
3623      Initialize_3554;
3624      Initialize_3555;
3625      Initialize_3556;
3626      Initialize_3557;
3627      Initialize_3558;
3628      Initialize_3559;
3629      Initialize_3560;
3630      Initialize_3561;
3631      Initialize_3562;
3632      Initialize_3563;
3633      Initialize_3564;
3634      Initialize_3565;
3635      Initialize_3566;
3636      Initialize_3567;
3637      Initialize_3568;
3638      Initialize_3569;
3639      Initialize_3570;
3640      Initialize_3571;
3641      Initialize_3572;
3642      Initialize_3573;
3643      Initialize_3574;
3644      Initialize_3575;
3645      Initialize_3576;
3646      Initialize_3577;
3647      Initialize_3578;
3648      Initialize_3579;
3649      Initialize_3580;
3650      Initialize_3581;
3651      Initialize_3582;
3652      Initialize_3583;
3653      Initialize_3584;
3654      Initialize_3585;
3655      Initialize_3586;
3656      Initialize_3587;
3657      Initialize_3588;
3658      Initialize_3589;
3659      Initialize_3590;
3660      Initialize_3591;
3661      Initialize_3592;
3662      Initialize_3593;
3663      Initialize_3594;
3664      Initialize_3595;
3665      Initialize_3596;
3666      Initialize_3597;
3667      Initialize_3598;
3668      Initialize_3599;
3669      Initialize_3600;
3670      Initialize_3601;
3671      Initialize_3602;
3672      Initialize_3603;
3673      Initialize_3604;
3674      Initialize_3605;
3675      Initialize_3606;
3676      Initialize_3607;
3677      Initialize_3608;
3678      Initialize_3609;
3679      Initialize_3610;
3680      Initialize_3611;
3681      Initialize_3612;
3682      Initialize_3613;
3683      Initialize_3614;
3684      Initialize_3615;
3685      Initialize_3616;
3686      Initialize_3617;
3687      Initialize_3618;
3688      Initialize_3619;
3689      Initialize_3620;
3690      Initialize_3621;
3691      Initialize_3622;
3692      Initialize_3623;
3693      Initialize_3624;
3694      Initialize_3625;
3695      Initialize_3626;
3696      Initialize_3627;
3697      Initialize_3628;
3698      Initialize_3629;
3699      Initialize_3630;
3700      Initialize_3631;
3701      Initialize_3632;
3702      Initialize_3633;
3703      Initialize_3634;
3704      Initialize_3635;
3705      Initialize_3636;
3706      Initialize_3637;
3707      Initialize_3638;
3708      Initialize_3639;
3709      Initialize_3640;
3710      Initialize_3641;
3711      Initialize_3642;
3712      Initialize_3643;
3713      Initialize_3644;
3714      Initialize_3645;
3715      Initialize_3646;
3716      Initialize_3647;
3717      Initialize_3648;
3718      Initialize_3649;
3719      Initialize_3650;
3720      Initialize_3651;
3721      Initialize_3652;
3722      Initialize_3653;
3723      Initialize_3654;
3724      Initialize_3655;
3725      Initialize_3656;
3726      Initialize_3657;
3727      Initialize_3658;
3728      Initialize_3659;
3729      Initialize_3660;
3730      Initialize_3661;
3731      Initialize_3662;
3732      Initialize_3663;
3733      Initialize_3664;
3734      Initialize_3665;
3735      Initialize_3666;
3736      Initialize_3667;
3737      Initialize_3668;
3738      Initialize_3669;
3739      Initialize_3670;
3740      Initialize_3671;
3741      Initialize_3672;
3742      Initialize_3673;
3743      Initialize_3674;
3744      Initialize_3675;
3745      Initialize_3676;
3746      Initialize_3677;
3747      Initialize_3678;
3748      Initialize_3679;
3749      Initialize_3680;
3750      Initialize_3681;
3751      Initialize_3682;
3752      Initialize_3683;
3753      Initialize_3684;
3754      Initialize_3685;
3755      Initialize_3686;
3756      Initialize_3687;
3757      Initialize_3688;
3758      Initialize_3689;
3759      Initialize_3690;
3760      Initialize_3691;
3761      Initialize_3692;
3762      Initialize_3693;
3763      Initialize_3694;
3764      Initialize_3695;
3765      Initialize_3696;
3766      Initialize_3697;
3767      Initialize_3698;
3768      Initialize_3699;
3769      Initialize_3700;
3770      Initialize_3701;
3771      Initialize_3702;
3772      Initialize_3703;
3773      Initialize_3704;
3774      Initialize_3705;
3775      Initialize_3706;
3776      Initialize_3707;
3777      Initialize_3708;
3778      Initialize_3709;
3779      Initialize_3710;
3780      Initialize_3711;
3781      Initialize_3712;
3782      Initialize_3713;
3783      Initialize_3714;
3784      Initialize_3715;
3785      Initialize_3716;
3786      Initialize_3717;
3787      Initialize_3718;
3788      Initialize_3719;
3789      Initialize_3720;
3790      Initialize_3721;
3791      Initialize_3722;
3792      Initialize_3723;
3793      Initialize_3724;
3794      Initialize_3725;
3795      Initialize_3726;
3796      Initialize_3727;
3797      Initialize_3728;
3798      Initialize_3729;
3799      Initialize_3730;
3800      Initialize_3731;
3801      Initialize_3732;
3802      Initialize_3733;
3803      Initialize_3734;
3804      Initialize_3735;
3805      Initialize_3736;
3806      Initialize_3737;
3807      Initialize_3738;
3808      Initialize_3739;
3809      Initialize_3740;
3810      Initialize_3741;
3811      Initialize_3742;
3812      Initialize_3743;
3813      Initialize_3744;
3814      Initialize_3745;
3815      Initialize_3746;
3816      Initialize_3747;
3817      Initialize_3748;
3818      Initialize_3749;
3819      Initialize_3750;
3820      Initialize_3751;
3821      Initialize_3752;
3822      Initialize_3753;
3823      Initialize_3754;
3824      Initialize_3755;
3825      Initialize_3756;
3826      Initialize_3757;
3827      Initialize_3758;
3828      Initialize_3759;
3829      Initialize_3760;
3830      Initialize_3761;
3831      Initialize_3762;
3832      Initialize_3763;
3833      Initialize_3764;
3834      Initialize_3765;
3835      Initialize_3766;
3836      Initialize_3767;
3837      Initialize_3768;
3838      Initialize_3769;
3839      Initialize_3770;
3840      Initialize_3771;
3841      Initialize_3772;
3842      Initialize_3773;
3843      Initialize_3774;
3844      Initialize_3775;
3845      Initialize_3776;
3846      Initialize_3777;
3847      Initialize_3778;
3848      Initialize_3779;
3849      Initialize_3780;
3850      Initialize_3781;
3851      Initialize_3782;
3852      Initialize_3783;
3853      Initialize_3784;
3854      Initialize_3785;
3855      Initialize_3786;
3856      Initialize_3787;
3857      Initialize_3788;
3858      Initialize_3789;
3859      Initialize_3790;
3860      Initialize_3791;
3861      Initialize_3792;
3862      Initialize_3793;
3863      Initialize_3794;
3864      Initialize_3795;
3865      Initialize_3796;
3866      Initialize_3797;
3867      Initialize_3798;
3868      Initialize_3799;
3869      Initialize_3800;
3870      Initialize_3801;
3871      Initialize_3802;
3872      Initialize_3803;
3873      Initialize_3804;
3874      Initialize_3805;
3875      Initialize_3806;
3876      Initialize_3807;
3877      Initialize_3808;
3878      Initialize_3809;
3879      Initialize_3810;
3880      Initialize_3811;
3881      Initialize_3812;
3882      Initialize_3813;
3883      Initialize_3814;
3884      Initialize_3815;
3885      Initialize_3816;
3886      Initialize_3817;
3887      Initialize_3818;
3888      Initialize_3819;
3889      Initialize_3820;
3890      Initialize_3821;
3891      Initialize_3822;
3892      Initialize_3823;
3893      Initialize_3824;
3894      Initialize_3825;
3895      Initialize_3826;
3896      Initialize_3827;
3897      Initialize_3828;
3898      Initialize_3829;
3899      Initialize_3830;
3900      Initialize_3831;
3901      Initialize_3832;
3902      Initialize_3833;
3903      Initialize_3834;
3904      Initialize_3835;
3905      Initialize_3836;
3906      Initialize_3837;
3907      Initialize_3838;
3908      Initialize_3839;
3909      Initialize_3840;
3910      Initialize_3841;
3911      Initialize_3842;
3912      Initialize_3843;
3913      Initialize_3844;
3914      Initialize_3845;
3915      Initialize_3846;
3916      Initialize_3847;
3917      Initialize_3848;
3918      Initialize_3849;
3919      Initialize_3850;
3920      Initialize_3851;
3921      Initialize_3852;
3922      Initialize_3853;
3923      Initialize_3854;
3924      Initialize_3855;
3925      Initialize_3856;
3926      Initialize_3857;
3927      Initialize_3858;
3928      Initialize_3859;
3929      Initialize_3860;
3930      Initialize_3861;
3931      Initialize_3862;
3932      Initialize_3863;
3933      Initialize_3864;
3934      Initialize_3865;
3935      Initialize_3866;
3936      Initialize_3867;
3937      Initialize_3868;
3938      Initialize_3869;
3939      Initialize_3870;
3940      Initialize_3871;
3941      Initialize_3872;
3942      Initialize_3873;
3943      Initialize_3874;
3944      Initialize_3875;
3945      Initialize_3876;
3946      Initialize_3877;
3947      Initialize_3878;
3948      Initialize_3879;
3949      Initialize_3880;
3950      Initialize_3881;
3951      Initialize_3882;
3952      Initialize_3883;
3953      Initialize_3884;
3954      Initialize_3885;
3955      Initialize_3886;
3956      Initialize_3887;
3957      Initialize_3888;
3958      Initialize_3889;
3959      Initialize_3890;
3960      Initialize_3891;
3961      Initialize_3892;
3962      Initialize_3893;
3963      Initialize_3894;
3964      Initialize_3895;
3965      Initialize_3896;
3966      Initialize_3897;
3967      Initialize_3898;
3968      Initialize_3899;
3969      Initialize_3900;
3970      Initialize_3901;
3971      Initialize_3902;
3972      Initialize_3903;
3973      Initialize_3904;
3974      Initialize_3905;
3975      Initialize_3906;
3976      Initialize_3907;
3977      Initialize_3908;
3978      Initialize_3909;
3979      Initialize_3910;
3980      Initialize_3911;
3981      Initialize_3912;
3982      Initialize_3913;
3983      Initialize_3914;
3984      Initialize_3915;
3985      Initialize_3916;
3986      Initialize_3917;
3987      Initialize_3918;
3988      Initialize_3919;
3989      Initialize_3920;
3990      Initialize_3921;
3991      Initialize_3922;
3992      Initialize_3923;
3993      Initialize_3924;
3994      Initialize_3925;
3995      Initialize_3926;
3996      Initialize_3927;
3997      Initialize_3928;
3998      Initialize_3929;
3999      Initialize_3930;
4000      Initialize_3931;
4001      Initialize_3932;
4002      Initialize_3933;
4003      Initialize_3934;
4004      Initialize_3935;
4005      Initialize_3936;
4006      Initialize_3937;
4007      Initialize_3938;
4008      Initialize_3939;
4009      Initialize_3940;
4010      Initialize_3941;
4011      Initialize_3942;
4012      Initialize_3943;
4013      Initialize_3944;
4014      Initialize_3945;
4015      Initialize_3946;
4016      Initialize_3947;
4017      Initialize_3948;
4018      Initialize_3949;
4019      Initialize_3950;
4020      Initialize_3951;
4021      Initialize_3952;
4022      Initialize_3953;
4023      Initialize_3954;
4024      Initialize_3955;
4025      Initialize_3956;
4026      Initialize_3957;
4027      Initialize_3958;
4028      Initialize_3959;
4029      Initialize_3960;
4030      Initialize_3961;
4031      Initialize_3962;
4032      Initialize_3963;
4033      Initialize_3964;
4034      Initialize_3965;
4035      Initialize_3966;
4036      Initialize_3967;
4037      Initialize_3968;
4038      Initialize_3969;
4039      Initialize_3970;
4040      Initialize_3971;
4041      Initialize_3972;
4042      Initialize_3973;
4043      Initialize_3974;
4044      Initialize_3975;
4045      Initialize_3976;
4046      Initialize_3977;
4047      Initialize_3978;
4048      Initialize_3979;
4049      Initialize_3980;
4050      Initialize_3981;
4051      Initialize_3982;
4052      Initialize_3983;
4053      Initialize_3984;
4054      Initialize_3985;
4055      Initialize_3986;
4056      Initialize_3987;
4057      Initialize_3988;
4058      Initialize_3989;
4059      Initialize_3990;
4060      Initialize_3991;
4061      Initialize_3992;
4062      Initialize_3993;
4063      Initialize_3994;
4064      Initialize_3995;
4065      Initialize_3996;
4066      Initialize_3997;
4067      Initialize_3998;
4068      Initialize_3999;
4069      Initialize_4000;
4070      Initialize_4001;
4071      Initialize_4002;
4072      Initialize_4003;
4073      Initialize_4004;
4074      Initialize_4005;
4075      Initialize_4006;
4076      Initialize_4007;
4077      Initialize_4008;
4078      Initialize_4009;
4079      Initialize_4010;
4080      Initialize_4011;
4081      Initialize_4012;
4082      Initialize_4013;
4083      Initialize_4014;
4084      Initialize_4015;
4085      Initialize_4016;
4086      Initialize_4017;
4087      Initialize_4018;
4088      Initialize_4019;
4089      Initialize_4020;
4090      Initialize_4021;
4091      Initialize_4022;
4092      Initialize_4023;
4093      Initialize_4024;
4094      Initialize_4025;
4095      Initialize_4026;
4096      Initialize_4027;
4097      Initialize_4028;
4098      Initialize_4029;
4099      Initialize_4030;
4100      Initialize_4031;
4101      Initialize_4032;
4102      Initialize_4033;
4103      Initialize_4034;
4104      Initialize_4035;
4105      Initialize_4036;
4106      Initialize_4037;
4107      Initialize_4038;
4108      Initialize_4039;
4109      Initialize_4040;
4110      Initialize_4041;
4111      Initialize_4042;
4112      Initialize_4043;
4113      Initialize_4044;
4114      Initialize_4045;
4115      Initialize_4046;
4116      Initialize_4047;
4117      Initialize_4048;
4118      Initialize_4049;
4119      Initialize_4050;
4120      Initialize_4051;
4121      Initialize_4052;
4122      Initialize_4053;
4123      Initialize_4054;
4124      Initialize_4055;
4125      Initialize_4056;
4126      Initialize_4057;
4127      Initialize_4058;
4128      Initialize_4059;
4129      Initialize_4060;
4130      Initialize_4061;
4131      Initialize_4062;
4132      Initialize_4063;
4133      Initialize_4064;
4134      Initialize_4065;
4135      Initialize_4066;
4136      Initialize_4067;
4137      Initialize_4068;
4138      Initialize_4069;
4139      Initialize_4070;
4140      Initialize_4071;
4141      Initialize_4072;
4142      Initialize_4073;
4143      Initialize_4074;
4144      Initialize_4075;
4145      Initialize_4076;
4146      Initialize_4077;
4147      Initialize_4078;
4148      Initialize_4079;
4149      Initialize_4080;
4150      Initialize_4081;
4151      Initialize_4082;
4152      Initialize_4083;
4153      Initialize_4084;
4154      Initialize_4085;
4155      Initialize_4086;
4156      Initialize_4087;
4157      Initialize_4088;
4158      Initialize_4089;
4159      Initialize_4090;
4160      Initialize_4091;
4161      Initialize_4092;
4162      Initialize_4093;
4163      Initialize_4094;
4164      Initialize_4095;
4165      Initialize_4096;
4166      Initialize_4097;
4167      Initialize_4098;
4168      Initialize_4099;
4169      Initialize_4100;
4170      Initialize_4101;
4171      Initialize_4102;
4172      Initialize_4103;
4173      Initialize_4104;
4174      Initialize_4105;
4175      Initialize_4106;
4176      Initialize_4107;
4177      Initialize_4108;
4178      Initialize_4109;
4179      Initialize_4110;
4180      Initialize_4111;
4181      Initialize_4112;
4182      Initialize_4113;
4183      Initialize_4114;
4184      Initialize_4115;
4185      Initialize_4116;
4186      Initialize_4117;
4187      Initialize_4118;
4188      Initialize_4119;
4189      Initialize_4120;
4190      Initialize_4121;
4191      Initialize_4122;
4192      Initialize_4123;
4193      Initialize_4124;
4194      Initialize_4125;
4195      Initialize_4126;
4196      Initialize_4127;
4197      Initialize_4128;
4198      Initialize_4129;
4199      Initialize_4130;
4200      Initialize_4131;
4201      Initialize_4132;
4202      Initialize_4133;
4203      Initialize_4134;
4204      Initialize_4135;
4205      Initialize_4136;
4206      Initialize_4137;
4207      Initialize_4138;
4208      Initialize_4139;
4209      Initialize_4140;
4210      Initialize_4141;
4211      Initialize_4142;
4212      Initialize_4143;
4213      Initialize_4144;
4214      Initialize_4145;
4215      Initialize_4146;
4216      Initialize_4147;
4217      Initialize_4148;
4218      Initialize_4149;
4219      Initialize_4150;
4220      Initialize_4151;
4221      Initialize_4152;
4222      Initialize_4153;
4223      Initialize_4154;
4224      Initialize_4155;
4225      Initialize_4156;
4226      Initialize_4157;
4227      Initialize_4158;
4228      Initialize_4159;
4229      Initialize_4160;
4230      Initialize_4161;
4231      Initialize_4162;
4232      Initialize_4163;
4233      Initialize_4164;
4234      Initialize_4165;
4235      Initialize_4166;
4236      Initialize_4167;
4237      Initialize_4168;
4238      Initialize_4169;
4239      Initialize_4170;
4240      Initialize_4171;
4241      Initialize_4172;
4242      Initialize_4173;
4243      Initialize_4174;
4244      Initialize_4175;
4245      Initialize_4176;
4246      Initialize_4177;
4247      Initialize_4178;
4248      Initialize_4179;
4249      Initialize_4180;
4250      Initialize_4181;
4251      Initialize_4182;
4252      Initialize_4183;
4253      Initialize_4184;
4254      Initialize_4185;
4255      Initialize_4186;
4256      Initialize_4187;
4257      Initialize_4188;
4258      Initialize_4189;
4259      Initialize_4190;
4260      Initialize_4191;
4261      Initialize_4192;
4262      Initialize_4193;
4263      Initialize_4194;
4264      Initialize_4195;
4265      Initialize_4196;
4266      Initialize_4197;
4267      Initialize_4198;
4268      Initialize_4199;
4269      Initialize_4200;
4270      Initialize_4201;
4271      Initialize_4202;
4272      Initialize_4203;
4273      Initialize_4204;
4274      Initialize_4205;
4275      Initialize_4206;
4276      Initialize_4207;
4277      Initialize_4208;
4278      Initialize_4209;
4279      Initialize_4210;
4280      Initialize_4211;
4281      Initialize_4212;
4282      Initialize_4213;
4283      Initialize_4214;
4284      Initialize_4215;
4285      Initialize_4216;
4286      Initialize_4217;
4287      Initialize_4218;
4288      Initialize_4219;
4289      Initialize_4220;
4290      Initialize_4221;
4291      Initialize_4222;
4292      Initialize_4223;
4293      Initialize_4224;
4294      Initialize_4225;
4295      Initialize_4226;
4296      Initialize_4227;
4297      Initialize_4228;
4298      Initialize_4229;
4299      Initialize_4230;
4300      Initialize_4231;
4301      Initialize_4232;
4302      Initialize_4233;
4303      Initialize_4234;
4304      Initialize_4235;
4305      Initialize_4236;
4306      Initialize_4237;
4307      Initialize_4238;
4308      Initialize_4239;
4309      Initialize_4240;
4310      Initialize_4241;
4311      Initialize_4242;
4312      Initialize_4243;
4313      Initialize_4244;
4314      Initialize_4245;
4315      Initialize_4246;
4316      Initialize_4247;
4317      Initialize_4248;
4318      Initialize_4249;
4319      Initialize_4250;
4320      Initialize_4251;
4321      Initialize_4252;
4322      Initialize_4253;
4323      Initialize_4254;
4324      Initialize_4255;
4325      Initialize_4256;
4326      Initialize_4257;
4327      Initialize_4258;
4328      Initialize_4259;
4329      Initialize_4260;
4330      Initialize_4261;
4331      Initialize_4262;
4332      Initialize_4263;
4333      Initialize_4264;
4334      Initialize_4265;
4335      Initialize_4266;
4336      Initialize_4267;
4337      Initialize_4268;
4338      Initialize_4269;
4339      Initialize_4270;
4340      Initialize_4271;
4341      Initialize_4272;
4342      Initialize_4273;
4343      Initialize_4274;
4344      Initialize_4275;
4345      Initialize_4276;
4346      Initialize_4277;
4347      Initialize_4278;
4348      Initialize_4279;
4349      Initialize_4280;
4350      Initialize_4281;
4351      Initialize_4282;
4352      Initialize_4283;
4353      Initialize_4284;
4354      Initialize_4285;
4355      Initialize_4286;
4356      Initialize_4287;
4357      Initialize_4288;
4358      Initialize_4289;
4359      Initialize_4290;
4360      Initialize_4291;
4361      Initialize_4292;
4362      Initialize_4293;
4363      Initialize_4294;
4364      Initialize_4295;
4365      Initialize_4296;
4366      Initialize_4297;
4367      Initialize_4298;
4368      Initialize_4299;
4369      Initialize_4300;
4370      Initialize_4301;
4371      Initialize_4302;
4372      Initialize_4303;
4373      Initialize_4304;
4374      Initialize_4305;
4375      Initialize_4306;
4376      Initialize_4307;
4377      Initialize_4308;
4378      Initialize_4309;
4379      Initialize_4310;
4380      Initialize_4311;
4381      Initialize_4312;
4382      Initialize_4313;
4383      Initialize_4314;
4384      Initialize_4315;
4385      Initialize_4316;
4386      Initialize_4317;
4387      Initialize_4318;
4388      Initialize_4319;
4389      Initialize_4320;
4390      Initialize_4321;
4391      Initialize_4322;
4392      Initialize_4323;
4393      Initialize_4324;
4394      Initialize_4325;
4395      Initialize_4326;
4396      Initialize_4327;
4397      Initialize_4328;
4398      Initialize_4329;
4399      Initialize_4330;
4400      Initialize_4331;
4401      Initialize_4332;
4402      Initialize_4333;
4403      Initialize_4334;
4404      Initialize_4335;
4405      Initialize_4336;
4406      Initialize_4337;
4407      Initialize_4338;
4408      Initialize_4339;
4409      Initialize_4340;
4410      Initialize_4341;
4411      Initialize_4342;
4412      Initialize_4343;
4413      Initialize_4344;
4414      Initialize_4345;
4415      Initialize_4346;
4416      Initialize_4347;
4417      Initialize_4348;
4418      Initialize_4349;
4419      Initialize_4350;
4420      Initialize_4351;
4421      Initialize_4352;
4422      Initialize_4353;
4423      Initialize_4354;
4424      Initialize_4355;
4425      Initialize_4356;
4426      Initialize_4357;
4427      Initialize_4358;
4428      Initialize_4359;
4429      Initialize_4360;
4430      Initialize_4361;
4431      Initialize_4362;
4432      Initialize_4363;
4433      Initialize_4364;
4434      Initialize_4365;
4435      Initialize_4366;
4436      Initialize_4367;
4437      Initialize_4368;
4438      Initialize_4369;
4439      Initialize_4370;
4440      Initialize_4371;
4441      Initialize_4372;
4442      Initialize_4373;
4443      Initialize_4374;
4444      Initialize_4375;
4445      Initialize_4376;
4446      Initialize_4377;
4447      Initialize_4378;
4448      Initialize_4379;
4449      Initialize_4380;
4450      Initialize_4381;
4451      Initialize_4382;
4452      Initialize_4383;
4453      Initialize_4384;
4454      Initialize_4385;
4455      Initialize_4386;
4456      Initialize_4387;
4457      Initialize_4388;
4458      Initialize_4389;
4459      Initialize_4390;
4460      Initialize_4391;
4461      Initialize_4392;
4462      Initialize_4393;
4463      Initialize_4394;
4464      Initialize_4395;
4465      Initialize_4396;
4466      Initialize_4397;
4467      Initialize_4398;
4468      Initialize_4399;
4469      Initialize_4400;
4470      Initialize_4401;
4471      Initialize_4402;
4472      Initialize_4403;
4473      Initialize_4404;
4474      Initialize_4405;
4475      Initialize_4406;
4476      Initialize_4407;
4477      Initialize_4408;
4478      Initialize_4409;
4479      Initialize_4410;
4480      Initialize_4411;
4481      Initialize_4412;
4482      Initialize_4413;
4483      Initialize_4414;
4484      Initialize_4415;
4485      Initialize_4416;
4486      Initialize_4417;
4487      Initialize_4418;
4488      Initialize_4419;
4489      Initialize_4420;
4490      Initialize_4421;
4491      Initialize_4422;
4492      Initialize_4423;
4493      Initialize_4424;
4494      Initialize_4425;
4495      Initialize_4426;
4496      Initialize_4427;
4497      Initialize_4428;
4498      Initialize_4429;
4499      Initialize_4430;
4500      Initialize_4431;
4501      Initialize_4432;
4502      Initialize_4433;
4503      Initialize_4434;
4504      Initialize_4435;
4505      Initialize_4436;
4506      Initialize_4437;
4507      Initialize_4438;
4508      Initialize_4439;
4509      Initialize_4440;
4510      Initialize_4441;
4511      Initialize_4442;
4512      Initialize_4443;
4513      Initialize_4444;
4514      Initialize_4445;
4515      Initialize_4446;
4516      Initialize_4447;
4517      Initialize_4448;
4518      Initialize_4449;
4519      Initialize_4450;
4520      Initialize_4451;
4521      Initialize_4452;
4522      Initialize_4453;
4523      Initialize_4454;
4524      Initialize_4455;
4525      Initialize_4456;
4526      Initialize_4457;
4527      Initialize_4458;
4528      Initialize_4459;
4529      Initialize_4460;
4530      Initialize_4461;
4531      Initialize_4462;
4532      Initialize_4463;
4533      Initialize_4464;
4534      Initialize_4465;
4535      Initialize_4466;
4536      Initialize_4467;
4537      Initialize_4468;
4538      Initialize_4469;
4539      Initialize_4470;
4540      Initialize_4471;
4541      Initialize_4472;
4542      Initialize_4473;
4543      Initialize_4474;
4544      Initialize_4475;
4545      Initialize_4476;
4546      Initialize_4477;
4547      Initialize_4478;
4548      Initialize_4479;
4549      Initialize_4480;
4550      Initialize_4481;
4551      Initialize_4482;
4552      Initialize_4483;
4553      Initialize_4484;
4554      Initialize_4485;
4555      Initialize_4486;
4556      Initialize_4487;
4557      Initialize_4488;
4558      Initialize_4489;
4559      Initialize_4490;
4560      Initialize_4491;
4561      Initialize_4492;
4562      Initialize_4493;
4563      Initialize_4494;
4564      Initialize_4495;
4565      Initialize_4496;
4566      Initialize_4497;
4567      Initialize_4498;
4568      Initialize_4499;
4569      Initialize_4500;
4570      Initialize_4501;
4571      Initialize_4502;
4572      Initialize_4503;
4573      Initialize_4504;
4574      Initialize_4505;
4575      Initialize_4506;
4576      Initialize_4507;
4577      Initialize_4508;
4578      Initialize_4509;
4579      Initialize_4510;
4580      Initialize_4511;
4581      Initialize_4512;
4582      Initialize_4513;
4583      Initialize_4514;
4584      Initialize_4515;
4585      Initialize_4516;
4586      Initialize_4517;
4587      Initialize_4518;
4588      Initialize_4519;
4589      Initialize_4520;
4590      Initialize_4521;
4591      Initialize_4522;
4592      Initialize_4523;
4593      Initialize_4524;
4594      Initialize_4525;
4595      Initialize_4526;
4596      Initialize_4527;
4597      Initialize_4528;
4598      Initialize_4529;
4599      Initialize_4530;
4600      Initialize_4531;
4601      Initialize_4532;
4602      Initialize_4533;
4603      Initialize_4534;
4604      Initialize_4535;
4605      Initialize_4536;
4606      Initialize_4537;
4607      Initialize_4538;
4608      Initialize_4539;
4609      Initialize_4540;
4610      Initialize_4541;
4611      Initialize_4542;
4612      Initialize_4543;
4613      Initialize_4544;
4614      Initialize_4545;
4615      Initialize_4546;
4616      Initialize_4547;
4617      Initialize_4548;
4618      Initialize_4549;
4619      Initialize_4550;
4620      Initialize_4551;
4621      Initialize_4552;
4622      Initialize_4553;
4623      Initialize_4554;
4624      Initialize_4555;
4625      Initialize_4556;
4626      Initialize_4557;
4627      Initialize_4558;
4628      Initialize_4559;
4629      Initialize_4560;
4630      Initialize_4561;
4631      Initialize_4562;
4632      Initialize_4563;
4633      Initialize_4564;
4634      Initialize_4565;
4635      Initialize_4566;
4636      Initialize_4567;
4637      Initialize_4568;
4638      Initialize_4569;
4639      Initialize_4570;
4640      Initialize_4571;
4641      Initialize_4572;
4642      Initialize_4573;
4643      Initialize_4574;
4644      Initialize_4575;
4645      Initialize_4576;
4646      Initialize_4577;
4647      Initialize_4578;
4648      Initialize_4579;
4649      Initialize_4580;
4650      Initialize_4581;
4651      Initialize_4582;
4652      Initialize_4583;
4653      Initialize_4584;
4654      Initialize_4585;
4655      Initialize_4586;
4656      Initialize_4587;
4657      Initialize_4588;
4658      Initialize_4589;
4659      Initialize_4590;
4660      Initialize_4591;
4661      Initialize_4592;
4662      Initialize_4593;
4663      Initialize_4594;
4664      Initialize_4595;
4665      Initialize_4596;
4666      Initialize_4597;
4667      Initialize_4598;
4668      Initialize_4599;
4669      Initialize_4600;
4670      Initialize_4601;
4671      Initialize_4602;
4672      Initialize_4603;
4673      Initialize_4604;
4674      Initialize_4605;
4675      Initialize_4606;
4676      Initialize_4607;
4677      Initialize_4608;
4678      Initialize_4609;
4679      Initialize_4610;
4680      Initialize_4611;
4681      Initialize_4612;
4682      Initialize_4613;
4683      Initialize_4614;
4684      Initialize_4615;
4685      Initialize_4616;
4686      Initialize_4617;
4687      Initialize_4618;
4688      Initialize_4619;
4689      Initialize_4620;
4690      Initialize_4621;
4691      Initialize_4622;
4692      Initialize_4623;
4693      Initialize_4624;
4694      Initialize_4625;
4695      Initialize_4626;
4696      Initialize_4627;
4697      Initialize_4628;
4698      Initialize_4629;
4699      Initialize_4630;
4700      Initialize_4631;
4701      Initialize_4632;
4702      Initialize_4633;
4703      Initialize_4634;
4704      Initialize_4635;
4705      Initialize_4636;
4706      Initialize_4637;
4707      Initialize_4638;
4708      Initialize_4639;
4709      Initialize_4640;
4710      Initialize_4641;
4711      Initialize_4642;
4712      Initialize_4643;
4713      Initialize_4644;
4714      Initialize_4645;
4715      Initialize_4646;
4716      Initialize_4647;
4717      Initialize_4648;
4718      Initialize_4649;
4719      Initialize_4650;
4720      Initialize_4651;
4721      Initialize_4652;
4722      Initialize_4653;
4723      Initialize_4654;
4724      Initialize_4655;
4725      Initialize_4656;
4726      Initialize_4657;
4727      Initialize_4658;
4728      Initialize_4659;
4729      Initialize_4660;
4730      Initialize_4661;
4731      Initialize_4662;
4732      Initialize_4663;
4733      Initialize_4664;
4734      Initialize_4665;
4735      Initialize_4666;
4736      Initialize_4667;
4737      Initialize_4668;
4738      Initialize_4669;
4739      Initialize_4670;
4740      Initialize_4671;
4741      Initialize_4672;
4742      Initialize_4673;
4743      Initialize_4674;
4744      Initialize_4675;
4745      Initialize_4676;
4746      Initialize_4677;
4747      Initialize_4678;
4748      Initialize_4679;
4749      Initialize_4680;
4750      Initialize_4681;
4751      Initialize_4682;
4752      Initialize_4683;
4753      Initialize_4684;
4754      Initialize_4685;
4755      Initialize_4686;
4756      Initialize_4687;
4757      Initialize_4688;
4758      Initialize_4689;
4759      Initialize_4690;
4760      Initialize_4691;
4761      Initialize_4692;
4762      Initialize_4693;
4763      Initialize_4694;
4764      Initialize_4695;
4765      Initialize_4696;
4766      Initialize_4697;
4767      Initialize_4698;
4768      Initialize_4699;
4769      Initialize_4700;
4770      Initialize_4701;
4771      Initialize_4702;
4772      Initialize_4703;
4773      Initialize_4704;
4774      Initialize_4705;
4775      Initialize_4706;
4776      Initialize_4707;
4777      Initialize_4708;
4778      Initialize_4709;
4779      Initialize_4710;
4780      Initialize_4711;
4781      Initialize_4712;
4782      Initialize_4713;
4783      Initialize_4714;
4784      Initialize_4715;
4785      Initialize_4716;
4786      Initialize_4717;
4787      Initialize_4718;
4788      Initialize_4719;
4789      Initialize_4720;
4790      Initialize_4721;
4791      Initialize_4722;
4792      Initialize_4723;
4793      Initialize_4724;
4794      Initialize_4725;
4795      Initialize_4726;
4796      Initialize_4727;
4797      Initialize_4728;
4798      Initialize_4729;
4799      Initialize_4730;
4800      Initialize_4731;
4801      Initialize_4732;
4802      Initialize_4733;
4803      Initialize_4734;
4804      Initialize_4735;
4805      Initialize_4736;
4806      Initialize_4737;
4807      Initialize_4738;
4808      Initialize_4739;
4809      Initialize_4740;
4810      Initialize_4741;
4811      Initialize_4742;
4812      Initialize_4743;
4813      Initialize_4744;
4814      Initialize_4745;
4815      Initialize_4746;
4816      Initialize_4747;
4817      Initialize_4748;
4818      Initialize_4749;
4819      Initialize_4750;
4820      Initialize_4751;
4821      Initialize_4752;
4822      Initialize_4753;
4823      Initialize_4754;
4824      Initialize_4755;
4825      Initialize_4756;
4826      Initialize_4757;
4827      Initialize_4758;
4828      Initialize_4759;
4829      Initialize_4760;
4830      Initialize_4761;
4831      Initialize_4762;
4832      Initialize_4763;
4833      Initialize_4764;
4834      Initialize_4765;
4835      Initialize_4766;
4836      Initialize_4767;
4837      Initialize_4768;
4838      Initialize_4769;
4839      Initialize_4770;
4840      Initialize_4771;
4841      Initialize_4772;
4842      Initialize_4773;
4843      Initialize_4774;
4844      Initialize_4775;
4845      Initialize_4776;
4846      Initialize_4777;
4847      Initialize_4778;
4848      Initialize_4779;
4849      Initialize_4780;
4850      Initialize_4781;
4851      Initialize_4782;
4852      Initialize_4783;
4853      Initialize_4784;
4854      Initialize_4785;
4855      Initialize_4786;
4856      Initialize_4787;
4857      Initialize_4788;
4858      Initialize_4789;
4859      Initialize_4790;
4860      Initialize_4791;
4861      Initialize_4792;
4862      Initialize_4793;
4863      Initialize_4794;
4864      Initialize_4795;
4865      Initialize_4796;
4866      Initialize_4797;
4867      Initialize_4798;
4868      Initialize_4799;
4869      Initialize_4800;
4870      Initialize_4801;
4871      Initialize_4802;
4872      Initialize_4803;
4873      Initialize_4804;
4874      Initialize_4805;
4875      Initialize_4806;
4876      Initialize_4807;
4877      Initialize_4808;
4878      Initialize_4809;
4879      Initialize_4810;
4880      Initialize_4811;
4881      Initialize_4812;
4882      Initialize_4813;
4883      Initialize_4814;
4884      Initialize_4815;
4885      Initialize_4816;
4886      Initialize_4817;
4887      Initialize_4818;
4888      Initialize_4819;
4889      Initialize_4820;
4890      Initialize_4821;
4891      Initialize_4822;
4892      Initialize_4823;
4893      Initialize_4824;
4894      Initialize_4825;
4895      Initialize_4826;
4896      Initialize_4827;
4897      Initialize_4828;
4898      Initialize_4829;
4899   end Initialize;
4900
4901   ------------------
4902   -- Initialize_1 --
4903   ------------------
4904
4905   procedure Initialize_1 is
4906   begin
4907      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
4908       (Base + 1,
4909        AMF.Internals.Tables.UML_String_Data_05.MS_0599'Access);
4910      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1, (Is_Empty => True));
4911   end Initialize_1;
4912
4913   ------------------
4914   -- Initialize_2 --
4915   ------------------
4916
4917   procedure Initialize_2 is
4918   begin
4919      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
4920       (Base + 2,
4921        AMF.Internals.Tables.UML_String_Data_02.MS_0263'Access);
4922      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2, (Is_Empty => True));
4923   end Initialize_2;
4924
4925   ------------------
4926   -- Initialize_3 --
4927   ------------------
4928
4929   procedure Initialize_3 is
4930   begin
4931      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
4932       (Base + 3,
4933        AMF.Internals.Tables.UML_String_Data_04.MS_0440'Access);
4934      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3, (Is_Empty => True));
4935   end Initialize_3;
4936
4937   ------------------
4938   -- Initialize_4 --
4939   ------------------
4940
4941   procedure Initialize_4 is
4942   begin
4943      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 4, True);
4944      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
4945       (Base + 4,
4946        AMF.Internals.Tables.UML_String_Data_00.MS_00C7'Access);
4947      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4, (Is_Empty => True));
4948   end Initialize_4;
4949
4950   ------------------
4951   -- Initialize_5 --
4952   ------------------
4953
4954   procedure Initialize_5 is
4955   begin
4956      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
4957       (Base + 5,
4958        AMF.Internals.Tables.UML_String_Data_08.MS_086D'Access);
4959      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 5, (Is_Empty => True));
4960   end Initialize_5;
4961
4962   ------------------
4963   -- Initialize_6 --
4964   ------------------
4965
4966   procedure Initialize_6 is
4967   begin
4968      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
4969       (Base + 6,
4970        AMF.Internals.Tables.UML_String_Data_00.MS_0039'Access);
4971      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 6, (Is_Empty => True));
4972   end Initialize_6;
4973
4974   ------------------
4975   -- Initialize_7 --
4976   ------------------
4977
4978   procedure Initialize_7 is
4979   begin
4980      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
4981       (Base + 7,
4982        AMF.Internals.Tables.UML_String_Data_09.MS_098E'Access);
4983      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 7, (Is_Empty => True));
4984   end Initialize_7;
4985
4986   ------------------
4987   -- Initialize_8 --
4988   ------------------
4989
4990   procedure Initialize_8 is
4991   begin
4992      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 8, True);
4993      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
4994       (Base + 8,
4995        AMF.Internals.Tables.UML_String_Data_01.MS_0152'Access);
4996      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 8, (Is_Empty => True));
4997   end Initialize_8;
4998
4999   ------------------
5000   -- Initialize_9 --
5001   ------------------
5002
5003   procedure Initialize_9 is
5004   begin
5005      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5006       (Base + 9,
5007        AMF.Internals.Tables.UML_String_Data_07.MS_07EE'Access);
5008      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 9, (Is_Empty => True));
5009   end Initialize_9;
5010
5011   -------------------
5012   -- Initialize_10 --
5013   -------------------
5014
5015   procedure Initialize_10 is
5016   begin
5017      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 10, True);
5018      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5019       (Base + 10,
5020        AMF.Internals.Tables.UML_String_Data_0C.MS_0C4A'Access);
5021      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 10, (Is_Empty => True));
5022   end Initialize_10;
5023
5024   -------------------
5025   -- Initialize_11 --
5026   -------------------
5027
5028   procedure Initialize_11 is
5029   begin
5030      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 11, True);
5031      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5032       (Base + 11,
5033        AMF.Internals.Tables.UML_String_Data_08.MS_08E6'Access);
5034      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 11, (Is_Empty => True));
5035   end Initialize_11;
5036
5037   -------------------
5038   -- Initialize_12 --
5039   -------------------
5040
5041   procedure Initialize_12 is
5042   begin
5043      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5044       (Base + 12,
5045        AMF.Internals.Tables.UML_String_Data_03.MS_035F'Access);
5046      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 12, (Is_Empty => True));
5047   end Initialize_12;
5048
5049   -------------------
5050   -- Initialize_13 --
5051   -------------------
5052
5053   procedure Initialize_13 is
5054   begin
5055      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5056       (Base + 13,
5057        AMF.Internals.Tables.UML_String_Data_01.MS_0110'Access);
5058      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 13, (Is_Empty => True));
5059   end Initialize_13;
5060
5061   -------------------
5062   -- Initialize_14 --
5063   -------------------
5064
5065   procedure Initialize_14 is
5066   begin
5067      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5068       (Base + 14,
5069        AMF.Internals.Tables.UML_String_Data_0C.MS_0C22'Access);
5070      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 14, (Is_Empty => True));
5071   end Initialize_14;
5072
5073   -------------------
5074   -- Initialize_15 --
5075   -------------------
5076
5077   procedure Initialize_15 is
5078   begin
5079      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5080       (Base + 15,
5081        AMF.Internals.Tables.UML_String_Data_02.MS_02D9'Access);
5082      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 15, (Is_Empty => True));
5083   end Initialize_15;
5084
5085   -------------------
5086   -- Initialize_16 --
5087   -------------------
5088
5089   procedure Initialize_16 is
5090   begin
5091      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5092       (Base + 16,
5093        AMF.Internals.Tables.UML_String_Data_07.MS_0724'Access);
5094      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 16, (Is_Empty => True));
5095   end Initialize_16;
5096
5097   -------------------
5098   -- Initialize_17 --
5099   -------------------
5100
5101   procedure Initialize_17 is
5102   begin
5103      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5104       (Base + 17,
5105        AMF.Internals.Tables.UML_String_Data_09.MS_0944'Access);
5106      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 17, (Is_Empty => True));
5107   end Initialize_17;
5108
5109   -------------------
5110   -- Initialize_18 --
5111   -------------------
5112
5113   procedure Initialize_18 is
5114   begin
5115      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5116       (Base + 18,
5117        AMF.Internals.Tables.UML_String_Data_00.MS_00EC'Access);
5118      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 18, (Is_Empty => True));
5119   end Initialize_18;
5120
5121   -------------------
5122   -- Initialize_19 --
5123   -------------------
5124
5125   procedure Initialize_19 is
5126   begin
5127      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5128       (Base + 19,
5129        AMF.Internals.Tables.UML_String_Data_01.MS_0112'Access);
5130      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 19, (Is_Empty => True));
5131   end Initialize_19;
5132
5133   -------------------
5134   -- Initialize_20 --
5135   -------------------
5136
5137   procedure Initialize_20 is
5138   begin
5139      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5140       (Base + 20,
5141        AMF.Internals.Tables.UML_String_Data_04.MS_0465'Access);
5142      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 20, (Is_Empty => True));
5143   end Initialize_20;
5144
5145   -------------------
5146   -- Initialize_21 --
5147   -------------------
5148
5149   procedure Initialize_21 is
5150   begin
5151      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 21, True);
5152      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5153       (Base + 21,
5154        AMF.Internals.Tables.UML_String_Data_00.MS_00C1'Access);
5155      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 21, (Is_Empty => True));
5156   end Initialize_21;
5157
5158   -------------------
5159   -- Initialize_22 --
5160   -------------------
5161
5162   procedure Initialize_22 is
5163   begin
5164      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5165       (Base + 22,
5166        AMF.Internals.Tables.UML_String_Data_01.MS_01B1'Access);
5167      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 22, (Is_Empty => True));
5168   end Initialize_22;
5169
5170   -------------------
5171   -- Initialize_23 --
5172   -------------------
5173
5174   procedure Initialize_23 is
5175   begin
5176      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 23, True);
5177      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5178       (Base + 23,
5179        AMF.Internals.Tables.UML_String_Data_02.MS_02E2'Access);
5180      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 23, (Is_Empty => True));
5181   end Initialize_23;
5182
5183   -------------------
5184   -- Initialize_24 --
5185   -------------------
5186
5187   procedure Initialize_24 is
5188   begin
5189      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 24, True);
5190      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5191       (Base + 24,
5192        AMF.Internals.Tables.UML_String_Data_07.MS_075C'Access);
5193      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 24, (Is_Empty => True));
5194   end Initialize_24;
5195
5196   -------------------
5197   -- Initialize_25 --
5198   -------------------
5199
5200   procedure Initialize_25 is
5201   begin
5202      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5203       (Base + 25,
5204        AMF.Internals.Tables.UML_String_Data_03.MS_03C9'Access);
5205      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 25, (Is_Empty => True));
5206   end Initialize_25;
5207
5208   -------------------
5209   -- Initialize_26 --
5210   -------------------
5211
5212   procedure Initialize_26 is
5213   begin
5214      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 26, True);
5215      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5216       (Base + 26,
5217        AMF.Internals.Tables.UML_String_Data_00.MS_0000'Access);
5218      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 26, (Is_Empty => True));
5219   end Initialize_26;
5220
5221   -------------------
5222   -- Initialize_27 --
5223   -------------------
5224
5225   procedure Initialize_27 is
5226   begin
5227      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5228       (Base + 27,
5229        AMF.Internals.Tables.UML_String_Data_0B.MS_0BA6'Access);
5230      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 27, (Is_Empty => True));
5231   end Initialize_27;
5232
5233   -------------------
5234   -- Initialize_28 --
5235   -------------------
5236
5237   procedure Initialize_28 is
5238   begin
5239      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5240       (Base + 28,
5241        AMF.Internals.Tables.UML_String_Data_0A.MS_0ADB'Access);
5242      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 28, (Is_Empty => True));
5243   end Initialize_28;
5244
5245   -------------------
5246   -- Initialize_29 --
5247   -------------------
5248
5249   procedure Initialize_29 is
5250   begin
5251      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5252       (Base + 29,
5253        AMF.Internals.Tables.UML_String_Data_05.MS_05A2'Access);
5254      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 29, (Is_Empty => True));
5255   end Initialize_29;
5256
5257   -------------------
5258   -- Initialize_30 --
5259   -------------------
5260
5261   procedure Initialize_30 is
5262   begin
5263      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5264       (Base + 30,
5265        AMF.Internals.Tables.UML_String_Data_01.MS_01D9'Access);
5266      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 30, (Is_Empty => True));
5267   end Initialize_30;
5268
5269   -------------------
5270   -- Initialize_31 --
5271   -------------------
5272
5273   procedure Initialize_31 is
5274   begin
5275      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5276       (Base + 31,
5277        AMF.Internals.Tables.UML_String_Data_0B.MS_0B9E'Access);
5278      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 31, (Is_Empty => True));
5279   end Initialize_31;
5280
5281   -------------------
5282   -- Initialize_32 --
5283   -------------------
5284
5285   procedure Initialize_32 is
5286   begin
5287      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5288       (Base + 32,
5289        AMF.Internals.Tables.UML_String_Data_0C.MS_0C8B'Access);
5290      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 32, (Is_Empty => True));
5291   end Initialize_32;
5292
5293   -------------------
5294   -- Initialize_33 --
5295   -------------------
5296
5297   procedure Initialize_33 is
5298   begin
5299      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 33, True);
5300      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5301       (Base + 33,
5302        AMF.Internals.Tables.UML_String_Data_01.MS_0129'Access);
5303      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 33, (Is_Empty => True));
5304   end Initialize_33;
5305
5306   -------------------
5307   -- Initialize_34 --
5308   -------------------
5309
5310   procedure Initialize_34 is
5311   begin
5312      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5313       (Base + 34,
5314        AMF.Internals.Tables.UML_String_Data_07.MS_073B'Access);
5315      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 34, (Is_Empty => True));
5316   end Initialize_34;
5317
5318   -------------------
5319   -- Initialize_35 --
5320   -------------------
5321
5322   procedure Initialize_35 is
5323   begin
5324      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5325       (Base + 35,
5326        AMF.Internals.Tables.UML_String_Data_09.MS_0931'Access);
5327      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 35, (Is_Empty => True));
5328   end Initialize_35;
5329
5330   -------------------
5331   -- Initialize_36 --
5332   -------------------
5333
5334   procedure Initialize_36 is
5335   begin
5336      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5337       (Base + 36,
5338        AMF.Internals.Tables.UML_String_Data_06.MS_062B'Access);
5339      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 36, (Is_Empty => True));
5340   end Initialize_36;
5341
5342   -------------------
5343   -- Initialize_37 --
5344   -------------------
5345
5346   procedure Initialize_37 is
5347   begin
5348      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5349       (Base + 37,
5350        AMF.Internals.Tables.UML_String_Data_0B.MS_0B33'Access);
5351      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 37, (Is_Empty => True));
5352   end Initialize_37;
5353
5354   -------------------
5355   -- Initialize_38 --
5356   -------------------
5357
5358   procedure Initialize_38 is
5359   begin
5360      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5361       (Base + 38,
5362        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD6'Access);
5363      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 38, (Is_Empty => True));
5364   end Initialize_38;
5365
5366   -------------------
5367   -- Initialize_39 --
5368   -------------------
5369
5370   procedure Initialize_39 is
5371   begin
5372      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5373       (Base + 39,
5374        AMF.Internals.Tables.UML_String_Data_07.MS_0797'Access);
5375      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 39, (Is_Empty => True));
5376   end Initialize_39;
5377
5378   -------------------
5379   -- Initialize_40 --
5380   -------------------
5381
5382   procedure Initialize_40 is
5383   begin
5384      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5385       (Base + 40,
5386        AMF.Internals.Tables.UML_String_Data_05.MS_0543'Access);
5387      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 40, (Is_Empty => True));
5388   end Initialize_40;
5389
5390   -------------------
5391   -- Initialize_41 --
5392   -------------------
5393
5394   procedure Initialize_41 is
5395   begin
5396      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5397       (Base + 41,
5398        AMF.Internals.Tables.UML_String_Data_05.MS_0523'Access);
5399      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 41, (Is_Empty => True));
5400   end Initialize_41;
5401
5402   -------------------
5403   -- Initialize_42 --
5404   -------------------
5405
5406   procedure Initialize_42 is
5407   begin
5408      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5409       (Base + 42,
5410        AMF.Internals.Tables.UML_String_Data_09.MS_09DB'Access);
5411      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 42, (Is_Empty => True));
5412   end Initialize_42;
5413
5414   -------------------
5415   -- Initialize_43 --
5416   -------------------
5417
5418   procedure Initialize_43 is
5419   begin
5420      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5421       (Base + 43,
5422        AMF.Internals.Tables.UML_String_Data_00.MS_0009'Access);
5423      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 43, (Is_Empty => True));
5424   end Initialize_43;
5425
5426   -------------------
5427   -- Initialize_44 --
5428   -------------------
5429
5430   procedure Initialize_44 is
5431   begin
5432      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5433       (Base + 44,
5434        AMF.Internals.Tables.UML_String_Data_01.MS_0116'Access);
5435      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 44, (Is_Empty => True));
5436   end Initialize_44;
5437
5438   -------------------
5439   -- Initialize_45 --
5440   -------------------
5441
5442   procedure Initialize_45 is
5443   begin
5444      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5445       (Base + 45,
5446        AMF.Internals.Tables.UML_String_Data_03.MS_03C7'Access);
5447      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 45, (Is_Empty => True));
5448   end Initialize_45;
5449
5450   -------------------
5451   -- Initialize_46 --
5452   -------------------
5453
5454   procedure Initialize_46 is
5455   begin
5456      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5457       (Base + 46,
5458        AMF.Internals.Tables.UML_String_Data_0B.MS_0B7B'Access);
5459      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 46, (Is_Empty => True));
5460   end Initialize_46;
5461
5462   -------------------
5463   -- Initialize_47 --
5464   -------------------
5465
5466   procedure Initialize_47 is
5467   begin
5468      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 47, True);
5469      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5470       (Base + 47,
5471        AMF.Internals.Tables.UML_String_Data_07.MS_074B'Access);
5472      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 47, (Is_Empty => True));
5473   end Initialize_47;
5474
5475   -------------------
5476   -- Initialize_48 --
5477   -------------------
5478
5479   procedure Initialize_48 is
5480   begin
5481      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5482       (Base + 48,
5483        AMF.Internals.Tables.UML_String_Data_04.MS_0484'Access);
5484      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 48, (Is_Empty => True));
5485   end Initialize_48;
5486
5487   -------------------
5488   -- Initialize_49 --
5489   -------------------
5490
5491   procedure Initialize_49 is
5492   begin
5493      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5494       (Base + 49,
5495        AMF.Internals.Tables.UML_String_Data_09.MS_09C9'Access);
5496      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 49, (Is_Empty => True));
5497   end Initialize_49;
5498
5499   -------------------
5500   -- Initialize_50 --
5501   -------------------
5502
5503   procedure Initialize_50 is
5504   begin
5505      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5506       (Base + 50,
5507        AMF.Internals.Tables.UML_String_Data_01.MS_01F2'Access);
5508      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 50, (Is_Empty => True));
5509   end Initialize_50;
5510
5511   -------------------
5512   -- Initialize_51 --
5513   -------------------
5514
5515   procedure Initialize_51 is
5516   begin
5517      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5518       (Base + 51,
5519        AMF.Internals.Tables.UML_String_Data_03.MS_03C8'Access);
5520      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 51, (Is_Empty => True));
5521   end Initialize_51;
5522
5523   -------------------
5524   -- Initialize_52 --
5525   -------------------
5526
5527   procedure Initialize_52 is
5528   begin
5529      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5530       (Base + 52,
5531        AMF.Internals.Tables.UML_String_Data_05.MS_0574'Access);
5532      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 52, (Is_Empty => True));
5533   end Initialize_52;
5534
5535   -------------------
5536   -- Initialize_53 --
5537   -------------------
5538
5539   procedure Initialize_53 is
5540   begin
5541      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5542       (Base + 53,
5543        AMF.Internals.Tables.UML_String_Data_08.MS_087F'Access);
5544      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 53, (Is_Empty => True));
5545   end Initialize_53;
5546
5547   -------------------
5548   -- Initialize_54 --
5549   -------------------
5550
5551   procedure Initialize_54 is
5552   begin
5553      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5554       (Base + 54,
5555        AMF.Internals.Tables.UML_String_Data_03.MS_03B1'Access);
5556      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 54, (Is_Empty => True));
5557   end Initialize_54;
5558
5559   -------------------
5560   -- Initialize_55 --
5561   -------------------
5562
5563   procedure Initialize_55 is
5564   begin
5565      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5566       (Base + 55,
5567        AMF.Internals.Tables.UML_String_Data_04.MS_0490'Access);
5568      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 55, (Is_Empty => True));
5569   end Initialize_55;
5570
5571   -------------------
5572   -- Initialize_56 --
5573   -------------------
5574
5575   procedure Initialize_56 is
5576   begin
5577      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 56, True);
5578      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5579       (Base + 56,
5580        AMF.Internals.Tables.UML_String_Data_05.MS_053E'Access);
5581      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 56, (Is_Empty => True));
5582   end Initialize_56;
5583
5584   -------------------
5585   -- Initialize_57 --
5586   -------------------
5587
5588   procedure Initialize_57 is
5589   begin
5590      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5591       (Base + 57,
5592        AMF.Internals.Tables.UML_String_Data_03.MS_035D'Access);
5593      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 57, (Is_Empty => True));
5594   end Initialize_57;
5595
5596   -------------------
5597   -- Initialize_58 --
5598   -------------------
5599
5600   procedure Initialize_58 is
5601   begin
5602      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5603       (Base + 58,
5604        AMF.Internals.Tables.UML_String_Data_0A.MS_0AEC'Access);
5605      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 58, (Is_Empty => True));
5606   end Initialize_58;
5607
5608   -------------------
5609   -- Initialize_59 --
5610   -------------------
5611
5612   procedure Initialize_59 is
5613   begin
5614      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5615       (Base + 59,
5616        AMF.Internals.Tables.UML_String_Data_07.MS_07D4'Access);
5617      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 59, (Is_Empty => True));
5618   end Initialize_59;
5619
5620   -------------------
5621   -- Initialize_60 --
5622   -------------------
5623
5624   procedure Initialize_60 is
5625   begin
5626      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5627       (Base + 60,
5628        AMF.Internals.Tables.UML_String_Data_09.MS_09B1'Access);
5629      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 60, (Is_Empty => True));
5630   end Initialize_60;
5631
5632   -------------------
5633   -- Initialize_61 --
5634   -------------------
5635
5636   procedure Initialize_61 is
5637   begin
5638      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5639       (Base + 61,
5640        AMF.Internals.Tables.UML_String_Data_08.MS_08A0'Access);
5641      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 61, (Is_Empty => True));
5642   end Initialize_61;
5643
5644   -------------------
5645   -- Initialize_62 --
5646   -------------------
5647
5648   procedure Initialize_62 is
5649   begin
5650      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5651       (Base + 62,
5652        AMF.Internals.Tables.UML_String_Data_03.MS_0387'Access);
5653      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 62, (Is_Empty => True));
5654   end Initialize_62;
5655
5656   -------------------
5657   -- Initialize_63 --
5658   -------------------
5659
5660   procedure Initialize_63 is
5661   begin
5662      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5663       (Base + 63,
5664        AMF.Internals.Tables.UML_String_Data_01.MS_0191'Access);
5665      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 63, (Is_Empty => True));
5666   end Initialize_63;
5667
5668   -------------------
5669   -- Initialize_64 --
5670   -------------------
5671
5672   procedure Initialize_64 is
5673   begin
5674      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 64, True);
5675      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5676       (Base + 64,
5677        AMF.Internals.Tables.UML_String_Data_0B.MS_0B46'Access);
5678      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 64, (Is_Empty => True));
5679   end Initialize_64;
5680
5681   -------------------
5682   -- Initialize_65 --
5683   -------------------
5684
5685   procedure Initialize_65 is
5686   begin
5687      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5688       (Base + 65,
5689        AMF.Internals.Tables.UML_String_Data_0A.MS_0AAE'Access);
5690      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 65, (Is_Empty => True));
5691   end Initialize_65;
5692
5693   -------------------
5694   -- Initialize_66 --
5695   -------------------
5696
5697   procedure Initialize_66 is
5698   begin
5699      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5700       (Base + 66,
5701        AMF.Internals.Tables.UML_String_Data_01.MS_0193'Access);
5702      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 66, (Is_Empty => True));
5703   end Initialize_66;
5704
5705   -------------------
5706   -- Initialize_67 --
5707   -------------------
5708
5709   procedure Initialize_67 is
5710   begin
5711      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 67, True);
5712      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5713       (Base + 67,
5714        AMF.Internals.Tables.UML_String_Data_00.MS_0072'Access);
5715      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 67, (Is_Empty => True));
5716   end Initialize_67;
5717
5718   -------------------
5719   -- Initialize_68 --
5720   -------------------
5721
5722   procedure Initialize_68 is
5723   begin
5724      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5725       (Base + 68,
5726        AMF.Internals.Tables.UML_String_Data_03.MS_0319'Access);
5727      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 68, (Is_Empty => True));
5728   end Initialize_68;
5729
5730   -------------------
5731   -- Initialize_69 --
5732   -------------------
5733
5734   procedure Initialize_69 is
5735   begin
5736      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5737       (Base + 69,
5738        AMF.Internals.Tables.UML_String_Data_06.MS_06E7'Access);
5739      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 69, (Is_Empty => True));
5740   end Initialize_69;
5741
5742   -------------------
5743   -- Initialize_70 --
5744   -------------------
5745
5746   procedure Initialize_70 is
5747   begin
5748      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5749       (Base + 70,
5750        AMF.Internals.Tables.UML_String_Data_06.MS_066E'Access);
5751      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 70, (Is_Empty => True));
5752   end Initialize_70;
5753
5754   -------------------
5755   -- Initialize_71 --
5756   -------------------
5757
5758   procedure Initialize_71 is
5759   begin
5760      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5761       (Base + 71,
5762        AMF.Internals.Tables.UML_String_Data_0A.MS_0A4C'Access);
5763      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 71, (Is_Empty => True));
5764   end Initialize_71;
5765
5766   -------------------
5767   -- Initialize_72 --
5768   -------------------
5769
5770   procedure Initialize_72 is
5771   begin
5772      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 72, True);
5773      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5774       (Base + 72,
5775        AMF.Internals.Tables.UML_String_Data_08.MS_08B7'Access);
5776      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 72, (Is_Empty => True));
5777   end Initialize_72;
5778
5779   -------------------
5780   -- Initialize_73 --
5781   -------------------
5782
5783   procedure Initialize_73 is
5784   begin
5785      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5786       (Base + 73,
5787        AMF.Internals.Tables.UML_String_Data_0A.MS_0A45'Access);
5788      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 73, (Is_Empty => True));
5789   end Initialize_73;
5790
5791   -------------------
5792   -- Initialize_74 --
5793   -------------------
5794
5795   procedure Initialize_74 is
5796   begin
5797      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5798       (Base + 74,
5799        AMF.Internals.Tables.UML_String_Data_0C.MS_0C66'Access);
5800      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 74, (Is_Empty => True));
5801   end Initialize_74;
5802
5803   -------------------
5804   -- Initialize_75 --
5805   -------------------
5806
5807   procedure Initialize_75 is
5808   begin
5809      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5810       (Base + 75,
5811        AMF.Internals.Tables.UML_String_Data_06.MS_061C'Access);
5812      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 75, (Is_Empty => True));
5813   end Initialize_75;
5814
5815   -------------------
5816   -- Initialize_76 --
5817   -------------------
5818
5819   procedure Initialize_76 is
5820   begin
5821      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5822       (Base + 76,
5823        AMF.Internals.Tables.UML_String_Data_01.MS_015D'Access);
5824      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 76, (Is_Empty => True));
5825   end Initialize_76;
5826
5827   -------------------
5828   -- Initialize_77 --
5829   -------------------
5830
5831   procedure Initialize_77 is
5832   begin
5833      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 77, True);
5834      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5835       (Base + 77,
5836        AMF.Internals.Tables.UML_String_Data_02.MS_0258'Access);
5837      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 77, (Is_Empty => True));
5838   end Initialize_77;
5839
5840   -------------------
5841   -- Initialize_78 --
5842   -------------------
5843
5844   procedure Initialize_78 is
5845   begin
5846      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5847       (Base + 78,
5848        AMF.Internals.Tables.UML_String_Data_08.MS_083D'Access);
5849      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 78, (Is_Empty => True));
5850   end Initialize_78;
5851
5852   -------------------
5853   -- Initialize_79 --
5854   -------------------
5855
5856   procedure Initialize_79 is
5857   begin
5858      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 79, True);
5859      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5860       (Base + 79,
5861        AMF.Internals.Tables.UML_String_Data_01.MS_01B9'Access);
5862      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 79, (Is_Empty => True));
5863   end Initialize_79;
5864
5865   -------------------
5866   -- Initialize_80 --
5867   -------------------
5868
5869   procedure Initialize_80 is
5870   begin
5871      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5872       (Base + 80,
5873        AMF.Internals.Tables.UML_String_Data_03.MS_0334'Access);
5874      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 80, (Is_Empty => True));
5875   end Initialize_80;
5876
5877   -------------------
5878   -- Initialize_81 --
5879   -------------------
5880
5881   procedure Initialize_81 is
5882   begin
5883      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5884       (Base + 81,
5885        AMF.Internals.Tables.UML_String_Data_02.MS_02DE'Access);
5886      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 81, (Is_Empty => True));
5887   end Initialize_81;
5888
5889   -------------------
5890   -- Initialize_82 --
5891   -------------------
5892
5893   procedure Initialize_82 is
5894   begin
5895      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 82, True);
5896      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5897       (Base + 82,
5898        AMF.Internals.Tables.UML_String_Data_09.MS_0987'Access);
5899      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 82, (Is_Empty => True));
5900   end Initialize_82;
5901
5902   -------------------
5903   -- Initialize_83 --
5904   -------------------
5905
5906   procedure Initialize_83 is
5907   begin
5908      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5909       (Base + 83,
5910        AMF.Internals.Tables.UML_String_Data_04.MS_04E3'Access);
5911      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 83, (Is_Empty => True));
5912   end Initialize_83;
5913
5914   -------------------
5915   -- Initialize_84 --
5916   -------------------
5917
5918   procedure Initialize_84 is
5919   begin
5920      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 84, True);
5921      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5922       (Base + 84,
5923        AMF.Internals.Tables.UML_String_Data_00.MS_0019'Access);
5924      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 84, (Is_Empty => True));
5925   end Initialize_84;
5926
5927   -------------------
5928   -- Initialize_85 --
5929   -------------------
5930
5931   procedure Initialize_85 is
5932   begin
5933      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5934       (Base + 85,
5935        AMF.Internals.Tables.UML_String_Data_0B.MS_0B78'Access);
5936      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 85, (Is_Empty => True));
5937   end Initialize_85;
5938
5939   -------------------
5940   -- Initialize_86 --
5941   -------------------
5942
5943   procedure Initialize_86 is
5944   begin
5945      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5946       (Base + 86,
5947        AMF.Internals.Tables.UML_String_Data_0B.MS_0B2E'Access);
5948      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 86, (Is_Empty => True));
5949   end Initialize_86;
5950
5951   -------------------
5952   -- Initialize_87 --
5953   -------------------
5954
5955   procedure Initialize_87 is
5956   begin
5957      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 87, True);
5958      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5959       (Base + 87,
5960        AMF.Internals.Tables.UML_String_Data_03.MS_036C'Access);
5961      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 87, (Is_Empty => True));
5962   end Initialize_87;
5963
5964   -------------------
5965   -- Initialize_88 --
5966   -------------------
5967
5968   procedure Initialize_88 is
5969   begin
5970      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5971       (Base + 88,
5972        AMF.Internals.Tables.UML_String_Data_05.MS_052E'Access);
5973      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 88, (Is_Empty => True));
5974   end Initialize_88;
5975
5976   -------------------
5977   -- Initialize_89 --
5978   -------------------
5979
5980   procedure Initialize_89 is
5981   begin
5982      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5983       (Base + 89,
5984        AMF.Internals.Tables.UML_String_Data_00.MS_0030'Access);
5985      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 89, (Is_Empty => True));
5986   end Initialize_89;
5987
5988   -------------------
5989   -- Initialize_90 --
5990   -------------------
5991
5992   procedure Initialize_90 is
5993   begin
5994      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
5995       (Base + 90,
5996        AMF.Internals.Tables.UML_String_Data_07.MS_0717'Access);
5997      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 90, (Is_Empty => True));
5998   end Initialize_90;
5999
6000   -------------------
6001   -- Initialize_91 --
6002   -------------------
6003
6004   procedure Initialize_91 is
6005   begin
6006      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6007       (Base + 91,
6008        AMF.Internals.Tables.UML_String_Data_08.MS_0802'Access);
6009      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 91, (Is_Empty => True));
6010   end Initialize_91;
6011
6012   -------------------
6013   -- Initialize_92 --
6014   -------------------
6015
6016   procedure Initialize_92 is
6017   begin
6018      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6019       (Base + 92,
6020        AMF.Internals.Tables.UML_String_Data_06.MS_06E9'Access);
6021      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 92, (Is_Empty => True));
6022   end Initialize_92;
6023
6024   -------------------
6025   -- Initialize_93 --
6026   -------------------
6027
6028   procedure Initialize_93 is
6029   begin
6030      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6031       (Base + 93,
6032        AMF.Internals.Tables.UML_String_Data_09.MS_0915'Access);
6033      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 93, (Is_Empty => True));
6034   end Initialize_93;
6035
6036   -------------------
6037   -- Initialize_94 --
6038   -------------------
6039
6040   procedure Initialize_94 is
6041   begin
6042      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6043       (Base + 94,
6044        AMF.Internals.Tables.UML_String_Data_04.MS_04ED'Access);
6045      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 94, (Is_Empty => True));
6046   end Initialize_94;
6047
6048   -------------------
6049   -- Initialize_95 --
6050   -------------------
6051
6052   procedure Initialize_95 is
6053   begin
6054      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 95, True);
6055      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6056       (Base + 95,
6057        AMF.Internals.Tables.UML_String_Data_0C.MS_0C2F'Access);
6058      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 95, (Is_Empty => True));
6059   end Initialize_95;
6060
6061   -------------------
6062   -- Initialize_96 --
6063   -------------------
6064
6065   procedure Initialize_96 is
6066   begin
6067      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 96, True);
6068      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6069       (Base + 96,
6070        AMF.Internals.Tables.UML_String_Data_07.MS_071F'Access);
6071      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 96, (Is_Empty => True));
6072   end Initialize_96;
6073
6074   -------------------
6075   -- Initialize_97 --
6076   -------------------
6077
6078   procedure Initialize_97 is
6079   begin
6080      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6081       (Base + 97,
6082        AMF.Internals.Tables.UML_String_Data_02.MS_02EF'Access);
6083      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 97, (Is_Empty => True));
6084   end Initialize_97;
6085
6086   -------------------
6087   -- Initialize_98 --
6088   -------------------
6089
6090   procedure Initialize_98 is
6091   begin
6092      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6093       (Base + 98,
6094        AMF.Internals.Tables.UML_String_Data_06.MS_06DA'Access);
6095      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 98, (Is_Empty => True));
6096   end Initialize_98;
6097
6098   -------------------
6099   -- Initialize_99 --
6100   -------------------
6101
6102   procedure Initialize_99 is
6103   begin
6104      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6105       (Base + 99,
6106        AMF.Internals.Tables.UML_String_Data_08.MS_08D1'Access);
6107      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 99, (Is_Empty => True));
6108   end Initialize_99;
6109
6110   --------------------
6111   -- Initialize_100 --
6112   --------------------
6113
6114   procedure Initialize_100 is
6115   begin
6116      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6117       (Base + 100,
6118        AMF.Internals.Tables.UML_String_Data_08.MS_087E'Access);
6119      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 100, (Is_Empty => True));
6120   end Initialize_100;
6121
6122   --------------------
6123   -- Initialize_101 --
6124   --------------------
6125
6126   procedure Initialize_101 is
6127   begin
6128      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6129       (Base + 101,
6130        AMF.Internals.Tables.UML_String_Data_03.MS_031E'Access);
6131      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 101, (Is_Empty => True));
6132   end Initialize_101;
6133
6134   --------------------
6135   -- Initialize_102 --
6136   --------------------
6137
6138   procedure Initialize_102 is
6139   begin
6140      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6141       (Base + 102,
6142        AMF.Internals.Tables.UML_String_Data_01.MS_01C7'Access);
6143      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 102, (Is_Empty => True));
6144   end Initialize_102;
6145
6146   --------------------
6147   -- Initialize_103 --
6148   --------------------
6149
6150   procedure Initialize_103 is
6151   begin
6152      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6153       (Base + 103,
6154        AMF.Internals.Tables.UML_String_Data_08.MS_08C2'Access);
6155      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 103, (Is_Empty => True));
6156   end Initialize_103;
6157
6158   --------------------
6159   -- Initialize_104 --
6160   --------------------
6161
6162   procedure Initialize_104 is
6163   begin
6164      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6165       (Base + 104,
6166        AMF.Internals.Tables.UML_String_Data_05.MS_0504'Access);
6167      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 104, (Is_Empty => True));
6168   end Initialize_104;
6169
6170   --------------------
6171   -- Initialize_105 --
6172   --------------------
6173
6174   procedure Initialize_105 is
6175   begin
6176      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6177       (Base + 105,
6178        AMF.Internals.Tables.UML_String_Data_0A.MS_0AA8'Access);
6179      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 105, (Is_Empty => True));
6180   end Initialize_105;
6181
6182   --------------------
6183   -- Initialize_106 --
6184   --------------------
6185
6186   procedure Initialize_106 is
6187   begin
6188      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6189       (Base + 106,
6190        AMF.Internals.Tables.UML_String_Data_02.MS_02DF'Access);
6191      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 106, (Is_Empty => True));
6192   end Initialize_106;
6193
6194   --------------------
6195   -- Initialize_107 --
6196   --------------------
6197
6198   procedure Initialize_107 is
6199   begin
6200      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6201       (Base + 107,
6202        AMF.Internals.Tables.UML_String_Data_02.MS_023E'Access);
6203      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 107, (Is_Empty => True));
6204   end Initialize_107;
6205
6206   --------------------
6207   -- Initialize_108 --
6208   --------------------
6209
6210   procedure Initialize_108 is
6211   begin
6212      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6213       (Base + 108,
6214        AMF.Internals.Tables.UML_String_Data_01.MS_0184'Access);
6215      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 108, (Is_Empty => True));
6216   end Initialize_108;
6217
6218   --------------------
6219   -- Initialize_109 --
6220   --------------------
6221
6222   procedure Initialize_109 is
6223   begin
6224      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6225       (Base + 109,
6226        AMF.Internals.Tables.UML_String_Data_09.MS_0952'Access);
6227      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 109, (Is_Empty => True));
6228   end Initialize_109;
6229
6230   --------------------
6231   -- Initialize_110 --
6232   --------------------
6233
6234   procedure Initialize_110 is
6235   begin
6236      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6237       (Base + 110,
6238        AMF.Internals.Tables.UML_String_Data_02.MS_02A4'Access);
6239      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 110, (Is_Empty => True));
6240   end Initialize_110;
6241
6242   --------------------
6243   -- Initialize_111 --
6244   --------------------
6245
6246   procedure Initialize_111 is
6247   begin
6248      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6249       (Base + 111,
6250        AMF.Internals.Tables.UML_String_Data_07.MS_0704'Access);
6251      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 111, (Is_Empty => True));
6252   end Initialize_111;
6253
6254   --------------------
6255   -- Initialize_112 --
6256   --------------------
6257
6258   procedure Initialize_112 is
6259   begin
6260      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6261       (Base + 112,
6262        AMF.Internals.Tables.UML_String_Data_09.MS_098D'Access);
6263      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 112, (Is_Empty => True));
6264   end Initialize_112;
6265
6266   --------------------
6267   -- Initialize_113 --
6268   --------------------
6269
6270   procedure Initialize_113 is
6271   begin
6272      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6273       (Base + 113,
6274        AMF.Internals.Tables.UML_String_Data_09.MS_09C0'Access);
6275      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 113, (Is_Empty => True));
6276   end Initialize_113;
6277
6278   --------------------
6279   -- Initialize_114 --
6280   --------------------
6281
6282   procedure Initialize_114 is
6283   begin
6284      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6285       (Base + 114,
6286        AMF.Internals.Tables.UML_String_Data_00.MS_006A'Access);
6287      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 114, (Is_Empty => True));
6288   end Initialize_114;
6289
6290   --------------------
6291   -- Initialize_115 --
6292   --------------------
6293
6294   procedure Initialize_115 is
6295   begin
6296      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 115, True);
6297      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6298       (Base + 115,
6299        AMF.Internals.Tables.UML_String_Data_03.MS_032A'Access);
6300      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 115, (Is_Empty => True));
6301   end Initialize_115;
6302
6303   --------------------
6304   -- Initialize_116 --
6305   --------------------
6306
6307   procedure Initialize_116 is
6308   begin
6309      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6310       (Base + 116,
6311        AMF.Internals.Tables.UML_String_Data_08.MS_088C'Access);
6312      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 116, (Is_Empty => True));
6313   end Initialize_116;
6314
6315   --------------------
6316   -- Initialize_117 --
6317   --------------------
6318
6319   procedure Initialize_117 is
6320   begin
6321      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6322       (Base + 117,
6323        AMF.Internals.Tables.UML_String_Data_08.MS_08C6'Access);
6324      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 117, (Is_Empty => True));
6325   end Initialize_117;
6326
6327   --------------------
6328   -- Initialize_118 --
6329   --------------------
6330
6331   procedure Initialize_118 is
6332   begin
6333      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6334       (Base + 118,
6335        AMF.Internals.Tables.UML_String_Data_08.MS_089C'Access);
6336      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 118, (Is_Empty => True));
6337   end Initialize_118;
6338
6339   --------------------
6340   -- Initialize_119 --
6341   --------------------
6342
6343   procedure Initialize_119 is
6344   begin
6345      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6346       (Base + 119,
6347        AMF.Internals.Tables.UML_String_Data_00.MS_0027'Access);
6348      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 119, (Is_Empty => True));
6349   end Initialize_119;
6350
6351   --------------------
6352   -- Initialize_120 --
6353   --------------------
6354
6355   procedure Initialize_120 is
6356   begin
6357      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6358       (Base + 120,
6359        AMF.Internals.Tables.UML_String_Data_02.MS_020B'Access);
6360      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 120, (Is_Empty => True));
6361   end Initialize_120;
6362
6363   --------------------
6364   -- Initialize_121 --
6365   --------------------
6366
6367   procedure Initialize_121 is
6368   begin
6369      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6370       (Base + 121,
6371        AMF.Internals.Tables.UML_String_Data_0B.MS_0BC0'Access);
6372      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 121, (Is_Empty => True));
6373   end Initialize_121;
6374
6375   --------------------
6376   -- Initialize_122 --
6377   --------------------
6378
6379   procedure Initialize_122 is
6380   begin
6381      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6382       (Base + 122,
6383        AMF.Internals.Tables.UML_String_Data_05.MS_05A0'Access);
6384      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 122, (Is_Empty => True));
6385   end Initialize_122;
6386
6387   --------------------
6388   -- Initialize_123 --
6389   --------------------
6390
6391   procedure Initialize_123 is
6392   begin
6393      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 123, True);
6394      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6395       (Base + 123,
6396        AMF.Internals.Tables.UML_String_Data_06.MS_065E'Access);
6397      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 123, (Is_Empty => True));
6398   end Initialize_123;
6399
6400   --------------------
6401   -- Initialize_124 --
6402   --------------------
6403
6404   procedure Initialize_124 is
6405   begin
6406      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6407       (Base + 124,
6408        AMF.Internals.Tables.UML_String_Data_01.MS_0163'Access);
6409      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 124, (Is_Empty => True));
6410   end Initialize_124;
6411
6412   --------------------
6413   -- Initialize_125 --
6414   --------------------
6415
6416   procedure Initialize_125 is
6417   begin
6418      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6419       (Base + 125,
6420        AMF.Internals.Tables.UML_String_Data_04.MS_04FF'Access);
6421      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 125, (Is_Empty => True));
6422   end Initialize_125;
6423
6424   --------------------
6425   -- Initialize_126 --
6426   --------------------
6427
6428   procedure Initialize_126 is
6429   begin
6430      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 126, True);
6431      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6432       (Base + 126,
6433        AMF.Internals.Tables.UML_String_Data_09.MS_096C'Access);
6434      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 126, (Is_Empty => True));
6435   end Initialize_126;
6436
6437   --------------------
6438   -- Initialize_127 --
6439   --------------------
6440
6441   procedure Initialize_127 is
6442   begin
6443      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6444       (Base + 127,
6445        AMF.Internals.Tables.UML_String_Data_01.MS_01CA'Access);
6446      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 127, (Is_Empty => True));
6447   end Initialize_127;
6448
6449   --------------------
6450   -- Initialize_128 --
6451   --------------------
6452
6453   procedure Initialize_128 is
6454   begin
6455      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6456       (Base + 128,
6457        AMF.Internals.Tables.UML_String_Data_02.MS_0238'Access);
6458      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 128, (Is_Empty => True));
6459   end Initialize_128;
6460
6461   --------------------
6462   -- Initialize_129 --
6463   --------------------
6464
6465   procedure Initialize_129 is
6466   begin
6467      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6468       (Base + 129,
6469        AMF.Internals.Tables.UML_String_Data_05.MS_05BA'Access);
6470      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 129, (Is_Empty => True));
6471   end Initialize_129;
6472
6473   --------------------
6474   -- Initialize_130 --
6475   --------------------
6476
6477   procedure Initialize_130 is
6478   begin
6479      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6480       (Base + 130,
6481        AMF.Internals.Tables.UML_String_Data_07.MS_071C'Access);
6482      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 130, (Is_Empty => True));
6483   end Initialize_130;
6484
6485   --------------------
6486   -- Initialize_131 --
6487   --------------------
6488
6489   procedure Initialize_131 is
6490   begin
6491      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6492       (Base + 131,
6493        AMF.Internals.Tables.UML_String_Data_0C.MS_0C3F'Access);
6494      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 131, (Is_Empty => True));
6495   end Initialize_131;
6496
6497   --------------------
6498   -- Initialize_132 --
6499   --------------------
6500
6501   procedure Initialize_132 is
6502   begin
6503      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6504       (Base + 132,
6505        AMF.Internals.Tables.UML_String_Data_04.MS_0407'Access);
6506      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 132, (Is_Empty => True));
6507   end Initialize_132;
6508
6509   --------------------
6510   -- Initialize_133 --
6511   --------------------
6512
6513   procedure Initialize_133 is
6514   begin
6515      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6516       (Base + 133,
6517        AMF.Internals.Tables.UML_String_Data_0C.MS_0C47'Access);
6518      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 133, (Is_Empty => True));
6519   end Initialize_133;
6520
6521   --------------------
6522   -- Initialize_134 --
6523   --------------------
6524
6525   procedure Initialize_134 is
6526   begin
6527      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 134, True);
6528      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6529       (Base + 134,
6530        AMF.Internals.Tables.UML_String_Data_05.MS_05DA'Access);
6531      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 134, (Is_Empty => True));
6532   end Initialize_134;
6533
6534   --------------------
6535   -- Initialize_135 --
6536   --------------------
6537
6538   procedure Initialize_135 is
6539   begin
6540      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6541       (Base + 135,
6542        AMF.Internals.Tables.UML_String_Data_07.MS_074F'Access);
6543      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 135, (Is_Empty => True));
6544   end Initialize_135;
6545
6546   --------------------
6547   -- Initialize_136 --
6548   --------------------
6549
6550   procedure Initialize_136 is
6551   begin
6552      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6553       (Base + 136,
6554        AMF.Internals.Tables.UML_String_Data_09.MS_093F'Access);
6555      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 136, (Is_Empty => True));
6556   end Initialize_136;
6557
6558   --------------------
6559   -- Initialize_137 --
6560   --------------------
6561
6562   procedure Initialize_137 is
6563   begin
6564      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6565       (Base + 137,
6566        AMF.Internals.Tables.UML_String_Data_01.MS_0140'Access);
6567      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 137, (Is_Empty => True));
6568   end Initialize_137;
6569
6570   --------------------
6571   -- Initialize_138 --
6572   --------------------
6573
6574   procedure Initialize_138 is
6575   begin
6576      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6577       (Base + 138,
6578        AMF.Internals.Tables.UML_String_Data_0A.MS_0A7F'Access);
6579      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 138, (Is_Empty => True));
6580   end Initialize_138;
6581
6582   --------------------
6583   -- Initialize_139 --
6584   --------------------
6585
6586   procedure Initialize_139 is
6587   begin
6588      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6589       (Base + 139,
6590        AMF.Internals.Tables.UML_String_Data_08.MS_0870'Access);
6591      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 139, (Is_Empty => True));
6592   end Initialize_139;
6593
6594   --------------------
6595   -- Initialize_140 --
6596   --------------------
6597
6598   procedure Initialize_140 is
6599   begin
6600      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6601       (Base + 140,
6602        AMF.Internals.Tables.UML_String_Data_06.MS_06DB'Access);
6603      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 140, (Is_Empty => True));
6604   end Initialize_140;
6605
6606   --------------------
6607   -- Initialize_141 --
6608   --------------------
6609
6610   procedure Initialize_141 is
6611   begin
6612      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 141, True);
6613      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6614       (Base + 141,
6615        AMF.Internals.Tables.UML_String_Data_07.MS_07F8'Access);
6616      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 141, (Is_Empty => True));
6617   end Initialize_141;
6618
6619   --------------------
6620   -- Initialize_142 --
6621   --------------------
6622
6623   procedure Initialize_142 is
6624   begin
6625      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 142, True);
6626      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6627       (Base + 142,
6628        AMF.Internals.Tables.UML_String_Data_06.MS_0623'Access);
6629      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 142, (Is_Empty => True));
6630   end Initialize_142;
6631
6632   --------------------
6633   -- Initialize_143 --
6634   --------------------
6635
6636   procedure Initialize_143 is
6637   begin
6638      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6639       (Base + 143,
6640        AMF.Internals.Tables.UML_String_Data_0B.MS_0B3F'Access);
6641      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 143, (Is_Empty => True));
6642   end Initialize_143;
6643
6644   --------------------
6645   -- Initialize_144 --
6646   --------------------
6647
6648   procedure Initialize_144 is
6649   begin
6650      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6651       (Base + 144,
6652        AMF.Internals.Tables.UML_String_Data_05.MS_0519'Access);
6653      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 144, (Is_Empty => True));
6654   end Initialize_144;
6655
6656   --------------------
6657   -- Initialize_145 --
6658   --------------------
6659
6660   procedure Initialize_145 is
6661   begin
6662      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 145, True);
6663      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6664       (Base + 145,
6665        AMF.Internals.Tables.UML_String_Data_09.MS_0941'Access);
6666      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 145, (Is_Empty => True));
6667   end Initialize_145;
6668
6669   --------------------
6670   -- Initialize_146 --
6671   --------------------
6672
6673   procedure Initialize_146 is
6674   begin
6675      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 146, True);
6676      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6677       (Base + 146,
6678        AMF.Internals.Tables.UML_String_Data_04.MS_04A3'Access);
6679      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 146, (Is_Empty => True));
6680   end Initialize_146;
6681
6682   --------------------
6683   -- Initialize_147 --
6684   --------------------
6685
6686   procedure Initialize_147 is
6687   begin
6688      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 147, True);
6689      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6690       (Base + 147,
6691        AMF.Internals.Tables.UML_String_Data_06.MS_06EB'Access);
6692      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 147, (Is_Empty => True));
6693   end Initialize_147;
6694
6695   --------------------
6696   -- Initialize_148 --
6697   --------------------
6698
6699   procedure Initialize_148 is
6700   begin
6701      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6702       (Base + 148,
6703        AMF.Internals.Tables.UML_String_Data_01.MS_01BB'Access);
6704      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 148, (Is_Empty => True));
6705   end Initialize_148;
6706
6707   --------------------
6708   -- Initialize_149 --
6709   --------------------
6710
6711   procedure Initialize_149 is
6712   begin
6713      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6714       (Base + 149,
6715        AMF.Internals.Tables.UML_String_Data_04.MS_0474'Access);
6716      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 149, (Is_Empty => True));
6717   end Initialize_149;
6718
6719   --------------------
6720   -- Initialize_150 --
6721   --------------------
6722
6723   procedure Initialize_150 is
6724   begin
6725      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 150, True);
6726      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6727       (Base + 150,
6728        AMF.Internals.Tables.UML_String_Data_01.MS_01E8'Access);
6729      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 150, (Is_Empty => True));
6730   end Initialize_150;
6731
6732   --------------------
6733   -- Initialize_151 --
6734   --------------------
6735
6736   procedure Initialize_151 is
6737   begin
6738      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 151, True);
6739      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6740       (Base + 151,
6741        AMF.Internals.Tables.UML_String_Data_02.MS_0265'Access);
6742      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 151, (Is_Empty => True));
6743   end Initialize_151;
6744
6745   --------------------
6746   -- Initialize_152 --
6747   --------------------
6748
6749   procedure Initialize_152 is
6750   begin
6751      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6752       (Base + 152,
6753        AMF.Internals.Tables.UML_String_Data_01.MS_0194'Access);
6754      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 152, (Is_Empty => True));
6755   end Initialize_152;
6756
6757   --------------------
6758   -- Initialize_153 --
6759   --------------------
6760
6761   procedure Initialize_153 is
6762   begin
6763      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6764       (Base + 153,
6765        AMF.Internals.Tables.UML_String_Data_05.MS_0564'Access);
6766      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 153, (Is_Empty => True));
6767   end Initialize_153;
6768
6769   --------------------
6770   -- Initialize_154 --
6771   --------------------
6772
6773   procedure Initialize_154 is
6774   begin
6775      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6776       (Base + 154,
6777        AMF.Internals.Tables.UML_String_Data_09.MS_0916'Access);
6778      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 154, (Is_Empty => True));
6779   end Initialize_154;
6780
6781   --------------------
6782   -- Initialize_155 --
6783   --------------------
6784
6785   procedure Initialize_155 is
6786   begin
6787      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6788       (Base + 155,
6789        AMF.Internals.Tables.UML_String_Data_08.MS_08B0'Access);
6790      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 155, (Is_Empty => True));
6791   end Initialize_155;
6792
6793   --------------------
6794   -- Initialize_156 --
6795   --------------------
6796
6797   procedure Initialize_156 is
6798   begin
6799      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6800       (Base + 156,
6801        AMF.Internals.Tables.UML_String_Data_03.MS_0306'Access);
6802      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 156, (Is_Empty => True));
6803   end Initialize_156;
6804
6805   --------------------
6806   -- Initialize_157 --
6807   --------------------
6808
6809   procedure Initialize_157 is
6810   begin
6811      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6812       (Base + 157,
6813        AMF.Internals.Tables.UML_String_Data_05.MS_0512'Access);
6814      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 157, (Is_Empty => True));
6815   end Initialize_157;
6816
6817   --------------------
6818   -- Initialize_158 --
6819   --------------------
6820
6821   procedure Initialize_158 is
6822   begin
6823      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6824       (Base + 158,
6825        AMF.Internals.Tables.UML_String_Data_0A.MS_0ACD'Access);
6826      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 158, (Is_Empty => True));
6827   end Initialize_158;
6828
6829   --------------------
6830   -- Initialize_159 --
6831   --------------------
6832
6833   procedure Initialize_159 is
6834   begin
6835      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6836       (Base + 159,
6837        AMF.Internals.Tables.UML_String_Data_0A.MS_0A29'Access);
6838      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 159, (Is_Empty => True));
6839   end Initialize_159;
6840
6841   --------------------
6842   -- Initialize_160 --
6843   --------------------
6844
6845   procedure Initialize_160 is
6846   begin
6847      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6848       (Base + 160,
6849        AMF.Internals.Tables.UML_String_Data_01.MS_01A1'Access);
6850      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 160, (Is_Empty => True));
6851   end Initialize_160;
6852
6853   --------------------
6854   -- Initialize_161 --
6855   --------------------
6856
6857   procedure Initialize_161 is
6858   begin
6859      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6860       (Base + 161,
6861        AMF.Internals.Tables.UML_String_Data_06.MS_06A0'Access);
6862      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 161, (Is_Empty => True));
6863   end Initialize_161;
6864
6865   --------------------
6866   -- Initialize_162 --
6867   --------------------
6868
6869   procedure Initialize_162 is
6870   begin
6871      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 162, True);
6872      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6873       (Base + 162,
6874        AMF.Internals.Tables.UML_String_Data_01.MS_01F1'Access);
6875      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 162, (Is_Empty => True));
6876   end Initialize_162;
6877
6878   --------------------
6879   -- Initialize_163 --
6880   --------------------
6881
6882   procedure Initialize_163 is
6883   begin
6884      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6885       (Base + 163,
6886        AMF.Internals.Tables.UML_String_Data_04.MS_04FA'Access);
6887      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 163, (Is_Empty => True));
6888   end Initialize_163;
6889
6890   --------------------
6891   -- Initialize_164 --
6892   --------------------
6893
6894   procedure Initialize_164 is
6895   begin
6896      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6897       (Base + 164,
6898        AMF.Internals.Tables.UML_String_Data_07.MS_076B'Access);
6899      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 164, (Is_Empty => True));
6900   end Initialize_164;
6901
6902   --------------------
6903   -- Initialize_165 --
6904   --------------------
6905
6906   procedure Initialize_165 is
6907   begin
6908      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 165, True);
6909      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6910       (Base + 165,
6911        AMF.Internals.Tables.UML_String_Data_05.MS_055D'Access);
6912      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 165, (Is_Empty => True));
6913   end Initialize_165;
6914
6915   --------------------
6916   -- Initialize_166 --
6917   --------------------
6918
6919   procedure Initialize_166 is
6920   begin
6921      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6922       (Base + 166,
6923        AMF.Internals.Tables.UML_String_Data_04.MS_0480'Access);
6924      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 166, (Is_Empty => True));
6925   end Initialize_166;
6926
6927   --------------------
6928   -- Initialize_167 --
6929   --------------------
6930
6931   procedure Initialize_167 is
6932   begin
6933      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 167, True);
6934      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6935       (Base + 167,
6936        AMF.Internals.Tables.UML_String_Data_05.MS_0526'Access);
6937      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 167, (Is_Empty => True));
6938   end Initialize_167;
6939
6940   --------------------
6941   -- Initialize_168 --
6942   --------------------
6943
6944   procedure Initialize_168 is
6945   begin
6946      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6947       (Base + 168,
6948        AMF.Internals.Tables.UML_String_Data_01.MS_0197'Access);
6949      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 168, (Is_Empty => True));
6950   end Initialize_168;
6951
6952   --------------------
6953   -- Initialize_169 --
6954   --------------------
6955
6956   procedure Initialize_169 is
6957   begin
6958      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6959       (Base + 169,
6960        AMF.Internals.Tables.UML_String_Data_07.MS_073F'Access);
6961      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 169, (Is_Empty => True));
6962   end Initialize_169;
6963
6964   --------------------
6965   -- Initialize_170 --
6966   --------------------
6967
6968   procedure Initialize_170 is
6969   begin
6970      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6971       (Base + 170,
6972        AMF.Internals.Tables.UML_String_Data_04.MS_0410'Access);
6973      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 170, (Is_Empty => True));
6974   end Initialize_170;
6975
6976   --------------------
6977   -- Initialize_171 --
6978   --------------------
6979
6980   procedure Initialize_171 is
6981   begin
6982      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6983       (Base + 171,
6984        AMF.Internals.Tables.UML_String_Data_0A.MS_0AF7'Access);
6985      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 171, (Is_Empty => True));
6986   end Initialize_171;
6987
6988   --------------------
6989   -- Initialize_172 --
6990   --------------------
6991
6992   procedure Initialize_172 is
6993   begin
6994      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
6995       (Base + 172,
6996        AMF.Internals.Tables.UML_String_Data_06.MS_06D4'Access);
6997      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 172, (Is_Empty => True));
6998   end Initialize_172;
6999
7000   --------------------
7001   -- Initialize_173 --
7002   --------------------
7003
7004   procedure Initialize_173 is
7005   begin
7006      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7007       (Base + 173,
7008        AMF.Internals.Tables.UML_String_Data_05.MS_052D'Access);
7009      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 173, (Is_Empty => True));
7010   end Initialize_173;
7011
7012   --------------------
7013   -- Initialize_174 --
7014   --------------------
7015
7016   procedure Initialize_174 is
7017   begin
7018      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7019       (Base + 174,
7020        AMF.Internals.Tables.UML_String_Data_04.MS_041D'Access);
7021      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 174, (Is_Empty => True));
7022   end Initialize_174;
7023
7024   --------------------
7025   -- Initialize_175 --
7026   --------------------
7027
7028   procedure Initialize_175 is
7029   begin
7030      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7031       (Base + 175,
7032        AMF.Internals.Tables.UML_String_Data_02.MS_02EA'Access);
7033      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 175, (Is_Empty => True));
7034   end Initialize_175;
7035
7036   --------------------
7037   -- Initialize_176 --
7038   --------------------
7039
7040   procedure Initialize_176 is
7041   begin
7042      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7043       (Base + 176,
7044        AMF.Internals.Tables.UML_String_Data_0B.MS_0BB3'Access);
7045      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 176, (Is_Empty => True));
7046   end Initialize_176;
7047
7048   --------------------
7049   -- Initialize_177 --
7050   --------------------
7051
7052   procedure Initialize_177 is
7053   begin
7054      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7055       (Base + 177,
7056        AMF.Internals.Tables.UML_String_Data_01.MS_01AA'Access);
7057      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 177, (Is_Empty => True));
7058   end Initialize_177;
7059
7060   --------------------
7061   -- Initialize_178 --
7062   --------------------
7063
7064   procedure Initialize_178 is
7065   begin
7066      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7067       (Base + 178,
7068        AMF.Internals.Tables.UML_String_Data_02.MS_02A2'Access);
7069      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 178, (Is_Empty => True));
7070   end Initialize_178;
7071
7072   --------------------
7073   -- Initialize_179 --
7074   --------------------
7075
7076   procedure Initialize_179 is
7077   begin
7078      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7079       (Base + 179,
7080        AMF.Internals.Tables.UML_String_Data_07.MS_0739'Access);
7081      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 179, (Is_Empty => True));
7082   end Initialize_179;
7083
7084   --------------------
7085   -- Initialize_180 --
7086   --------------------
7087
7088   procedure Initialize_180 is
7089   begin
7090      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7091       (Base + 180,
7092        AMF.Internals.Tables.UML_String_Data_04.MS_0459'Access);
7093      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 180, (Is_Empty => True));
7094   end Initialize_180;
7095
7096   --------------------
7097   -- Initialize_181 --
7098   --------------------
7099
7100   procedure Initialize_181 is
7101   begin
7102      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7103       (Base + 181,
7104        AMF.Internals.Tables.UML_String_Data_03.MS_03D2'Access);
7105      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 181, (Is_Empty => True));
7106   end Initialize_181;
7107
7108   --------------------
7109   -- Initialize_182 --
7110   --------------------
7111
7112   procedure Initialize_182 is
7113   begin
7114      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7115       (Base + 182,
7116        AMF.Internals.Tables.UML_String_Data_04.MS_0489'Access);
7117      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 182, (Is_Empty => True));
7118   end Initialize_182;
7119
7120   --------------------
7121   -- Initialize_183 --
7122   --------------------
7123
7124   procedure Initialize_183 is
7125   begin
7126      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7127       (Base + 183,
7128        AMF.Internals.Tables.UML_String_Data_05.MS_0520'Access);
7129      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 183, (Is_Empty => True));
7130   end Initialize_183;
7131
7132   --------------------
7133   -- Initialize_184 --
7134   --------------------
7135
7136   procedure Initialize_184 is
7137   begin
7138      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7139       (Base + 184,
7140        AMF.Internals.Tables.UML_String_Data_0C.MS_0C3D'Access);
7141      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 184, (Is_Empty => True));
7142   end Initialize_184;
7143
7144   --------------------
7145   -- Initialize_185 --
7146   --------------------
7147
7148   procedure Initialize_185 is
7149   begin
7150      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7151       (Base + 185,
7152        AMF.Internals.Tables.UML_String_Data_06.MS_068A'Access);
7153      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 185, (Is_Empty => True));
7154   end Initialize_185;
7155
7156   --------------------
7157   -- Initialize_186 --
7158   --------------------
7159
7160   procedure Initialize_186 is
7161   begin
7162      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7163       (Base + 186,
7164        AMF.Internals.Tables.UML_String_Data_0B.MS_0B08'Access);
7165      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 186, (Is_Empty => True));
7166   end Initialize_186;
7167
7168   --------------------
7169   -- Initialize_187 --
7170   --------------------
7171
7172   procedure Initialize_187 is
7173   begin
7174      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7175       (Base + 187,
7176        AMF.Internals.Tables.UML_String_Data_00.MS_00EB'Access);
7177      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 187, (Is_Empty => True));
7178   end Initialize_187;
7179
7180   --------------------
7181   -- Initialize_188 --
7182   --------------------
7183
7184   procedure Initialize_188 is
7185   begin
7186      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7187       (Base + 188,
7188        AMF.Internals.Tables.UML_String_Data_02.MS_021A'Access);
7189      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 188, (Is_Empty => True));
7190   end Initialize_188;
7191
7192   --------------------
7193   -- Initialize_189 --
7194   --------------------
7195
7196   procedure Initialize_189 is
7197   begin
7198      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7199       (Base + 189,
7200        AMF.Internals.Tables.UML_String_Data_03.MS_034B'Access);
7201      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 189, (Is_Empty => True));
7202   end Initialize_189;
7203
7204   --------------------
7205   -- Initialize_190 --
7206   --------------------
7207
7208   procedure Initialize_190 is
7209   begin
7210      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 190, True);
7211      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7212       (Base + 190,
7213        AMF.Internals.Tables.UML_String_Data_02.MS_02A7'Access);
7214      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 190, (Is_Empty => True));
7215   end Initialize_190;
7216
7217   --------------------
7218   -- Initialize_191 --
7219   --------------------
7220
7221   procedure Initialize_191 is
7222   begin
7223      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7224       (Base + 191,
7225        AMF.Internals.Tables.UML_String_Data_08.MS_08A9'Access);
7226      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 191, (Is_Empty => True));
7227   end Initialize_191;
7228
7229   --------------------
7230   -- Initialize_192 --
7231   --------------------
7232
7233   procedure Initialize_192 is
7234   begin
7235      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7236       (Base + 192,
7237        AMF.Internals.Tables.UML_String_Data_07.MS_070E'Access);
7238      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 192, (Is_Empty => True));
7239   end Initialize_192;
7240
7241   --------------------
7242   -- Initialize_193 --
7243   --------------------
7244
7245   procedure Initialize_193 is
7246   begin
7247      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7248       (Base + 193,
7249        AMF.Internals.Tables.UML_String_Data_00.MS_0022'Access);
7250      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 193, (Is_Empty => True));
7251   end Initialize_193;
7252
7253   --------------------
7254   -- Initialize_194 --
7255   --------------------
7256
7257   procedure Initialize_194 is
7258   begin
7259      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 194, True);
7260      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7261       (Base + 194,
7262        AMF.Internals.Tables.UML_String_Data_0A.MS_0AD2'Access);
7263      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 194, (Is_Empty => True));
7264   end Initialize_194;
7265
7266   --------------------
7267   -- Initialize_195 --
7268   --------------------
7269
7270   procedure Initialize_195 is
7271   begin
7272      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7273       (Base + 195,
7274        AMF.Internals.Tables.UML_String_Data_0B.MS_0B17'Access);
7275      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 195, (Is_Empty => True));
7276   end Initialize_195;
7277
7278   --------------------
7279   -- Initialize_196 --
7280   --------------------
7281
7282   procedure Initialize_196 is
7283   begin
7284      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7285       (Base + 196,
7286        AMF.Internals.Tables.UML_String_Data_04.MS_0462'Access);
7287      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 196, (Is_Empty => True));
7288   end Initialize_196;
7289
7290   --------------------
7291   -- Initialize_197 --
7292   --------------------
7293
7294   procedure Initialize_197 is
7295   begin
7296      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7297       (Base + 197,
7298        AMF.Internals.Tables.UML_String_Data_07.MS_077F'Access);
7299      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 197, (Is_Empty => True));
7300   end Initialize_197;
7301
7302   --------------------
7303   -- Initialize_198 --
7304   --------------------
7305
7306   procedure Initialize_198 is
7307   begin
7308      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7309       (Base + 198,
7310        AMF.Internals.Tables.UML_String_Data_00.MS_000D'Access);
7311      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 198, (Is_Empty => True));
7312   end Initialize_198;
7313
7314   --------------------
7315   -- Initialize_199 --
7316   --------------------
7317
7318   procedure Initialize_199 is
7319   begin
7320      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7321       (Base + 199,
7322        AMF.Internals.Tables.UML_String_Data_03.MS_039C'Access);
7323      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 199, (Is_Empty => True));
7324   end Initialize_199;
7325
7326   --------------------
7327   -- Initialize_200 --
7328   --------------------
7329
7330   procedure Initialize_200 is
7331   begin
7332      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7333       (Base + 200,
7334        AMF.Internals.Tables.UML_String_Data_04.MS_0412'Access);
7335      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 200, (Is_Empty => True));
7336   end Initialize_200;
7337
7338   --------------------
7339   -- Initialize_201 --
7340   --------------------
7341
7342   procedure Initialize_201 is
7343   begin
7344      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7345       (Base + 201,
7346        AMF.Internals.Tables.UML_String_Data_07.MS_07FA'Access);
7347      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 201, (Is_Empty => True));
7348   end Initialize_201;
7349
7350   --------------------
7351   -- Initialize_202 --
7352   --------------------
7353
7354   procedure Initialize_202 is
7355   begin
7356      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7357       (Base + 202,
7358        AMF.Internals.Tables.UML_String_Data_0B.MS_0BE3'Access);
7359      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 202, (Is_Empty => True));
7360   end Initialize_202;
7361
7362   --------------------
7363   -- Initialize_203 --
7364   --------------------
7365
7366   procedure Initialize_203 is
7367   begin
7368      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7369       (Base + 203,
7370        AMF.Internals.Tables.UML_String_Data_06.MS_0695'Access);
7371      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 203, (Is_Empty => True));
7372   end Initialize_203;
7373
7374   --------------------
7375   -- Initialize_204 --
7376   --------------------
7377
7378   procedure Initialize_204 is
7379   begin
7380      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7381       (Base + 204,
7382        AMF.Internals.Tables.UML_String_Data_05.MS_05BB'Access);
7383      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 204, (Is_Empty => True));
7384   end Initialize_204;
7385
7386   --------------------
7387   -- Initialize_205 --
7388   --------------------
7389
7390   procedure Initialize_205 is
7391   begin
7392      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7393       (Base + 205,
7394        AMF.Internals.Tables.UML_String_Data_07.MS_0762'Access);
7395      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 205, (Is_Empty => True));
7396   end Initialize_205;
7397
7398   --------------------
7399   -- Initialize_206 --
7400   --------------------
7401
7402   procedure Initialize_206 is
7403   begin
7404      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7405       (Base + 206,
7406        AMF.Internals.Tables.UML_String_Data_00.MS_00F9'Access);
7407      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 206, (Is_Empty => True));
7408   end Initialize_206;
7409
7410   --------------------
7411   -- Initialize_207 --
7412   --------------------
7413
7414   procedure Initialize_207 is
7415   begin
7416      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7417       (Base + 207,
7418        AMF.Internals.Tables.UML_String_Data_00.MS_0008'Access);
7419      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 207, (Is_Empty => True));
7420   end Initialize_207;
7421
7422   --------------------
7423   -- Initialize_208 --
7424   --------------------
7425
7426   procedure Initialize_208 is
7427   begin
7428      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7429       (Base + 208,
7430        AMF.Internals.Tables.UML_String_Data_02.MS_0288'Access);
7431      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 208, (Is_Empty => True));
7432   end Initialize_208;
7433
7434   --------------------
7435   -- Initialize_209 --
7436   --------------------
7437
7438   procedure Initialize_209 is
7439   begin
7440      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7441       (Base + 209,
7442        AMF.Internals.Tables.UML_String_Data_00.MS_00B1'Access);
7443      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 209, (Is_Empty => True));
7444   end Initialize_209;
7445
7446   --------------------
7447   -- Initialize_210 --
7448   --------------------
7449
7450   procedure Initialize_210 is
7451   begin
7452      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7453       (Base + 210,
7454        AMF.Internals.Tables.UML_String_Data_0B.MS_0B27'Access);
7455      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 210, (Is_Empty => True));
7456   end Initialize_210;
7457
7458   --------------------
7459   -- Initialize_211 --
7460   --------------------
7461
7462   procedure Initialize_211 is
7463   begin
7464      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 211, True);
7465      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7466       (Base + 211,
7467        AMF.Internals.Tables.UML_String_Data_08.MS_08C4'Access);
7468      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 211, (Is_Empty => True));
7469   end Initialize_211;
7470
7471   --------------------
7472   -- Initialize_212 --
7473   --------------------
7474
7475   procedure Initialize_212 is
7476   begin
7477      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 212, True);
7478      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7479       (Base + 212,
7480        AMF.Internals.Tables.UML_String_Data_00.MS_0099'Access);
7481      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 212, (Is_Empty => True));
7482   end Initialize_212;
7483
7484   --------------------
7485   -- Initialize_213 --
7486   --------------------
7487
7488   procedure Initialize_213 is
7489   begin
7490      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7491       (Base + 213,
7492        AMF.Internals.Tables.UML_String_Data_03.MS_03E3'Access);
7493      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 213, (Is_Empty => True));
7494   end Initialize_213;
7495
7496   --------------------
7497   -- Initialize_214 --
7498   --------------------
7499
7500   procedure Initialize_214 is
7501   begin
7502      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 214, True);
7503      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7504       (Base + 214,
7505        AMF.Internals.Tables.UML_String_Data_02.MS_02D3'Access);
7506      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 214, (Is_Empty => True));
7507   end Initialize_214;
7508
7509   --------------------
7510   -- Initialize_215 --
7511   --------------------
7512
7513   procedure Initialize_215 is
7514   begin
7515      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7516       (Base + 215,
7517        AMF.Internals.Tables.UML_String_Data_00.MS_0024'Access);
7518      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 215, (Is_Empty => True));
7519   end Initialize_215;
7520
7521   --------------------
7522   -- Initialize_216 --
7523   --------------------
7524
7525   procedure Initialize_216 is
7526   begin
7527      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7528       (Base + 216,
7529        AMF.Internals.Tables.UML_String_Data_0A.MS_0A0A'Access);
7530      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 216, (Is_Empty => True));
7531   end Initialize_216;
7532
7533   --------------------
7534   -- Initialize_217 --
7535   --------------------
7536
7537   procedure Initialize_217 is
7538   begin
7539      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7540       (Base + 217,
7541        AMF.Internals.Tables.UML_String_Data_06.MS_06D3'Access);
7542      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 217, (Is_Empty => True));
7543   end Initialize_217;
7544
7545   --------------------
7546   -- Initialize_218 --
7547   --------------------
7548
7549   procedure Initialize_218 is
7550   begin
7551      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7552       (Base + 218,
7553        AMF.Internals.Tables.UML_String_Data_02.MS_02F7'Access);
7554      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 218, (Is_Empty => True));
7555   end Initialize_218;
7556
7557   --------------------
7558   -- Initialize_219 --
7559   --------------------
7560
7561   procedure Initialize_219 is
7562   begin
7563      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7564       (Base + 219,
7565        AMF.Internals.Tables.UML_String_Data_0C.MS_0C80'Access);
7566      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 219, (Is_Empty => True));
7567   end Initialize_219;
7568
7569   --------------------
7570   -- Initialize_220 --
7571   --------------------
7572
7573   procedure Initialize_220 is
7574   begin
7575      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 220, True);
7576      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7577       (Base + 220,
7578        AMF.Internals.Tables.UML_String_Data_06.MS_065B'Access);
7579      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 220, (Is_Empty => True));
7580   end Initialize_220;
7581
7582   --------------------
7583   -- Initialize_221 --
7584   --------------------
7585
7586   procedure Initialize_221 is
7587   begin
7588      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7589       (Base + 221,
7590        AMF.Internals.Tables.UML_String_Data_00.MS_00BD'Access);
7591      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 221, (Is_Empty => True));
7592   end Initialize_221;
7593
7594   --------------------
7595   -- Initialize_222 --
7596   --------------------
7597
7598   procedure Initialize_222 is
7599   begin
7600      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7601       (Base + 222,
7602        AMF.Internals.Tables.UML_String_Data_00.MS_0052'Access);
7603      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 222, (Is_Empty => True));
7604   end Initialize_222;
7605
7606   --------------------
7607   -- Initialize_223 --
7608   --------------------
7609
7610   procedure Initialize_223 is
7611   begin
7612      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7613       (Base + 223,
7614        AMF.Internals.Tables.UML_String_Data_03.MS_03FC'Access);
7615      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 223, (Is_Empty => True));
7616   end Initialize_223;
7617
7618   --------------------
7619   -- Initialize_224 --
7620   --------------------
7621
7622   procedure Initialize_224 is
7623   begin
7624      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7625       (Base + 224,
7626        AMF.Internals.Tables.UML_String_Data_01.MS_01EB'Access);
7627      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 224, (Is_Empty => True));
7628   end Initialize_224;
7629
7630   --------------------
7631   -- Initialize_225 --
7632   --------------------
7633
7634   procedure Initialize_225 is
7635   begin
7636      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7637       (Base + 225,
7638        AMF.Internals.Tables.UML_String_Data_04.MS_04C6'Access);
7639      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 225, (Is_Empty => True));
7640   end Initialize_225;
7641
7642   --------------------
7643   -- Initialize_226 --
7644   --------------------
7645
7646   procedure Initialize_226 is
7647   begin
7648      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7649       (Base + 226,
7650        AMF.Internals.Tables.UML_String_Data_07.MS_07E6'Access);
7651      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 226, (Is_Empty => True));
7652   end Initialize_226;
7653
7654   --------------------
7655   -- Initialize_227 --
7656   --------------------
7657
7658   procedure Initialize_227 is
7659   begin
7660      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7661       (Base + 227,
7662        AMF.Internals.Tables.UML_String_Data_06.MS_0697'Access);
7663      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 227, (Is_Empty => True));
7664   end Initialize_227;
7665
7666   --------------------
7667   -- Initialize_228 --
7668   --------------------
7669
7670   procedure Initialize_228 is
7671   begin
7672      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7673       (Base + 228,
7674        AMF.Internals.Tables.UML_String_Data_0B.MS_0B72'Access);
7675      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 228, (Is_Empty => True));
7676   end Initialize_228;
7677
7678   --------------------
7679   -- Initialize_229 --
7680   --------------------
7681
7682   procedure Initialize_229 is
7683   begin
7684      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 229, True);
7685      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7686       (Base + 229,
7687        AMF.Internals.Tables.UML_String_Data_00.MS_0023'Access);
7688      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 229, (Is_Empty => True));
7689   end Initialize_229;
7690
7691   --------------------
7692   -- Initialize_230 --
7693   --------------------
7694
7695   procedure Initialize_230 is
7696   begin
7697      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 230, True);
7698      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7699       (Base + 230,
7700        AMF.Internals.Tables.UML_String_Data_08.MS_086B'Access);
7701      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 230, (Is_Empty => True));
7702   end Initialize_230;
7703
7704   --------------------
7705   -- Initialize_231 --
7706   --------------------
7707
7708   procedure Initialize_231 is
7709   begin
7710      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7711       (Base + 231,
7712        AMF.Internals.Tables.UML_String_Data_09.MS_095B'Access);
7713      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 231, (Is_Empty => True));
7714   end Initialize_231;
7715
7716   --------------------
7717   -- Initialize_232 --
7718   --------------------
7719
7720   procedure Initialize_232 is
7721   begin
7722      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7723       (Base + 232,
7724        AMF.Internals.Tables.UML_String_Data_05.MS_0572'Access);
7725      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 232, (Is_Empty => True));
7726   end Initialize_232;
7727
7728   --------------------
7729   -- Initialize_233 --
7730   --------------------
7731
7732   procedure Initialize_233 is
7733   begin
7734      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7735       (Base + 233,
7736        AMF.Internals.Tables.UML_String_Data_05.MS_05C3'Access);
7737      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 233, (Is_Empty => True));
7738   end Initialize_233;
7739
7740   --------------------
7741   -- Initialize_234 --
7742   --------------------
7743
7744   procedure Initialize_234 is
7745   begin
7746      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7747       (Base + 234,
7748        AMF.Internals.Tables.UML_String_Data_09.MS_0950'Access);
7749      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 234, (Is_Empty => True));
7750   end Initialize_234;
7751
7752   --------------------
7753   -- Initialize_235 --
7754   --------------------
7755
7756   procedure Initialize_235 is
7757   begin
7758      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 235, True);
7759      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7760       (Base + 235,
7761        AMF.Internals.Tables.UML_String_Data_05.MS_0518'Access);
7762      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 235, (Is_Empty => True));
7763   end Initialize_235;
7764
7765   --------------------
7766   -- Initialize_236 --
7767   --------------------
7768
7769   procedure Initialize_236 is
7770   begin
7771      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7772       (Base + 236,
7773        AMF.Internals.Tables.UML_String_Data_05.MS_0565'Access);
7774      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 236, (Is_Empty => True));
7775   end Initialize_236;
7776
7777   --------------------
7778   -- Initialize_237 --
7779   --------------------
7780
7781   procedure Initialize_237 is
7782   begin
7783      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7784       (Base + 237,
7785        AMF.Internals.Tables.UML_String_Data_0A.MS_0A79'Access);
7786      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 237, (Is_Empty => True));
7787   end Initialize_237;
7788
7789   --------------------
7790   -- Initialize_238 --
7791   --------------------
7792
7793   procedure Initialize_238 is
7794   begin
7795      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 238, True);
7796      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7797       (Base + 238,
7798        AMF.Internals.Tables.UML_String_Data_00.MS_00F6'Access);
7799      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 238, (Is_Empty => True));
7800   end Initialize_238;
7801
7802   --------------------
7803   -- Initialize_239 --
7804   --------------------
7805
7806   procedure Initialize_239 is
7807   begin
7808      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 239, True);
7809      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7810       (Base + 239,
7811        AMF.Internals.Tables.UML_String_Data_09.MS_09FF'Access);
7812      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 239, (Is_Empty => True));
7813   end Initialize_239;
7814
7815   --------------------
7816   -- Initialize_240 --
7817   --------------------
7818
7819   procedure Initialize_240 is
7820   begin
7821      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 240, True);
7822      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7823       (Base + 240,
7824        AMF.Internals.Tables.UML_String_Data_09.MS_0934'Access);
7825      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 240, (Is_Empty => True));
7826   end Initialize_240;
7827
7828   --------------------
7829   -- Initialize_241 --
7830   --------------------
7831
7832   procedure Initialize_241 is
7833   begin
7834      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 241, True);
7835      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7836       (Base + 241,
7837        AMF.Internals.Tables.UML_String_Data_03.MS_0360'Access);
7838      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 241, (Is_Empty => True));
7839   end Initialize_241;
7840
7841   --------------------
7842   -- Initialize_242 --
7843   --------------------
7844
7845   procedure Initialize_242 is
7846   begin
7847      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Abstract (Base + 242, True);
7848      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7849       (Base + 242,
7850        AMF.Internals.Tables.UML_String_Data_00.MS_0049'Access);
7851      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 242, (Is_Empty => True));
7852   end Initialize_242;
7853
7854   --------------------
7855   -- Initialize_243 --
7856   --------------------
7857
7858   procedure Initialize_243 is
7859   begin
7860      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 243, True);
7861      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 243, (False, 0));
7862      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7863       (Base + 243,
7864        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
7865      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 243, (False, (Unlimited => True)));
7866      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 243, (False, AMF.CMOF.Public_Visibility));
7867   end Initialize_243;
7868
7869   --------------------
7870   -- Initialize_244 --
7871   --------------------
7872
7873   procedure Initialize_244 is
7874   begin
7875      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 244, True);
7876      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7877       (Base + 244,
7878        AMF.Internals.Tables.UML_String_Data_07.MS_073C'Access);
7879      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 244, (False, (Unlimited => True)));
7880      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 244, (False, AMF.CMOF.Public_Visibility));
7881   end Initialize_244;
7882
7883   --------------------
7884   -- Initialize_245 --
7885   --------------------
7886
7887   procedure Initialize_245 is
7888   begin
7889      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 245, True);
7890      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 245, True);
7891      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived_Union (Base + 245, True);
7892      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 245, True);
7893      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 245, True);
7894      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 245, (False, 0));
7895      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7896       (Base + 245,
7897        AMF.Internals.Tables.UML_String_Data_05.MS_0576'Access);
7898      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 245, (False, (Unlimited => True)));
7899      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 245, (False, AMF.CMOF.Public_Visibility));
7900   end Initialize_245;
7901
7902   --------------------
7903   -- Initialize_246 --
7904   --------------------
7905
7906   procedure Initialize_246 is
7907   begin
7908      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 246, True);
7909      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 246, (False, 0));
7910      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7911       (Base + 246,
7912        AMF.Internals.Tables.UML_String_Data_02.MS_02F1'Access);
7913      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 246, (False, (Unlimited => True)));
7914      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 246, (False, AMF.CMOF.Public_Visibility));
7915   end Initialize_246;
7916
7917   --------------------
7918   -- Initialize_247 --
7919   --------------------
7920
7921   procedure Initialize_247 is
7922   begin
7923      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 247, True);
7924      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 247, (False, 0));
7925      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7926       (Base + 247,
7927        AMF.Internals.Tables.UML_String_Data_0A.MS_0A57'Access);
7928      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 247, (False, (Unlimited => True)));
7929      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 247, (False, AMF.CMOF.Public_Visibility));
7930   end Initialize_247;
7931
7932   --------------------
7933   -- Initialize_248 --
7934   --------------------
7935
7936   procedure Initialize_248 is
7937   begin
7938      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 248, True);
7939      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 248, True);
7940      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived_Union (Base + 248, True);
7941      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 248, True);
7942      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 248, True);
7943      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 248, (False, 0));
7944      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7945       (Base + 248,
7946        AMF.Internals.Tables.UML_String_Data_06.MS_06D8'Access);
7947      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 248, (False, (Unlimited => True)));
7948      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 248, (False, AMF.CMOF.Public_Visibility));
7949   end Initialize_248;
7950
7951   --------------------
7952   -- Initialize_249 --
7953   --------------------
7954
7955   procedure Initialize_249 is
7956   begin
7957      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 249, True);
7958      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 249, (False, 0));
7959      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7960       (Base + 249,
7961        AMF.Internals.Tables.UML_String_Data_02.MS_025C'Access);
7962      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 249, (False, (Unlimited => True)));
7963      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 249, (False, AMF.CMOF.Public_Visibility));
7964   end Initialize_249;
7965
7966   --------------------
7967   -- Initialize_250 --
7968   --------------------
7969
7970   procedure Initialize_250 is
7971   begin
7972      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 250, True);
7973      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 250, (False, 0));
7974      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7975       (Base + 250,
7976        AMF.Internals.Tables.UML_String_Data_05.MS_05DB'Access);
7977      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 250, (False, (Unlimited => True)));
7978      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 250, (False, AMF.CMOF.Public_Visibility));
7979   end Initialize_250;
7980
7981   --------------------
7982   -- Initialize_251 --
7983   --------------------
7984
7985   procedure Initialize_251 is
7986   begin
7987      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 251, True);
7988      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 251, (False, 0));
7989      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
7990       (Base + 251,
7991        AMF.Internals.Tables.UML_String_Data_07.MS_07A4'Access);
7992      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 251, (False, (Unlimited => True)));
7993      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 251, (False, AMF.CMOF.Public_Visibility));
7994   end Initialize_251;
7995
7996   --------------------
7997   -- Initialize_252 --
7998   --------------------
7999
8000   procedure Initialize_252 is
8001   begin
8002      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 252, (False, 0));
8003      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8004       (Base + 252,
8005        AMF.Internals.Tables.UML_String_Data_04.MS_0469'Access);
8006      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 252, (False, (Unlimited => True)));
8007      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 252, (False, AMF.CMOF.Public_Visibility));
8008   end Initialize_252;
8009
8010   --------------------
8011   -- Initialize_253 --
8012   --------------------
8013
8014   procedure Initialize_253 is
8015   begin
8016      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 253, True);
8017      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 253, True);
8018      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 253, True);
8019      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 253, (False, 0));
8020      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8021       (Base + 253,
8022        AMF.Internals.Tables.UML_String_Data_06.MS_0676'Access);
8023      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 253, (False, (Unlimited => True)));
8024      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 253, (False, AMF.CMOF.Public_Visibility));
8025   end Initialize_253;
8026
8027   --------------------
8028   -- Initialize_254 --
8029   --------------------
8030
8031   procedure Initialize_254 is
8032   begin
8033      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 254, True);
8034      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 254, (False, 0));
8035      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8036       (Base + 254,
8037        AMF.Internals.Tables.UML_String_Data_00.MS_0067'Access);
8038      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 254, (False, (Unlimited => True)));
8039      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 254, (False, AMF.CMOF.Public_Visibility));
8040   end Initialize_254;
8041
8042   --------------------
8043   -- Initialize_255 --
8044   --------------------
8045
8046   procedure Initialize_255 is
8047   begin
8048      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 255, True);
8049      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived_Union (Base + 255, True);
8050      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 255, True);
8051      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 255, (False, 0));
8052      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8053       (Base + 255,
8054        AMF.Internals.Tables.UML_String_Data_02.MS_0289'Access);
8055      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 255, (False, (Unlimited => True)));
8056      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 255, (False, AMF.CMOF.Public_Visibility));
8057   end Initialize_255;
8058
8059   --------------------
8060   -- Initialize_256 --
8061   --------------------
8062
8063   procedure Initialize_256 is
8064   begin
8065      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 256, (False, 0));
8066      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8067       (Base + 256,
8068        AMF.Internals.Tables.UML_String_Data_07.MS_074E'Access);
8069      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 256, (False, (Unlimited => True)));
8070      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 256, (False, AMF.CMOF.Public_Visibility));
8071   end Initialize_256;
8072
8073   --------------------
8074   -- Initialize_257 --
8075   --------------------
8076
8077   procedure Initialize_257 is
8078   begin
8079      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 257, (False, 0));
8080      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8081       (Base + 257,
8082        AMF.Internals.Tables.UML_String_Data_01.MS_0151'Access);
8083      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 257, (False, (Unlimited => True)));
8084      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 257, (False, AMF.CMOF.Public_Visibility));
8085   end Initialize_257;
8086
8087   --------------------
8088   -- Initialize_258 --
8089   --------------------
8090
8091   procedure Initialize_258 is
8092   begin
8093      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 258, True);
8094      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived_Union (Base + 258, True);
8095      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 258, True);
8096      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 258, (False, 0));
8097      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8098       (Base + 258,
8099        AMF.Internals.Tables.UML_String_Data_04.MS_049B'Access);
8100      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 258, (False, (Unlimited => True)));
8101      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 258, (False, AMF.CMOF.Public_Visibility));
8102   end Initialize_258;
8103
8104   --------------------
8105   -- Initialize_259 --
8106   --------------------
8107
8108   procedure Initialize_259 is
8109   begin
8110      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 259, True);
8111      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived_Union (Base + 259, True);
8112      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 259, True);
8113      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 259, (False, 0));
8114      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8115       (Base + 259,
8116        AMF.Internals.Tables.UML_String_Data_06.MS_0627'Access);
8117      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 259, (False, (Unlimited => True)));
8118      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 259, (False, AMF.CMOF.Public_Visibility));
8119   end Initialize_259;
8120
8121   --------------------
8122   -- Initialize_260 --
8123   --------------------
8124
8125   procedure Initialize_260 is
8126   begin
8127      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 260, True);
8128      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 260, True);
8129      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived_Union (Base + 260, True);
8130      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 260, True);
8131      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 260, (False, 0));
8132      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8133       (Base + 260,
8134        AMF.Internals.Tables.UML_String_Data_0A.MS_0A80'Access);
8135      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 260, (False, (Unlimited => True)));
8136      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 260, (False, AMF.CMOF.Public_Visibility));
8137   end Initialize_260;
8138
8139   --------------------
8140   -- Initialize_261 --
8141   --------------------
8142
8143   procedure Initialize_261 is
8144   begin
8145      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 261, True);
8146      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived_Union (Base + 261, True);
8147      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 261, True);
8148      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 261, (False, 0));
8149      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8150       (Base + 261,
8151        AMF.Internals.Tables.UML_String_Data_02.MS_0289'Access);
8152      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 261, (False, (Unlimited => True)));
8153      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 261, (False, AMF.CMOF.Public_Visibility));
8154   end Initialize_261;
8155
8156   --------------------
8157   -- Initialize_262 --
8158   --------------------
8159
8160   procedure Initialize_262 is
8161   begin
8162      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 262, (False, 0));
8163      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8164       (Base + 262,
8165        AMF.Internals.Tables.UML_String_Data_01.MS_013D'Access);
8166      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 262, (False, (Unlimited => True)));
8167      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 262, (False, AMF.CMOF.Public_Visibility));
8168   end Initialize_262;
8169
8170   --------------------
8171   -- Initialize_263 --
8172   --------------------
8173
8174   procedure Initialize_263 is
8175   begin
8176      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 263, (False, 0));
8177      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8178       (Base + 263,
8179        AMF.Internals.Tables.UML_String_Data_07.MS_074E'Access);
8180      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 263, (False, (Unlimited => True)));
8181      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 263, (False, AMF.CMOF.Public_Visibility));
8182   end Initialize_263;
8183
8184   --------------------
8185   -- Initialize_264 --
8186   --------------------
8187
8188   procedure Initialize_264 is
8189   begin
8190      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 264, (False, 0));
8191      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8192       (Base + 264,
8193        AMF.Internals.Tables.UML_String_Data_04.MS_040B'Access);
8194      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 264, (False, (Unlimited => True)));
8195      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 264, (False, AMF.CMOF.Public_Visibility));
8196   end Initialize_264;
8197
8198   --------------------
8199   -- Initialize_265 --
8200   --------------------
8201
8202   procedure Initialize_265 is
8203   begin
8204      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 265, (False, 0));
8205      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8206       (Base + 265,
8207        AMF.Internals.Tables.UML_String_Data_00.MS_003C'Access);
8208      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 265, (False, (Unlimited => True)));
8209      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 265, (False, AMF.CMOF.Public_Visibility));
8210   end Initialize_265;
8211
8212   --------------------
8213   -- Initialize_266 --
8214   --------------------
8215
8216   procedure Initialize_266 is
8217   begin
8218      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 266, (False, 0));
8219      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8220       (Base + 266,
8221        AMF.Internals.Tables.UML_String_Data_04.MS_0415'Access);
8222      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 266, (False, (Unlimited => True)));
8223      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 266, (False, AMF.CMOF.Public_Visibility));
8224   end Initialize_266;
8225
8226   --------------------
8227   -- Initialize_267 --
8228   --------------------
8229
8230   procedure Initialize_267 is
8231   begin
8232      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 267, (False, 0));
8233      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8234       (Base + 267,
8235        AMF.Internals.Tables.UML_String_Data_02.MS_025C'Access);
8236      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 267, (False, (Unlimited => True)));
8237      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 267, (False, AMF.CMOF.Public_Visibility));
8238   end Initialize_267;
8239
8240   --------------------
8241   -- Initialize_268 --
8242   --------------------
8243
8244   procedure Initialize_268 is
8245   begin
8246      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 268, (False, 0));
8247      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8248       (Base + 268,
8249        AMF.Internals.Tables.UML_String_Data_07.MS_07A4'Access);
8250      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 268, (False, (Unlimited => True)));
8251      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 268, (False, AMF.CMOF.Public_Visibility));
8252   end Initialize_268;
8253
8254   --------------------
8255   -- Initialize_269 --
8256   --------------------
8257
8258   procedure Initialize_269 is
8259   begin
8260      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 269, True);
8261      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 269, (False, 0));
8262      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8263       (Base + 269,
8264        AMF.Internals.Tables.UML_String_Data_08.MS_08F2'Access);
8265      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 269, (False, (Unlimited => True)));
8266      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 269, (False, AMF.CMOF.Public_Visibility));
8267   end Initialize_269;
8268
8269   --------------------
8270   -- Initialize_270 --
8271   --------------------
8272
8273   procedure Initialize_270 is
8274   begin
8275      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 270, True);
8276      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 270, (False, 0));
8277      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8278       (Base + 270,
8279        AMF.Internals.Tables.UML_String_Data_06.MS_06BE'Access);
8280      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 270, (False, (Unlimited => True)));
8281      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 270, (False, AMF.CMOF.Public_Visibility));
8282   end Initialize_270;
8283
8284   --------------------
8285   -- Initialize_271 --
8286   --------------------
8287
8288   procedure Initialize_271 is
8289   begin
8290      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 271, True);
8291      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 271, (False, 0));
8292      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8293       (Base + 271,
8294        AMF.Internals.Tables.UML_String_Data_0B.MS_0B26'Access);
8295      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 271, (False, (Unlimited => True)));
8296      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 271, (False, AMF.CMOF.Public_Visibility));
8297   end Initialize_271;
8298
8299   --------------------
8300   -- Initialize_272 --
8301   --------------------
8302
8303   procedure Initialize_272 is
8304   begin
8305      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 272, True);
8306      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 272, True);
8307      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 272, (False, 0));
8308      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8309       (Base + 272,
8310        AMF.Internals.Tables.UML_String_Data_01.MS_019B'Access);
8311      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 272, (False, (Unlimited => True)));
8312      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 272, (False, AMF.CMOF.Public_Visibility));
8313   end Initialize_272;
8314
8315   --------------------
8316   -- Initialize_273 --
8317   --------------------
8318
8319   procedure Initialize_273 is
8320   begin
8321      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 273, True);
8322      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 273, True);
8323      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 273, (False, 0));
8324      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8325       (Base + 273,
8326        AMF.Internals.Tables.UML_String_Data_04.MS_04B1'Access);
8327      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 273, (False, (Unlimited => True)));
8328      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 273, (False, AMF.CMOF.Public_Visibility));
8329   end Initialize_273;
8330
8331   --------------------
8332   -- Initialize_274 --
8333   --------------------
8334
8335   procedure Initialize_274 is
8336   begin
8337      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 274, True);
8338      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 274, True);
8339      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 274, True);
8340      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8341       (Base + 274,
8342        AMF.Internals.Tables.UML_String_Data_03.MS_03E7'Access);
8343      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 274, (False, (Unlimited => True)));
8344      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 274, (False, AMF.CMOF.Public_Visibility));
8345   end Initialize_274;
8346
8347   --------------------
8348   -- Initialize_275 --
8349   --------------------
8350
8351   procedure Initialize_275 is
8352   begin
8353      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 275, True);
8354      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 275, (False, 2));
8355      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8356       (Base + 275,
8357        AMF.Internals.Tables.UML_String_Data_00.MS_0010'Access);
8358      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 275, (False, (Unlimited => True)));
8359      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 275, (False, AMF.CMOF.Public_Visibility));
8360   end Initialize_275;
8361
8362   --------------------
8363   -- Initialize_276 --
8364   --------------------
8365
8366   procedure Initialize_276 is
8367   begin
8368      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 276, (False, 0));
8369      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8370       (Base + 276,
8371        AMF.Internals.Tables.UML_String_Data_01.MS_01E7'Access);
8372      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 276, (False, (Unlimited => True)));
8373      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 276, (False, AMF.CMOF.Public_Visibility));
8374   end Initialize_276;
8375
8376   --------------------
8377   -- Initialize_277 --
8378   --------------------
8379
8380   procedure Initialize_277 is
8381   begin
8382      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 277, True);
8383      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 277, True);
8384      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 277, (False, 0));
8385      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8386       (Base + 277,
8387        AMF.Internals.Tables.UML_String_Data_0B.MS_0B09'Access);
8388      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 277, (False, (Unlimited => True)));
8389      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 277, (False, AMF.CMOF.Public_Visibility));
8390   end Initialize_277;
8391
8392   --------------------
8393   -- Initialize_278 --
8394   --------------------
8395
8396   procedure Initialize_278 is
8397   begin
8398      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 278, True);
8399      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 278, True);
8400      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 278, (False, 0));
8401      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8402       (Base + 278,
8403        AMF.Internals.Tables.UML_String_Data_09.MS_0974'Access);
8404      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 278, (False, (Unlimited => True)));
8405      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 278, (False, AMF.CMOF.Public_Visibility));
8406   end Initialize_278;
8407
8408   --------------------
8409   -- Initialize_279 --
8410   --------------------
8411
8412   procedure Initialize_279 is
8413   begin
8414      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 279, True);
8415      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 279, (False, 0));
8416      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8417       (Base + 279,
8418        AMF.Internals.Tables.UML_String_Data_08.MS_0848'Access);
8419      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 279, (False, (Unlimited => True)));
8420      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 279, (False, AMF.CMOF.Public_Visibility));
8421   end Initialize_279;
8422
8423   --------------------
8424   -- Initialize_280 --
8425   --------------------
8426
8427   procedure Initialize_280 is
8428   begin
8429      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 280, True);
8430      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 280, (False, 0));
8431      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8432       (Base + 280,
8433        AMF.Internals.Tables.UML_String_Data_01.MS_0157'Access);
8434      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 280, (False, (Unlimited => True)));
8435      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 280, (False, AMF.CMOF.Public_Visibility));
8436   end Initialize_280;
8437
8438   --------------------
8439   -- Initialize_281 --
8440   --------------------
8441
8442   procedure Initialize_281 is
8443   begin
8444      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 281, True);
8445      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 281, (False, 0));
8446      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8447       (Base + 281,
8448        AMF.Internals.Tables.UML_String_Data_00.MS_001A'Access);
8449      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 281, (False, (Unlimited => True)));
8450      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 281, (False, AMF.CMOF.Public_Visibility));
8451   end Initialize_281;
8452
8453   --------------------
8454   -- Initialize_282 --
8455   --------------------
8456
8457   procedure Initialize_282 is
8458   begin
8459      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 282, (False, 0));
8460      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8461       (Base + 282,
8462        AMF.Internals.Tables.UML_String_Data_02.MS_02AA'Access);
8463      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 282, (False, (Unlimited => True)));
8464      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 282, (False, AMF.CMOF.Public_Visibility));
8465   end Initialize_282;
8466
8467   --------------------
8468   -- Initialize_283 --
8469   --------------------
8470
8471   procedure Initialize_283 is
8472   begin
8473      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 283, (False, 0));
8474      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8475       (Base + 283,
8476        AMF.Internals.Tables.UML_String_Data_08.MS_0893'Access);
8477      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 283, (False, (Unlimited => True)));
8478      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 283, (False, AMF.CMOF.Public_Visibility));
8479   end Initialize_283;
8480
8481   --------------------
8482   -- Initialize_284 --
8483   --------------------
8484
8485   procedure Initialize_284 is
8486   begin
8487      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 284, True);
8488      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 284, True);
8489      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 284, (False, 0));
8490      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8491       (Base + 284,
8492        AMF.Internals.Tables.UML_String_Data_09.MS_0974'Access);
8493      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 284, (False, (Unlimited => True)));
8494      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 284, (False, AMF.CMOF.Public_Visibility));
8495   end Initialize_284;
8496
8497   --------------------
8498   -- Initialize_285 --
8499   --------------------
8500
8501   procedure Initialize_285 is
8502   begin
8503      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 285, True);
8504      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 285, (False, 0));
8505      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8506       (Base + 285,
8507        AMF.Internals.Tables.UML_String_Data_08.MS_0848'Access);
8508      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 285, (False, (Unlimited => True)));
8509      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 285, (False, AMF.CMOF.Public_Visibility));
8510   end Initialize_285;
8511
8512   --------------------
8513   -- Initialize_286 --
8514   --------------------
8515
8516   procedure Initialize_286 is
8517   begin
8518      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 286, (False, 0));
8519      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8520       (Base + 286,
8521        AMF.Internals.Tables.UML_String_Data_02.MS_0237'Access);
8522      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 286, (False, (Unlimited => True)));
8523      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 286, (False, AMF.CMOF.Public_Visibility));
8524   end Initialize_286;
8525
8526   --------------------
8527   -- Initialize_287 --
8528   --------------------
8529
8530   procedure Initialize_287 is
8531   begin
8532      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 287, True);
8533      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 287, (False, 0));
8534      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8535       (Base + 287,
8536        AMF.Internals.Tables.UML_String_Data_0C.MS_0C46'Access);
8537      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 287, (False, (Unlimited => True)));
8538      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 287, (False, AMF.CMOF.Public_Visibility));
8539   end Initialize_287;
8540
8541   --------------------
8542   -- Initialize_288 --
8543   --------------------
8544
8545   procedure Initialize_288 is
8546   begin
8547      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 288, True);
8548      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 288, (False, 0));
8549      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8550       (Base + 288,
8551        AMF.Internals.Tables.UML_String_Data_0B.MS_0BFF'Access);
8552      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 288, (False, (Unlimited => True)));
8553      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 288, (False, AMF.CMOF.Public_Visibility));
8554   end Initialize_288;
8555
8556   --------------------
8557   -- Initialize_289 --
8558   --------------------
8559
8560   procedure Initialize_289 is
8561   begin
8562      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 289, True);
8563      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 289, True);
8564      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 289, (False, 0));
8565      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8566       (Base + 289,
8567        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
8568      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 289, (False, (Unlimited => True)));
8569      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 289, (False, AMF.CMOF.Public_Visibility));
8570   end Initialize_289;
8571
8572   --------------------
8573   -- Initialize_290 --
8574   --------------------
8575
8576   procedure Initialize_290 is
8577   begin
8578      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 290, True);
8579      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 290, True);
8580      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 290, (False, 0));
8581      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8582       (Base + 290,
8583        AMF.Internals.Tables.UML_String_Data_02.MS_0202'Access);
8584      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 290, (False, (Unlimited => True)));
8585      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 290, (False, AMF.CMOF.Public_Visibility));
8586   end Initialize_290;
8587
8588   --------------------
8589   -- Initialize_291 --
8590   --------------------
8591
8592   procedure Initialize_291 is
8593   begin
8594      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 291, True);
8595      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 291, True);
8596      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 291, (False, 0));
8597      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8598       (Base + 291,
8599        AMF.Internals.Tables.UML_String_Data_06.MS_06FB'Access);
8600      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 291, (False, (Unlimited => True)));
8601      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 291, (False, AMF.CMOF.Public_Visibility));
8602   end Initialize_291;
8603
8604   --------------------
8605   -- Initialize_292 --
8606   --------------------
8607
8608   procedure Initialize_292 is
8609   begin
8610      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 292, True);
8611      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 292, True);
8612      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 292, (False, 0));
8613      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8614       (Base + 292,
8615        AMF.Internals.Tables.UML_String_Data_01.MS_019B'Access);
8616      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 292, (False, (Unlimited => True)));
8617      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 292, (False, AMF.CMOF.Public_Visibility));
8618   end Initialize_292;
8619
8620   --------------------
8621   -- Initialize_293 --
8622   --------------------
8623
8624   procedure Initialize_293 is
8625   begin
8626      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 293, True);
8627      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 293, True);
8628      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 293, (False, 0));
8629      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8630       (Base + 293,
8631        AMF.Internals.Tables.UML_String_Data_04.MS_04B1'Access);
8632      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 293, (False, (Unlimited => True)));
8633      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 293, (False, AMF.CMOF.Public_Visibility));
8634   end Initialize_293;
8635
8636   --------------------
8637   -- Initialize_294 --
8638   --------------------
8639
8640   procedure Initialize_294 is
8641   begin
8642      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 294, True);
8643      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 294, (False, 0));
8644      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8645       (Base + 294,
8646        AMF.Internals.Tables.UML_String_Data_02.MS_02CB'Access);
8647      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 294, (False, (Unlimited => True)));
8648      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 294, (False, AMF.CMOF.Public_Visibility));
8649   end Initialize_294;
8650
8651   --------------------
8652   -- Initialize_295 --
8653   --------------------
8654
8655   procedure Initialize_295 is
8656   begin
8657      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 295, True);
8658      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 295, (False, 0));
8659      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8660       (Base + 295,
8661        AMF.Internals.Tables.UML_String_Data_09.MS_091E'Access);
8662      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 295, (False, (Unlimited => True)));
8663      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 295, (False, AMF.CMOF.Public_Visibility));
8664   end Initialize_295;
8665
8666   --------------------
8667   -- Initialize_296 --
8668   --------------------
8669
8670   procedure Initialize_296 is
8671   begin
8672      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 296, True);
8673      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived_Union (Base + 296, True);
8674      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 296, True);
8675      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 296, (False, 0));
8676      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8677       (Base + 296,
8678        AMF.Internals.Tables.UML_String_Data_04.MS_04E1'Access);
8679      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 296, (False, (Unlimited => True)));
8680      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 296, (False, AMF.CMOF.Public_Visibility));
8681   end Initialize_296;
8682
8683   --------------------
8684   -- Initialize_297 --
8685   --------------------
8686
8687   procedure Initialize_297 is
8688   begin
8689      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 297, True);
8690      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 297, (False, 0));
8691      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8692       (Base + 297,
8693        AMF.Internals.Tables.UML_String_Data_03.MS_0308'Access);
8694      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 297, (False, (Unlimited => True)));
8695      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 297, (False, AMF.CMOF.Public_Visibility));
8696   end Initialize_297;
8697
8698   --------------------
8699   -- Initialize_298 --
8700   --------------------
8701
8702   procedure Initialize_298 is
8703   begin
8704      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 298, True);
8705      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived_Union (Base + 298, True);
8706      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 298, True);
8707      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 298, (False, 0));
8708      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8709       (Base + 298,
8710        AMF.Internals.Tables.UML_String_Data_07.MS_0745'Access);
8711      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 298, (False, (Unlimited => True)));
8712      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 298, (False, AMF.CMOF.Public_Visibility));
8713   end Initialize_298;
8714
8715   --------------------
8716   -- Initialize_299 --
8717   --------------------
8718
8719   procedure Initialize_299 is
8720   begin
8721      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 299, True);
8722      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 299, (False, 0));
8723      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8724       (Base + 299,
8725        AMF.Internals.Tables.UML_String_Data_05.MS_0598'Access);
8726      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 299, (False, (Unlimited => True)));
8727      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 299, (False, AMF.CMOF.Public_Visibility));
8728   end Initialize_299;
8729
8730   --------------------
8731   -- Initialize_300 --
8732   --------------------
8733
8734   procedure Initialize_300 is
8735   begin
8736      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 300, True);
8737      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 300, (False, 0));
8738      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8739       (Base + 300,
8740        AMF.Internals.Tables.UML_String_Data_0C.MS_0C4E'Access);
8741      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 300, (False, (Unlimited => True)));
8742      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 300, (False, AMF.CMOF.Public_Visibility));
8743   end Initialize_300;
8744
8745   --------------------
8746   -- Initialize_301 --
8747   --------------------
8748
8749   procedure Initialize_301 is
8750   begin
8751      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 301, True);
8752      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 301, True);
8753      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 301, (False, 0));
8754      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8755       (Base + 301,
8756        AMF.Internals.Tables.UML_String_Data_07.MS_07B4'Access);
8757      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 301, (False, (Unlimited => True)));
8758      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 301, (False, AMF.CMOF.Public_Visibility));
8759   end Initialize_301;
8760
8761   --------------------
8762   -- Initialize_302 --
8763   --------------------
8764
8765   procedure Initialize_302 is
8766   begin
8767      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 302, True);
8768      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 302, (False, 0));
8769      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8770       (Base + 302,
8771        AMF.Internals.Tables.UML_String_Data_0C.MS_0C19'Access);
8772      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 302, (False, (Unlimited => True)));
8773      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 302, (False, AMF.CMOF.Public_Visibility));
8774   end Initialize_302;
8775
8776   --------------------
8777   -- Initialize_303 --
8778   --------------------
8779
8780   procedure Initialize_303 is
8781   begin
8782      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 303, (False, 0));
8783      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8784       (Base + 303,
8785        AMF.Internals.Tables.UML_String_Data_01.MS_01E6'Access);
8786      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 303, (False, (Unlimited => True)));
8787      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 303, (False, AMF.CMOF.Public_Visibility));
8788   end Initialize_303;
8789
8790   --------------------
8791   -- Initialize_304 --
8792   --------------------
8793
8794   procedure Initialize_304 is
8795   begin
8796      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 304, (False, 0));
8797      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8798       (Base + 304,
8799        AMF.Internals.Tables.UML_String_Data_06.MS_060F'Access);
8800      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 304, (False, (Unlimited => True)));
8801      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 304, (False, AMF.CMOF.Public_Visibility));
8802   end Initialize_304;
8803
8804   --------------------
8805   -- Initialize_305 --
8806   --------------------
8807
8808   procedure Initialize_305 is
8809   begin
8810      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 305, True);
8811      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 305, (False, 0));
8812      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8813       (Base + 305,
8814        AMF.Internals.Tables.UML_String_Data_0B.MS_0B29'Access);
8815      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 305, (False, (Unlimited => True)));
8816      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 305, (False, AMF.CMOF.Public_Visibility));
8817   end Initialize_305;
8818
8819   --------------------
8820   -- Initialize_306 --
8821   --------------------
8822
8823   procedure Initialize_306 is
8824   begin
8825      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 306, (False, 0));
8826      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8827       (Base + 306,
8828        AMF.Internals.Tables.UML_String_Data_00.MS_00B9'Access);
8829      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 306, (False, (Unlimited => True)));
8830      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 306, (False, AMF.CMOF.Public_Visibility));
8831   end Initialize_306;
8832
8833   --------------------
8834   -- Initialize_307 --
8835   --------------------
8836
8837   procedure Initialize_307 is
8838   begin
8839      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 307, (False, 0));
8840      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8841       (Base + 307,
8842        AMF.Internals.Tables.UML_String_Data_06.MS_0646'Access);
8843      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 307, (False, (Unlimited => True)));
8844      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 307, (False, AMF.CMOF.Public_Visibility));
8845   end Initialize_307;
8846
8847   --------------------
8848   -- Initialize_308 --
8849   --------------------
8850
8851   procedure Initialize_308 is
8852   begin
8853      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 308, (False, 0));
8854      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8855       (Base + 308,
8856        AMF.Internals.Tables.UML_String_Data_0B.MS_0B98'Access);
8857      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 308, (False, (Unlimited => True)));
8858      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 308, (False, AMF.CMOF.Public_Visibility));
8859   end Initialize_308;
8860
8861   --------------------
8862   -- Initialize_309 --
8863   --------------------
8864
8865   procedure Initialize_309 is
8866   begin
8867      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 309, True);
8868      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 309, (False, 0));
8869      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8870       (Base + 309,
8871        AMF.Internals.Tables.UML_String_Data_03.MS_038E'Access);
8872      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 309, (False, (Unlimited => True)));
8873      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 309, (False, AMF.CMOF.Public_Visibility));
8874   end Initialize_309;
8875
8876   --------------------
8877   -- Initialize_310 --
8878   --------------------
8879
8880   procedure Initialize_310 is
8881   begin
8882      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 310, (False, 0));
8883      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8884       (Base + 310,
8885        AMF.Internals.Tables.UML_String_Data_08.MS_08CC'Access);
8886      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 310, (False, (Unlimited => True)));
8887      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 310, (False, AMF.CMOF.Public_Visibility));
8888   end Initialize_310;
8889
8890   --------------------
8891   -- Initialize_311 --
8892   --------------------
8893
8894   procedure Initialize_311 is
8895   begin
8896      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 311, (False, 0));
8897      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8898       (Base + 311,
8899        AMF.Internals.Tables.UML_String_Data_07.MS_07C3'Access);
8900      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 311, (False, (Unlimited => True)));
8901      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 311, (False, AMF.CMOF.Public_Visibility));
8902   end Initialize_311;
8903
8904   --------------------
8905   -- Initialize_312 --
8906   --------------------
8907
8908   procedure Initialize_312 is
8909   begin
8910      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8911       (Base + 312,
8912        AMF.Internals.Tables.UML_String_Data_04.MS_048C'Access);
8913      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 312, (False, (Unlimited => True)));
8914      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 312, (False, AMF.CMOF.Public_Visibility));
8915   end Initialize_312;
8916
8917   --------------------
8918   -- Initialize_313 --
8919   --------------------
8920
8921   procedure Initialize_313 is
8922   begin
8923      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 313, (False, 0));
8924      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8925       (Base + 313,
8926        AMF.Internals.Tables.UML_String_Data_04.MS_04B4'Access);
8927      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 313, (False, (Unlimited => True)));
8928      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 313, (False, AMF.CMOF.Public_Visibility));
8929   end Initialize_313;
8930
8931   --------------------
8932   -- Initialize_314 --
8933   --------------------
8934
8935   procedure Initialize_314 is
8936   begin
8937      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 314, True);
8938      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 314, (False, 0));
8939      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8940       (Base + 314,
8941        AMF.Internals.Tables.UML_String_Data_01.MS_01DC'Access);
8942      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 314, (False, (Unlimited => True)));
8943      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 314, (False, AMF.CMOF.Public_Visibility));
8944   end Initialize_314;
8945
8946   --------------------
8947   -- Initialize_315 --
8948   --------------------
8949
8950   procedure Initialize_315 is
8951   begin
8952      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 315, True);
8953      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 315, (False, 0));
8954      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8955       (Base + 315,
8956        AMF.Internals.Tables.UML_String_Data_04.MS_0439'Access);
8957      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 315, (False, (Unlimited => True)));
8958      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 315, (False, AMF.CMOF.Public_Visibility));
8959   end Initialize_315;
8960
8961   --------------------
8962   -- Initialize_316 --
8963   --------------------
8964
8965   procedure Initialize_316 is
8966   begin
8967      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 316, True);
8968      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 316, True);
8969      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8970       (Base + 316,
8971        AMF.Internals.Tables.UML_String_Data_0C.MS_0C8C'Access);
8972      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 316, (False, (Unlimited => True)));
8973      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 316, (False, AMF.CMOF.Public_Visibility));
8974   end Initialize_316;
8975
8976   --------------------
8977   -- Initialize_317 --
8978   --------------------
8979
8980   procedure Initialize_317 is
8981   begin
8982      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 317, (False, 0));
8983      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8984       (Base + 317,
8985        AMF.Internals.Tables.UML_String_Data_06.MS_06BC'Access);
8986      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 317, (False, (Unlimited => True)));
8987      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 317, (False, AMF.CMOF.Public_Visibility));
8988   end Initialize_317;
8989
8990   --------------------
8991   -- Initialize_318 --
8992   --------------------
8993
8994   procedure Initialize_318 is
8995   begin
8996      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 318, True);
8997      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 318, (False, 0));
8998      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
8999       (Base + 318,
9000        AMF.Internals.Tables.UML_String_Data_06.MS_0669'Access);
9001      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 318, (False, (Unlimited => True)));
9002      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 318, (False, AMF.CMOF.Public_Visibility));
9003   end Initialize_318;
9004
9005   --------------------
9006   -- Initialize_319 --
9007   --------------------
9008
9009   procedure Initialize_319 is
9010   begin
9011      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 319, True);
9012      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 319, True);
9013      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 319, (False, 0));
9014      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9015       (Base + 319,
9016        AMF.Internals.Tables.UML_String_Data_0B.MS_0B2C'Access);
9017      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 319, (False, (Unlimited => True)));
9018      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 319, (False, AMF.CMOF.Public_Visibility));
9019   end Initialize_319;
9020
9021   --------------------
9022   -- Initialize_320 --
9023   --------------------
9024
9025   procedure Initialize_320 is
9026   begin
9027      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 320, True);
9028      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 320, (False, 0));
9029      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9030       (Base + 320,
9031        AMF.Internals.Tables.UML_String_Data_01.MS_01F3'Access);
9032      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 320, (False, (Unlimited => True)));
9033      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 320, (False, AMF.CMOF.Public_Visibility));
9034   end Initialize_320;
9035
9036   --------------------
9037   -- Initialize_321 --
9038   --------------------
9039
9040   procedure Initialize_321 is
9041   begin
9042      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 321, True);
9043      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 321, True);
9044      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 321, (False, 0));
9045      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9046       (Base + 321,
9047        AMF.Internals.Tables.UML_String_Data_01.MS_0108'Access);
9048      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 321, (False, (Unlimited => True)));
9049      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 321, (False, AMF.CMOF.Public_Visibility));
9050   end Initialize_321;
9051
9052   --------------------
9053   -- Initialize_322 --
9054   --------------------
9055
9056   procedure Initialize_322 is
9057   begin
9058      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9059       (Base + 322,
9060        AMF.Internals.Tables.UML_String_Data_05.MS_0528'Access);
9061      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 322, (False, (Unlimited => True)));
9062      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 322, (False, AMF.CMOF.Public_Visibility));
9063   end Initialize_322;
9064
9065   --------------------
9066   -- Initialize_323 --
9067   --------------------
9068
9069   procedure Initialize_323 is
9070   begin
9071      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 323, True);
9072      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9073       (Base + 323,
9074        AMF.Internals.Tables.UML_String_Data_03.MS_0359'Access);
9075      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 323, (False, (Unlimited => True)));
9076      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 323, (False, AMF.CMOF.Public_Visibility));
9077   end Initialize_323;
9078
9079   --------------------
9080   -- Initialize_324 --
9081   --------------------
9082
9083   procedure Initialize_324 is
9084   begin
9085      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 324, True);
9086      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 324, True);
9087      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 324, (False, 0));
9088      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9089       (Base + 324,
9090        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
9091      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 324, (False, (Unlimited => True)));
9092      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 324, (False, AMF.CMOF.Public_Visibility));
9093   end Initialize_324;
9094
9095   --------------------
9096   -- Initialize_325 --
9097   --------------------
9098
9099   procedure Initialize_325 is
9100   begin
9101      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 325, True);
9102      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 325, True);
9103      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 325, True);
9104      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 325, (False, 0));
9105      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9106       (Base + 325,
9107        AMF.Internals.Tables.UML_String_Data_02.MS_0277'Access);
9108      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 325, (False, (Unlimited => True)));
9109      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 325, (False, AMF.CMOF.Public_Visibility));
9110   end Initialize_325;
9111
9112   --------------------
9113   -- Initialize_326 --
9114   --------------------
9115
9116   procedure Initialize_326 is
9117   begin
9118      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 326, (False, 0));
9119      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9120       (Base + 326,
9121        AMF.Internals.Tables.UML_String_Data_02.MS_0271'Access);
9122      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 326, (False, (Unlimited => True)));
9123      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 326, (False, AMF.CMOF.Public_Visibility));
9124   end Initialize_326;
9125
9126   --------------------
9127   -- Initialize_327 --
9128   --------------------
9129
9130   procedure Initialize_327 is
9131   begin
9132      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 327, (False, 0));
9133      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9134       (Base + 327,
9135        AMF.Internals.Tables.UML_String_Data_0A.MS_0A37'Access);
9136      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 327, (False, (Unlimited => True)));
9137      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 327, (False, AMF.CMOF.Public_Visibility));
9138   end Initialize_327;
9139
9140   --------------------
9141   -- Initialize_328 --
9142   --------------------
9143
9144   procedure Initialize_328 is
9145   begin
9146      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 328, (False, 0));
9147      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9148       (Base + 328,
9149        AMF.Internals.Tables.UML_String_Data_01.MS_01F0'Access);
9150      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 328, (False, (Unlimited => True)));
9151      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 328, (False, AMF.CMOF.Public_Visibility));
9152   end Initialize_328;
9153
9154   --------------------
9155   -- Initialize_329 --
9156   --------------------
9157
9158   procedure Initialize_329 is
9159   begin
9160      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 329, True);
9161      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 329, True);
9162      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 329, (False, 2));
9163      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9164       (Base + 329,
9165        AMF.Internals.Tables.UML_String_Data_02.MS_0277'Access);
9166      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 329, (False, (Unlimited => True)));
9167      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 329, (False, AMF.CMOF.Public_Visibility));
9168   end Initialize_329;
9169
9170   --------------------
9171   -- Initialize_330 --
9172   --------------------
9173
9174   procedure Initialize_330 is
9175   begin
9176      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 330, (False, 0));
9177      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9178       (Base + 330,
9179        AMF.Internals.Tables.UML_String_Data_08.MS_08B1'Access);
9180      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 330, (False, (Unlimited => True)));
9181      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 330, (False, AMF.CMOF.Public_Visibility));
9182   end Initialize_330;
9183
9184   --------------------
9185   -- Initialize_331 --
9186   --------------------
9187
9188   procedure Initialize_331 is
9189   begin
9190      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 331, (False, 0));
9191      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9192       (Base + 331,
9193        AMF.Internals.Tables.UML_String_Data_07.MS_0736'Access);
9194      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 331, (False, (Unlimited => True)));
9195      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 331, (False, AMF.CMOF.Public_Visibility));
9196   end Initialize_331;
9197
9198   --------------------
9199   -- Initialize_332 --
9200   --------------------
9201
9202   procedure Initialize_332 is
9203   begin
9204      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 332, True);
9205      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 332, (False, 0));
9206      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9207       (Base + 332,
9208        AMF.Internals.Tables.UML_String_Data_08.MS_08C8'Access);
9209      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 332, (False, (Unlimited => True)));
9210      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 332, (False, AMF.CMOF.Public_Visibility));
9211   end Initialize_332;
9212
9213   --------------------
9214   -- Initialize_333 --
9215   --------------------
9216
9217   procedure Initialize_333 is
9218   begin
9219      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 333, True);
9220      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 333, (False, 2));
9221      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9222       (Base + 333,
9223        AMF.Internals.Tables.UML_String_Data_04.MS_04BB'Access);
9224      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 333, (False, (Unlimited => True)));
9225      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 333, (False, AMF.CMOF.Public_Visibility));
9226   end Initialize_333;
9227
9228   --------------------
9229   -- Initialize_334 --
9230   --------------------
9231
9232   procedure Initialize_334 is
9233   begin
9234      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 334, True);
9235      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 334, True);
9236      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 334, (False, 0));
9237      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9238       (Base + 334,
9239        AMF.Internals.Tables.UML_String_Data_01.MS_019B'Access);
9240      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 334, (False, (Unlimited => True)));
9241      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 334, (False, AMF.CMOF.Public_Visibility));
9242   end Initialize_334;
9243
9244   --------------------
9245   -- Initialize_335 --
9246   --------------------
9247
9248   procedure Initialize_335 is
9249   begin
9250      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 335, True);
9251      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 335, True);
9252      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 335, (False, 0));
9253      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9254       (Base + 335,
9255        AMF.Internals.Tables.UML_String_Data_04.MS_04B1'Access);
9256      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 335, (False, (Unlimited => True)));
9257      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 335, (False, AMF.CMOF.Public_Visibility));
9258   end Initialize_335;
9259
9260   --------------------
9261   -- Initialize_336 --
9262   --------------------
9263
9264   procedure Initialize_336 is
9265   begin
9266      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9267       (Base + 336,
9268        AMF.Internals.Tables.UML_String_Data_0B.MS_0B0A'Access);
9269      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 336, (False, (Unlimited => True)));
9270      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 336, (False, AMF.CMOF.Public_Visibility));
9271   end Initialize_336;
9272
9273   --------------------
9274   -- Initialize_337 --
9275   --------------------
9276
9277   procedure Initialize_337 is
9278   begin
9279      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9280       (Base + 337,
9281        AMF.Internals.Tables.UML_String_Data_00.MS_00D0'Access);
9282      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 337, (False, (Unlimited => True)));
9283      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 337, (False, AMF.CMOF.Public_Visibility));
9284   end Initialize_337;
9285
9286   --------------------
9287   -- Initialize_338 --
9288   --------------------
9289
9290   procedure Initialize_338 is
9291   begin
9292      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 338, True);
9293      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 338, (False, 0));
9294      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9295       (Base + 338,
9296        AMF.Internals.Tables.UML_String_Data_01.MS_011D'Access);
9297      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 338, (False, (Unlimited => True)));
9298      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 338, (False, AMF.CMOF.Public_Visibility));
9299   end Initialize_338;
9300
9301   --------------------
9302   -- Initialize_339 --
9303   --------------------
9304
9305   procedure Initialize_339 is
9306   begin
9307      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 339, (False, 0));
9308      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9309       (Base + 339,
9310        AMF.Internals.Tables.UML_String_Data_08.MS_08A2'Access);
9311      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 339, (False, (Unlimited => True)));
9312      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 339, (False, AMF.CMOF.Public_Visibility));
9313   end Initialize_339;
9314
9315   --------------------
9316   -- Initialize_340 --
9317   --------------------
9318
9319   procedure Initialize_340 is
9320   begin
9321      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 340, True);
9322      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 340, True);
9323      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 340, (False, 0));
9324      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9325       (Base + 340,
9326        AMF.Internals.Tables.UML_String_Data_04.MS_048D'Access);
9327      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 340, (False, (Unlimited => True)));
9328      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 340, (False, AMF.CMOF.Public_Visibility));
9329   end Initialize_340;
9330
9331   --------------------
9332   -- Initialize_341 --
9333   --------------------
9334
9335   procedure Initialize_341 is
9336   begin
9337      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 341, True);
9338      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 341, (False, 0));
9339      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9340       (Base + 341,
9341        AMF.Internals.Tables.UML_String_Data_03.MS_03AD'Access);
9342      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 341, (False, (Unlimited => True)));
9343      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 341, (False, AMF.CMOF.Public_Visibility));
9344   end Initialize_341;
9345
9346   --------------------
9347   -- Initialize_342 --
9348   --------------------
9349
9350   procedure Initialize_342 is
9351   begin
9352      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 342, True);
9353      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 342, (False, 2));
9354      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9355       (Base + 342,
9356        AMF.Internals.Tables.UML_String_Data_04.MS_04BB'Access);
9357      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 342, (False, (Unlimited => True)));
9358      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 342, (False, AMF.CMOF.Public_Visibility));
9359   end Initialize_342;
9360
9361   --------------------
9362   -- Initialize_343 --
9363   --------------------
9364
9365   procedure Initialize_343 is
9366   begin
9367      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 343, True);
9368      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived_Union (Base + 343, True);
9369      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 343, True);
9370      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9371       (Base + 343,
9372        AMF.Internals.Tables.UML_String_Data_02.MS_028D'Access);
9373      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 343, (False, (Unlimited => True)));
9374      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 343, (False, AMF.CMOF.Public_Visibility));
9375   end Initialize_343;
9376
9377   --------------------
9378   -- Initialize_344 --
9379   --------------------
9380
9381   procedure Initialize_344 is
9382   begin
9383      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 344, True);
9384      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived_Union (Base + 344, True);
9385      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 344, True);
9386      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9387       (Base + 344,
9388        AMF.Internals.Tables.UML_String_Data_05.MS_05D0'Access);
9389      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 344, (False, (Unlimited => True)));
9390      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 344, (False, AMF.CMOF.Public_Visibility));
9391   end Initialize_344;
9392
9393   --------------------
9394   -- Initialize_345 --
9395   --------------------
9396
9397   procedure Initialize_345 is
9398   begin
9399      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 345, (False, 0));
9400      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9401       (Base + 345,
9402        AMF.Internals.Tables.UML_String_Data_09.MS_090B'Access);
9403      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 345, (False, (Unlimited => True)));
9404      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 345, (False, AMF.CMOF.Public_Visibility));
9405   end Initialize_345;
9406
9407   --------------------
9408   -- Initialize_346 --
9409   --------------------
9410
9411   procedure Initialize_346 is
9412   begin
9413      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9414       (Base + 346,
9415        AMF.Internals.Tables.UML_String_Data_08.MS_08D0'Access);
9416      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 346, (False, (False, 2)));
9417      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 346, (False, AMF.CMOF.Public_Visibility));
9418   end Initialize_346;
9419
9420   --------------------
9421   -- Initialize_347 --
9422   --------------------
9423
9424   procedure Initialize_347 is
9425   begin
9426      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 347, True);
9427      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 347, (False, 0));
9428      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9429       (Base + 347,
9430        AMF.Internals.Tables.UML_String_Data_04.MS_047D'Access);
9431      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 347, (False, (Unlimited => True)));
9432      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 347, (False, AMF.CMOF.Public_Visibility));
9433   end Initialize_347;
9434
9435   --------------------
9436   -- Initialize_348 --
9437   --------------------
9438
9439   procedure Initialize_348 is
9440   begin
9441      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 348, True);
9442      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 348, True);
9443      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived_Union (Base + 348, True);
9444      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 348, True);
9445      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 348, (False, 0));
9446      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9447       (Base + 348,
9448        AMF.Internals.Tables.UML_String_Data_0A.MS_0A22'Access);
9449      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 348, (False, (Unlimited => True)));
9450      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 348, (False, AMF.CMOF.Public_Visibility));
9451   end Initialize_348;
9452
9453   --------------------
9454   -- Initialize_349 --
9455   --------------------
9456
9457   procedure Initialize_349 is
9458   begin
9459      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 349, True);
9460      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 349, True);
9461      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 349, True);
9462      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 349, (False, 0));
9463      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9464       (Base + 349,
9465        AMF.Internals.Tables.UML_String_Data_0B.MS_0B52'Access);
9466      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 349, (False, (Unlimited => True)));
9467      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 349, (False, AMF.CMOF.Public_Visibility));
9468   end Initialize_349;
9469
9470   --------------------
9471   -- Initialize_350 --
9472   --------------------
9473
9474   procedure Initialize_350 is
9475   begin
9476      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 350, True);
9477      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 350, True);
9478      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 350, (False, 0));
9479      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9480       (Base + 350,
9481        AMF.Internals.Tables.UML_String_Data_09.MS_0971'Access);
9482      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 350, (False, (Unlimited => True)));
9483      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 350, (False, AMF.CMOF.Public_Visibility));
9484   end Initialize_350;
9485
9486   --------------------
9487   -- Initialize_351 --
9488   --------------------
9489
9490   procedure Initialize_351 is
9491   begin
9492      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9493       (Base + 351,
9494        AMF.Internals.Tables.UML_String_Data_01.MS_0125'Access);
9495      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 351, (False, (Unlimited => True)));
9496      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 351, (False, AMF.CMOF.Public_Visibility));
9497   end Initialize_351;
9498
9499   --------------------
9500   -- Initialize_352 --
9501   --------------------
9502
9503   procedure Initialize_352 is
9504   begin
9505      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 352, True);
9506      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 352, (False, 0));
9507      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9508       (Base + 352,
9509        AMF.Internals.Tables.UML_String_Data_07.MS_0705'Access);
9510      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 352, (False, (Unlimited => True)));
9511      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 352, (False, AMF.CMOF.Public_Visibility));
9512   end Initialize_352;
9513
9514   --------------------
9515   -- Initialize_353 --
9516   --------------------
9517
9518   procedure Initialize_353 is
9519   begin
9520      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9521       (Base + 353,
9522        AMF.Internals.Tables.UML_String_Data_02.MS_02B3'Access);
9523      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 353, (False, (Unlimited => True)));
9524      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 353, (False, AMF.CMOF.Public_Visibility));
9525   end Initialize_353;
9526
9527   --------------------
9528   -- Initialize_354 --
9529   --------------------
9530
9531   procedure Initialize_354 is
9532   begin
9533      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 354, (False, 0));
9534      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9535       (Base + 354,
9536        AMF.Internals.Tables.UML_String_Data_05.MS_05A8'Access);
9537      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 354, (False, (Unlimited => True)));
9538      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 354, (False, AMF.CMOF.Public_Visibility));
9539   end Initialize_354;
9540
9541   --------------------
9542   -- Initialize_355 --
9543   --------------------
9544
9545   procedure Initialize_355 is
9546   begin
9547      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 355, True);
9548      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 355, True);
9549      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 355, (False, 0));
9550      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9551       (Base + 355,
9552        AMF.Internals.Tables.UML_String_Data_0C.MS_0C8C'Access);
9553      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 355, (False, (Unlimited => True)));
9554      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 355, (False, AMF.CMOF.Public_Visibility));
9555   end Initialize_355;
9556
9557   --------------------
9558   -- Initialize_356 --
9559   --------------------
9560
9561   procedure Initialize_356 is
9562   begin
9563      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 356, True);
9564      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9565       (Base + 356,
9566        AMF.Internals.Tables.UML_String_Data_04.MS_041E'Access);
9567      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 356, (False, (Unlimited => True)));
9568      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 356, (False, AMF.CMOF.Public_Visibility));
9569   end Initialize_356;
9570
9571   --------------------
9572   -- Initialize_357 --
9573   --------------------
9574
9575   procedure Initialize_357 is
9576   begin
9577      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 357, True);
9578      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived_Union (Base + 357, True);
9579      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 357, True);
9580      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 357, (False, 0));
9581      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9582       (Base + 357,
9583        AMF.Internals.Tables.UML_String_Data_07.MS_07D9'Access);
9584      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 357, (False, (Unlimited => True)));
9585      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 357, (False, AMF.CMOF.Public_Visibility));
9586   end Initialize_357;
9587
9588   --------------------
9589   -- Initialize_358 --
9590   --------------------
9591
9592   procedure Initialize_358 is
9593   begin
9594      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 358, (False, 0));
9595      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9596       (Base + 358,
9597        AMF.Internals.Tables.UML_String_Data_06.MS_062F'Access);
9598      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 358, (False, (Unlimited => True)));
9599      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 358, (False, AMF.CMOF.Public_Visibility));
9600   end Initialize_358;
9601
9602   --------------------
9603   -- Initialize_359 --
9604   --------------------
9605
9606   procedure Initialize_359 is
9607   begin
9608      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 359, (False, 0));
9609      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9610       (Base + 359,
9611        AMF.Internals.Tables.UML_String_Data_0C.MS_0C4E'Access);
9612      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 359, (False, (Unlimited => True)));
9613      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 359, (False, AMF.CMOF.Public_Visibility));
9614   end Initialize_359;
9615
9616   --------------------
9617   -- Initialize_360 --
9618   --------------------
9619
9620   procedure Initialize_360 is
9621   begin
9622      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9623       (Base + 360,
9624        AMF.Internals.Tables.UML_String_Data_09.MS_0962'Access);
9625      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 360, (False, (Unlimited => True)));
9626      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 360, (False, AMF.CMOF.Public_Visibility));
9627   end Initialize_360;
9628
9629   --------------------
9630   -- Initialize_361 --
9631   --------------------
9632
9633   procedure Initialize_361 is
9634   begin
9635      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9636       (Base + 361,
9637        AMF.Internals.Tables.UML_String_Data_02.MS_02B9'Access);
9638      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 361, (False, (Unlimited => True)));
9639      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 361, (False, AMF.CMOF.Public_Visibility));
9640   end Initialize_361;
9641
9642   --------------------
9643   -- Initialize_362 --
9644   --------------------
9645
9646   procedure Initialize_362 is
9647   begin
9648      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9649       (Base + 362,
9650        AMF.Internals.Tables.UML_String_Data_06.MS_06EA'Access);
9651      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 362, (False, (Unlimited => True)));
9652      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 362, (False, AMF.CMOF.Public_Visibility));
9653   end Initialize_362;
9654
9655   --------------------
9656   -- Initialize_363 --
9657   --------------------
9658
9659   procedure Initialize_363 is
9660   begin
9661      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 363, (False, 0));
9662      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9663       (Base + 363,
9664        AMF.Internals.Tables.UML_String_Data_01.MS_01F3'Access);
9665      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 363, (False, (Unlimited => True)));
9666      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 363, (False, AMF.CMOF.Public_Visibility));
9667   end Initialize_363;
9668
9669   --------------------
9670   -- Initialize_364 --
9671   --------------------
9672
9673   procedure Initialize_364 is
9674   begin
9675      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 364, (False, 0));
9676      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9677       (Base + 364,
9678        AMF.Internals.Tables.UML_String_Data_06.MS_0637'Access);
9679      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 364, (False, (Unlimited => True)));
9680      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 364, (False, AMF.CMOF.Public_Visibility));
9681   end Initialize_364;
9682
9683   --------------------
9684   -- Initialize_365 --
9685   --------------------
9686
9687   procedure Initialize_365 is
9688   begin
9689      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 365, (False, 0));
9690      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9691       (Base + 365,
9692        AMF.Internals.Tables.UML_String_Data_03.MS_037C'Access);
9693      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 365, (False, (Unlimited => True)));
9694      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 365, (False, AMF.CMOF.Public_Visibility));
9695   end Initialize_365;
9696
9697   --------------------
9698   -- Initialize_366 --
9699   --------------------
9700
9701   procedure Initialize_366 is
9702   begin
9703      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 366, (False, 0));
9704      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9705       (Base + 366,
9706        AMF.Internals.Tables.UML_String_Data_07.MS_07CF'Access);
9707      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 366, (False, (Unlimited => True)));
9708      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 366, (False, AMF.CMOF.Public_Visibility));
9709   end Initialize_366;
9710
9711   --------------------
9712   -- Initialize_367 --
9713   --------------------
9714
9715   procedure Initialize_367 is
9716   begin
9717      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 367, (False, 0));
9718      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9719       (Base + 367,
9720        AMF.Internals.Tables.UML_String_Data_0B.MS_0B18'Access);
9721      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 367, (False, (Unlimited => True)));
9722      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 367, (False, AMF.CMOF.Public_Visibility));
9723   end Initialize_367;
9724
9725   --------------------
9726   -- Initialize_368 --
9727   --------------------
9728
9729   procedure Initialize_368 is
9730   begin
9731      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 368, (False, 0));
9732      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9733       (Base + 368,
9734        AMF.Internals.Tables.UML_String_Data_03.MS_0321'Access);
9735      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 368, (False, (Unlimited => True)));
9736      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 368, (False, AMF.CMOF.Public_Visibility));
9737   end Initialize_368;
9738
9739   --------------------
9740   -- Initialize_369 --
9741   --------------------
9742
9743   procedure Initialize_369 is
9744   begin
9745      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 369, True);
9746      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 369, (False, 0));
9747      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9748       (Base + 369,
9749        AMF.Internals.Tables.UML_String_Data_05.MS_052F'Access);
9750      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 369, (False, (Unlimited => True)));
9751      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 369, (False, AMF.CMOF.Public_Visibility));
9752   end Initialize_369;
9753
9754   --------------------
9755   -- Initialize_370 --
9756   --------------------
9757
9758   procedure Initialize_370 is
9759   begin
9760      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 370, True);
9761      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 370, (False, 0));
9762      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9763       (Base + 370,
9764        AMF.Internals.Tables.UML_String_Data_07.MS_07C7'Access);
9765      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 370, (False, (Unlimited => True)));
9766      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 370, (False, AMF.CMOF.Public_Visibility));
9767   end Initialize_370;
9768
9769   --------------------
9770   -- Initialize_371 --
9771   --------------------
9772
9773   procedure Initialize_371 is
9774   begin
9775      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 371, True);
9776      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 371, (False, 0));
9777      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9778       (Base + 371,
9779        AMF.Internals.Tables.UML_String_Data_07.MS_0748'Access);
9780      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 371, (False, (Unlimited => True)));
9781      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 371, (False, AMF.CMOF.Public_Visibility));
9782   end Initialize_371;
9783
9784   --------------------
9785   -- Initialize_372 --
9786   --------------------
9787
9788   procedure Initialize_372 is
9789   begin
9790      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 372, True);
9791      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 372, True);
9792      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 372, (False, 0));
9793      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9794       (Base + 372,
9795        AMF.Internals.Tables.UML_String_Data_04.MS_0449'Access);
9796      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 372, (False, (Unlimited => True)));
9797      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 372, (False, AMF.CMOF.Public_Visibility));
9798   end Initialize_372;
9799
9800   --------------------
9801   -- Initialize_373 --
9802   --------------------
9803
9804   procedure Initialize_373 is
9805   begin
9806      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 373, True);
9807      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 373, (False, 0));
9808      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9809       (Base + 373,
9810        AMF.Internals.Tables.UML_String_Data_05.MS_057B'Access);
9811      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 373, (False, (Unlimited => True)));
9812      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 373, (False, AMF.CMOF.Public_Visibility));
9813   end Initialize_373;
9814
9815   --------------------
9816   -- Initialize_374 --
9817   --------------------
9818
9819   procedure Initialize_374 is
9820   begin
9821      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 374, True);
9822      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 374, (False, 0));
9823      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9824       (Base + 374,
9825        AMF.Internals.Tables.UML_String_Data_07.MS_0736'Access);
9826      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 374, (False, (Unlimited => True)));
9827      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 374, (False, AMF.CMOF.Public_Visibility));
9828   end Initialize_374;
9829
9830   --------------------
9831   -- Initialize_375 --
9832   --------------------
9833
9834   procedure Initialize_375 is
9835   begin
9836      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 375, (False, 0));
9837      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9838       (Base + 375,
9839        AMF.Internals.Tables.UML_String_Data_02.MS_02BA'Access);
9840      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 375, (False, (Unlimited => True)));
9841      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 375, (False, AMF.CMOF.Public_Visibility));
9842   end Initialize_375;
9843
9844   --------------------
9845   -- Initialize_376 --
9846   --------------------
9847
9848   procedure Initialize_376 is
9849   begin
9850      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 376, True);
9851      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 376, (False, 0));
9852      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9853       (Base + 376,
9854        AMF.Internals.Tables.UML_String_Data_01.MS_0117'Access);
9855      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 376, (False, (Unlimited => True)));
9856      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 376, (False, AMF.CMOF.Public_Visibility));
9857   end Initialize_376;
9858
9859   --------------------
9860   -- Initialize_377 --
9861   --------------------
9862
9863   procedure Initialize_377 is
9864   begin
9865      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 377, True);
9866      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 377, True);
9867      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 377, (False, 0));
9868      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9869       (Base + 377,
9870        AMF.Internals.Tables.UML_String_Data_04.MS_0449'Access);
9871      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 377, (False, (Unlimited => True)));
9872      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 377, (False, AMF.CMOF.Public_Visibility));
9873   end Initialize_377;
9874
9875   --------------------
9876   -- Initialize_378 --
9877   --------------------
9878
9879   procedure Initialize_378 is
9880   begin
9881      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 378, True);
9882      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 378, (False, 0));
9883      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9884       (Base + 378,
9885        AMF.Internals.Tables.UML_String_Data_03.MS_0324'Access);
9886      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 378, (False, (Unlimited => True)));
9887      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 378, (False, AMF.CMOF.Public_Visibility));
9888   end Initialize_378;
9889
9890   --------------------
9891   -- Initialize_379 --
9892   --------------------
9893
9894   procedure Initialize_379 is
9895   begin
9896      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 379, True);
9897      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 379, True);
9898      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 379, (False, 0));
9899      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9900       (Base + 379,
9901        AMF.Internals.Tables.UML_String_Data_09.MS_09B8'Access);
9902      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 379, (False, (Unlimited => True)));
9903      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 379, (False, AMF.CMOF.Public_Visibility));
9904   end Initialize_379;
9905
9906   --------------------
9907   -- Initialize_380 --
9908   --------------------
9909
9910   procedure Initialize_380 is
9911   begin
9912      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 380, True);
9913      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 380, True);
9914      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 380, (False, 0));
9915      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9916       (Base + 380,
9917        AMF.Internals.Tables.UML_String_Data_06.MS_06FB'Access);
9918      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 380, (False, (Unlimited => True)));
9919      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 380, (False, AMF.CMOF.Public_Visibility));
9920   end Initialize_380;
9921
9922   --------------------
9923   -- Initialize_381 --
9924   --------------------
9925
9926   procedure Initialize_381 is
9927   begin
9928      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 381, True);
9929      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 381, True);
9930      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 381, (False, 0));
9931      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9932       (Base + 381,
9933        AMF.Internals.Tables.UML_String_Data_01.MS_019B'Access);
9934      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 381, (False, (Unlimited => True)));
9935      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 381, (False, AMF.CMOF.Public_Visibility));
9936   end Initialize_381;
9937
9938   --------------------
9939   -- Initialize_382 --
9940   --------------------
9941
9942   procedure Initialize_382 is
9943   begin
9944      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 382, True);
9945      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 382, True);
9946      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 382, (False, 0));
9947      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9948       (Base + 382,
9949        AMF.Internals.Tables.UML_String_Data_04.MS_04B1'Access);
9950      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 382, (False, (Unlimited => True)));
9951      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 382, (False, AMF.CMOF.Public_Visibility));
9952   end Initialize_382;
9953
9954   --------------------
9955   -- Initialize_383 --
9956   --------------------
9957
9958   procedure Initialize_383 is
9959   begin
9960      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 383, True);
9961      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 383, (False, 0));
9962      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9963       (Base + 383,
9964        AMF.Internals.Tables.UML_String_Data_02.MS_02CB'Access);
9965      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 383, (False, (Unlimited => True)));
9966      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 383, (False, AMF.CMOF.Public_Visibility));
9967   end Initialize_383;
9968
9969   --------------------
9970   -- Initialize_384 --
9971   --------------------
9972
9973   procedure Initialize_384 is
9974   begin
9975      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 384, (False, 0));
9976      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9977       (Base + 384,
9978        AMF.Internals.Tables.UML_String_Data_06.MS_065D'Access);
9979      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 384, (False, (Unlimited => True)));
9980      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 384, (False, AMF.CMOF.Public_Visibility));
9981   end Initialize_384;
9982
9983   --------------------
9984   -- Initialize_385 --
9985   --------------------
9986
9987   procedure Initialize_385 is
9988   begin
9989      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 385, (False, 0));
9990      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
9991       (Base + 385,
9992        AMF.Internals.Tables.UML_String_Data_03.MS_03E0'Access);
9993      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 385, (False, (Unlimited => True)));
9994      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 385, (False, AMF.CMOF.Public_Visibility));
9995   end Initialize_385;
9996
9997   --------------------
9998   -- Initialize_386 --
9999   --------------------
10000
10001   procedure Initialize_386 is
10002   begin
10003      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 386, (False, 0));
10004      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10005       (Base + 386,
10006        AMF.Internals.Tables.UML_String_Data_07.MS_07A4'Access);
10007      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 386, (False, (Unlimited => True)));
10008      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 386, (False, AMF.CMOF.Public_Visibility));
10009   end Initialize_386;
10010
10011   --------------------
10012   -- Initialize_387 --
10013   --------------------
10014
10015   procedure Initialize_387 is
10016   begin
10017      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 387, True);
10018      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 387, True);
10019      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 387, (False, 0));
10020      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10021       (Base + 387,
10022        AMF.Internals.Tables.UML_String_Data_09.MS_09B8'Access);
10023      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 387, (False, (Unlimited => True)));
10024      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 387, (False, AMF.CMOF.Public_Visibility));
10025   end Initialize_387;
10026
10027   --------------------
10028   -- Initialize_388 --
10029   --------------------
10030
10031   procedure Initialize_388 is
10032   begin
10033      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 388, (False, 0));
10034      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10035       (Base + 388,
10036        AMF.Internals.Tables.UML_String_Data_03.MS_0351'Access);
10037      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 388, (False, (Unlimited => True)));
10038      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 388, (False, AMF.CMOF.Public_Visibility));
10039   end Initialize_388;
10040
10041   --------------------
10042   -- Initialize_389 --
10043   --------------------
10044
10045   procedure Initialize_389 is
10046   begin
10047      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 389, True);
10048      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 389, (False, 2));
10049      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10050       (Base + 389,
10051        AMF.Internals.Tables.UML_String_Data_04.MS_04BB'Access);
10052      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 389, (False, (Unlimited => True)));
10053      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 389, (False, AMF.CMOF.Public_Visibility));
10054   end Initialize_389;
10055
10056   --------------------
10057   -- Initialize_390 --
10058   --------------------
10059
10060   procedure Initialize_390 is
10061   begin
10062      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 390, True);
10063      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10064       (Base + 390,
10065        AMF.Internals.Tables.UML_String_Data_02.MS_027D'Access);
10066      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 390, (False, (Unlimited => True)));
10067      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 390, (False, AMF.CMOF.Public_Visibility));
10068   end Initialize_390;
10069
10070   --------------------
10071   -- Initialize_391 --
10072   --------------------
10073
10074   procedure Initialize_391 is
10075   begin
10076      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 391, True);
10077      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 391, (False, 0));
10078      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10079       (Base + 391,
10080        AMF.Internals.Tables.UML_String_Data_03.MS_03A6'Access);
10081      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 391, (False, (Unlimited => True)));
10082      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 391, (False, AMF.CMOF.Public_Visibility));
10083   end Initialize_391;
10084
10085   --------------------
10086   -- Initialize_392 --
10087   --------------------
10088
10089   procedure Initialize_392 is
10090   begin
10091      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 392, True);
10092      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 392, (False, 0));
10093      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10094       (Base + 392,
10095        AMF.Internals.Tables.UML_String_Data_03.MS_038E'Access);
10096      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 392, (False, (Unlimited => True)));
10097      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 392, (False, AMF.CMOF.Public_Visibility));
10098   end Initialize_392;
10099
10100   --------------------
10101   -- Initialize_393 --
10102   --------------------
10103
10104   procedure Initialize_393 is
10105   begin
10106      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 393, (False, 0));
10107      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10108       (Base + 393,
10109        AMF.Internals.Tables.UML_String_Data_08.MS_08DC'Access);
10110      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 393, (False, (Unlimited => True)));
10111      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 393, (False, AMF.CMOF.Public_Visibility));
10112   end Initialize_393;
10113
10114   --------------------
10115   -- Initialize_394 --
10116   --------------------
10117
10118   procedure Initialize_394 is
10119   begin
10120      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 394, True);
10121      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 394, (False, 0));
10122      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10123       (Base + 394,
10124        AMF.Internals.Tables.UML_String_Data_0A.MS_0AC1'Access);
10125      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 394, (False, (Unlimited => True)));
10126      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 394, (False, AMF.CMOF.Public_Visibility));
10127   end Initialize_394;
10128
10129   --------------------
10130   -- Initialize_395 --
10131   --------------------
10132
10133   procedure Initialize_395 is
10134   begin
10135      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 395, True);
10136      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 395, True);
10137      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 395, (False, 0));
10138      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10139       (Base + 395,
10140        AMF.Internals.Tables.UML_String_Data_00.MS_00A0'Access);
10141      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 395, (False, (Unlimited => True)));
10142      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 395, (False, AMF.CMOF.Public_Visibility));
10143   end Initialize_395;
10144
10145   --------------------
10146   -- Initialize_396 --
10147   --------------------
10148
10149   procedure Initialize_396 is
10150   begin
10151      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 396, True);
10152      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 396, True);
10153      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 396, (False, 0));
10154      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10155       (Base + 396,
10156        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
10157      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 396, (False, (Unlimited => True)));
10158      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 396, (False, AMF.CMOF.Public_Visibility));
10159   end Initialize_396;
10160
10161   --------------------
10162   -- Initialize_397 --
10163   --------------------
10164
10165   procedure Initialize_397 is
10166   begin
10167      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 397, (False, 0));
10168      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10169       (Base + 397,
10170        AMF.Internals.Tables.UML_String_Data_04.MS_044B'Access);
10171      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 397, (False, (Unlimited => True)));
10172      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 397, (False, AMF.CMOF.Public_Visibility));
10173   end Initialize_397;
10174
10175   --------------------
10176   -- Initialize_398 --
10177   --------------------
10178
10179   procedure Initialize_398 is
10180   begin
10181      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10182       (Base + 398,
10183        AMF.Internals.Tables.UML_String_Data_04.MS_048C'Access);
10184      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 398, (False, (Unlimited => True)));
10185      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 398, (False, AMF.CMOF.Public_Visibility));
10186   end Initialize_398;
10187
10188   --------------------
10189   -- Initialize_399 --
10190   --------------------
10191
10192   procedure Initialize_399 is
10193   begin
10194      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 399, True);
10195      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 399, True);
10196      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 399, (False, 0));
10197      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10198       (Base + 399,
10199        AMF.Internals.Tables.UML_String_Data_09.MS_09B8'Access);
10200      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 399, (False, (Unlimited => True)));
10201      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 399, (False, AMF.CMOF.Public_Visibility));
10202   end Initialize_399;
10203
10204   --------------------
10205   -- Initialize_400 --
10206   --------------------
10207
10208   procedure Initialize_400 is
10209   begin
10210      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 400, (False, 0));
10211      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10212       (Base + 400,
10213        AMF.Internals.Tables.UML_String_Data_03.MS_0323'Access);
10214      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 400, (False, (Unlimited => True)));
10215      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 400, (False, AMF.CMOF.Public_Visibility));
10216   end Initialize_400;
10217
10218   --------------------
10219   -- Initialize_401 --
10220   --------------------
10221
10222   procedure Initialize_401 is
10223   begin
10224      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 401, True);
10225      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 401, (False, 0));
10226      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10227       (Base + 401,
10228        AMF.Internals.Tables.UML_String_Data_0A.MS_0AA3'Access);
10229      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 401, (False, (Unlimited => True)));
10230      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 401, (False, AMF.CMOF.Public_Visibility));
10231   end Initialize_401;
10232
10233   --------------------
10234   -- Initialize_402 --
10235   --------------------
10236
10237   procedure Initialize_402 is
10238   begin
10239      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 402, True);
10240      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 402, True);
10241      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 402, (False, 0));
10242      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10243       (Base + 402,
10244        AMF.Internals.Tables.UML_String_Data_04.MS_045D'Access);
10245      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 402, (False, (Unlimited => True)));
10246      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 402, (False, AMF.CMOF.Public_Visibility));
10247   end Initialize_402;
10248
10249   --------------------
10250   -- Initialize_403 --
10251   --------------------
10252
10253   procedure Initialize_403 is
10254   begin
10255      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 403, True);
10256      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived_Union (Base + 403, True);
10257      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 403, True);
10258      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 403, (False, 0));
10259      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10260       (Base + 403,
10261        AMF.Internals.Tables.UML_String_Data_09.MS_09EF'Access);
10262      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 403, (False, (Unlimited => True)));
10263      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 403, (False, AMF.CMOF.Public_Visibility));
10264   end Initialize_403;
10265
10266   --------------------
10267   -- Initialize_404 --
10268   --------------------
10269
10270   procedure Initialize_404 is
10271   begin
10272      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 404, True);
10273      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 404, True);
10274      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived_Union (Base + 404, True);
10275      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 404, True);
10276      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 404, (False, 0));
10277      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10278       (Base + 404,
10279        AMF.Internals.Tables.UML_String_Data_05.MS_0505'Access);
10280      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 404, (False, (Unlimited => True)));
10281      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 404, (False, AMF.CMOF.Public_Visibility));
10282   end Initialize_404;
10283
10284   --------------------
10285   -- Initialize_405 --
10286   --------------------
10287
10288   procedure Initialize_405 is
10289   begin
10290      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 405, True);
10291      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 405, (False, 0));
10292      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10293       (Base + 405,
10294        AMF.Internals.Tables.UML_String_Data_07.MS_0765'Access);
10295      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 405, (False, (Unlimited => True)));
10296      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 405, (False, AMF.CMOF.Public_Visibility));
10297   end Initialize_405;
10298
10299   --------------------
10300   -- Initialize_406 --
10301   --------------------
10302
10303   procedure Initialize_406 is
10304   begin
10305      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 406, True);
10306      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 406, (False, 0));
10307      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10308       (Base + 406,
10309        AMF.Internals.Tables.UML_String_Data_0B.MS_0BE0'Access);
10310      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 406, (False, (Unlimited => True)));
10311      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 406, (False, AMF.CMOF.Public_Visibility));
10312   end Initialize_406;
10313
10314   --------------------
10315   -- Initialize_407 --
10316   --------------------
10317
10318   procedure Initialize_407 is
10319   begin
10320      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 407, True);
10321      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 407, (False, 0));
10322      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10323       (Base + 407,
10324        AMF.Internals.Tables.UML_String_Data_08.MS_080B'Access);
10325      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 407, (False, (Unlimited => True)));
10326      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 407, (False, AMF.CMOF.Public_Visibility));
10327   end Initialize_407;
10328
10329   --------------------
10330   -- Initialize_408 --
10331   --------------------
10332
10333   procedure Initialize_408 is
10334   begin
10335      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 408, (False, 0));
10336      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10337       (Base + 408,
10338        AMF.Internals.Tables.UML_String_Data_06.MS_0653'Access);
10339      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 408, (False, (Unlimited => True)));
10340      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 408, (False, AMF.CMOF.Public_Visibility));
10341   end Initialize_408;
10342
10343   --------------------
10344   -- Initialize_409 --
10345   --------------------
10346
10347   procedure Initialize_409 is
10348   begin
10349      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 409, (False, 0));
10350      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10351       (Base + 409,
10352        AMF.Internals.Tables.UML_String_Data_03.MS_0384'Access);
10353      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 409, (False, (Unlimited => True)));
10354      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 409, (False, AMF.CMOF.Public_Visibility));
10355   end Initialize_409;
10356
10357   --------------------
10358   -- Initialize_410 --
10359   --------------------
10360
10361   procedure Initialize_410 is
10362   begin
10363      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 410, (False, 0));
10364      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10365       (Base + 410,
10366        AMF.Internals.Tables.UML_String_Data_05.MS_05FA'Access);
10367      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 410, (False, (Unlimited => True)));
10368      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 410, (False, AMF.CMOF.Public_Visibility));
10369   end Initialize_410;
10370
10371   --------------------
10372   -- Initialize_411 --
10373   --------------------
10374
10375   procedure Initialize_411 is
10376   begin
10377      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 411, True);
10378      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 411, (False, 0));
10379      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10380       (Base + 411,
10381        AMF.Internals.Tables.UML_String_Data_02.MS_027D'Access);
10382      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 411, (False, (Unlimited => True)));
10383      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 411, (False, AMF.CMOF.Public_Visibility));
10384   end Initialize_411;
10385
10386   --------------------
10387   -- Initialize_412 --
10388   --------------------
10389
10390   procedure Initialize_412 is
10391   begin
10392      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 412, True);
10393      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 412, (False, 0));
10394      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10395       (Base + 412,
10396        AMF.Internals.Tables.UML_String_Data_0A.MS_0AD9'Access);
10397      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 412, (False, (Unlimited => True)));
10398      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 412, (False, AMF.CMOF.Public_Visibility));
10399   end Initialize_412;
10400
10401   --------------------
10402   -- Initialize_413 --
10403   --------------------
10404
10405   procedure Initialize_413 is
10406   begin
10407      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 413, True);
10408      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 413, True);
10409      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 413, (False, 0));
10410      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10411       (Base + 413,
10412        AMF.Internals.Tables.UML_String_Data_09.MS_0974'Access);
10413      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 413, (False, (Unlimited => True)));
10414      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 413, (False, AMF.CMOF.Public_Visibility));
10415   end Initialize_413;
10416
10417   --------------------
10418   -- Initialize_414 --
10419   --------------------
10420
10421   procedure Initialize_414 is
10422   begin
10423      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 414, True);
10424      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 414, (False, 0));
10425      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10426       (Base + 414,
10427        AMF.Internals.Tables.UML_String_Data_01.MS_0157'Access);
10428      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 414, (False, (Unlimited => True)));
10429      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 414, (False, AMF.CMOF.Public_Visibility));
10430   end Initialize_414;
10431
10432   --------------------
10433   -- Initialize_415 --
10434   --------------------
10435
10436   procedure Initialize_415 is
10437   begin
10438      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 415, True);
10439      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 415, (False, 0));
10440      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10441       (Base + 415,
10442        AMF.Internals.Tables.UML_String_Data_00.MS_001A'Access);
10443      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 415, (False, (Unlimited => True)));
10444      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 415, (False, AMF.CMOF.Public_Visibility));
10445   end Initialize_415;
10446
10447   --------------------
10448   -- Initialize_416 --
10449   --------------------
10450
10451   procedure Initialize_416 is
10452   begin
10453      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 416, (False, 0));
10454      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10455       (Base + 416,
10456        AMF.Internals.Tables.UML_String_Data_02.MS_0237'Access);
10457      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 416, (False, (Unlimited => True)));
10458      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 416, (False, AMF.CMOF.Public_Visibility));
10459   end Initialize_416;
10460
10461   --------------------
10462   -- Initialize_417 --
10463   --------------------
10464
10465   procedure Initialize_417 is
10466   begin
10467      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 417, (False, 0));
10468      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10469       (Base + 417,
10470        AMF.Internals.Tables.UML_String_Data_01.MS_0189'Access);
10471      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 417, (False, (Unlimited => True)));
10472      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 417, (False, AMF.CMOF.Public_Visibility));
10473   end Initialize_417;
10474
10475   --------------------
10476   -- Initialize_418 --
10477   --------------------
10478
10479   procedure Initialize_418 is
10480   begin
10481      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 418, True);
10482      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 418, True);
10483      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 418, (False, 0));
10484      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10485       (Base + 418,
10486        AMF.Internals.Tables.UML_String_Data_08.MS_084D'Access);
10487      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 418, (False, (Unlimited => True)));
10488      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 418, (False, AMF.CMOF.Public_Visibility));
10489   end Initialize_418;
10490
10491   --------------------
10492   -- Initialize_419 --
10493   --------------------
10494
10495   procedure Initialize_419 is
10496   begin
10497      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 419, True);
10498      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 419, True);
10499      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 419, True);
10500      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 419, (False, 0));
10501      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10502       (Base + 419,
10503        AMF.Internals.Tables.UML_String_Data_08.MS_0866'Access);
10504      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 419, (False, (Unlimited => True)));
10505      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 419, (False, AMF.CMOF.Public_Visibility));
10506   end Initialize_419;
10507
10508   --------------------
10509   -- Initialize_420 --
10510   --------------------
10511
10512   procedure Initialize_420 is
10513   begin
10514      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 420, True);
10515      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 420, True);
10516      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 420, (False, 0));
10517      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10518       (Base + 420,
10519        AMF.Internals.Tables.UML_String_Data_03.MS_03AC'Access);
10520      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 420, (False, (Unlimited => True)));
10521      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 420, (False, AMF.CMOF.Public_Visibility));
10522   end Initialize_420;
10523
10524   --------------------
10525   -- Initialize_421 --
10526   --------------------
10527
10528   procedure Initialize_421 is
10529   begin
10530      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 421, True);
10531      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 421, (False, 0));
10532      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10533       (Base + 421,
10534        AMF.Internals.Tables.UML_String_Data_04.MS_0466'Access);
10535      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 421, (False, (Unlimited => True)));
10536      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 421, (False, AMF.CMOF.Public_Visibility));
10537   end Initialize_421;
10538
10539   --------------------
10540   -- Initialize_422 --
10541   --------------------
10542
10543   procedure Initialize_422 is
10544   begin
10545      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 422, True);
10546      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 422, (False, 0));
10547      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10548       (Base + 422,
10549        AMF.Internals.Tables.UML_String_Data_06.MS_0669'Access);
10550      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 422, (False, (Unlimited => True)));
10551      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 422, (False, AMF.CMOF.Public_Visibility));
10552   end Initialize_422;
10553
10554   --------------------
10555   -- Initialize_423 --
10556   --------------------
10557
10558   procedure Initialize_423 is
10559   begin
10560      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 423, True);
10561      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 423, (False, 0));
10562      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10563       (Base + 423,
10564        AMF.Internals.Tables.UML_String_Data_07.MS_0716'Access);
10565      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 423, (False, (Unlimited => True)));
10566      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 423, (False, AMF.CMOF.Public_Visibility));
10567   end Initialize_423;
10568
10569   --------------------
10570   -- Initialize_424 --
10571   --------------------
10572
10573   procedure Initialize_424 is
10574   begin
10575      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 424, (False, 0));
10576      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10577       (Base + 424,
10578        AMF.Internals.Tables.UML_String_Data_07.MS_077A'Access);
10579      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 424, (False, (Unlimited => True)));
10580      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 424, (False, AMF.CMOF.Public_Visibility));
10581   end Initialize_424;
10582
10583   --------------------
10584   -- Initialize_425 --
10585   --------------------
10586
10587   procedure Initialize_425 is
10588   begin
10589      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 425, True);
10590      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 425, (False, 0));
10591      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10592       (Base + 425,
10593        AMF.Internals.Tables.UML_String_Data_0C.MS_0C0B'Access);
10594      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 425, (False, (Unlimited => True)));
10595      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 425, (False, AMF.CMOF.Public_Visibility));
10596   end Initialize_425;
10597
10598   --------------------
10599   -- Initialize_426 --
10600   --------------------
10601
10602   procedure Initialize_426 is
10603   begin
10604      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10605       (Base + 426,
10606        AMF.Internals.Tables.UML_String_Data_00.MS_0007'Access);
10607      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 426, (False, (Unlimited => True)));
10608      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 426, (False, AMF.CMOF.Public_Visibility));
10609   end Initialize_426;
10610
10611   --------------------
10612   -- Initialize_427 --
10613   --------------------
10614
10615   procedure Initialize_427 is
10616   begin
10617      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 427, True);
10618      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 427, True);
10619      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 427, (False, 0));
10620      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10621       (Base + 427,
10622        AMF.Internals.Tables.UML_String_Data_0B.MS_0B2C'Access);
10623      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 427, (False, (Unlimited => True)));
10624      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 427, (False, AMF.CMOF.Public_Visibility));
10625   end Initialize_427;
10626
10627   --------------------
10628   -- Initialize_428 --
10629   --------------------
10630
10631   procedure Initialize_428 is
10632   begin
10633      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 428, (False, 0));
10634      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10635       (Base + 428,
10636        AMF.Internals.Tables.UML_String_Data_0B.MS_0B7E'Access);
10637      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 428, (False, (Unlimited => True)));
10638      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 428, (False, AMF.CMOF.Public_Visibility));
10639   end Initialize_428;
10640
10641   --------------------
10642   -- Initialize_429 --
10643   --------------------
10644
10645   procedure Initialize_429 is
10646   begin
10647      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 429, True);
10648      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 429, True);
10649      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 429, (False, 0));
10650      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10651       (Base + 429,
10652        AMF.Internals.Tables.UML_String_Data_01.MS_0108'Access);
10653      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 429, (False, (Unlimited => True)));
10654      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 429, (False, AMF.CMOF.Public_Visibility));
10655   end Initialize_429;
10656
10657   --------------------
10658   -- Initialize_430 --
10659   --------------------
10660
10661   procedure Initialize_430 is
10662   begin
10663      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 430, True);
10664      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 430, (False, 0));
10665      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10666       (Base + 430,
10667        AMF.Internals.Tables.UML_String_Data_00.MS_003E'Access);
10668      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 430, (False, (Unlimited => True)));
10669      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 430, (False, AMF.CMOF.Public_Visibility));
10670   end Initialize_430;
10671
10672   --------------------
10673   -- Initialize_431 --
10674   --------------------
10675
10676   procedure Initialize_431 is
10677   begin
10678      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 431, True);
10679      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 431, (False, 0));
10680      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10681       (Base + 431,
10682        AMF.Internals.Tables.UML_String_Data_06.MS_0632'Access);
10683      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 431, (False, (Unlimited => True)));
10684      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 431, (False, AMF.CMOF.Public_Visibility));
10685   end Initialize_431;
10686
10687   --------------------
10688   -- Initialize_432 --
10689   --------------------
10690
10691   procedure Initialize_432 is
10692   begin
10693      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 432, True);
10694      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 432, True);
10695      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 432, (False, 0));
10696      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10697       (Base + 432,
10698        AMF.Internals.Tables.UML_String_Data_03.MS_03A6'Access);
10699      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 432, (False, (Unlimited => True)));
10700      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 432, (False, AMF.CMOF.Public_Visibility));
10701   end Initialize_432;
10702
10703   --------------------
10704   -- Initialize_433 --
10705   --------------------
10706
10707   procedure Initialize_433 is
10708   begin
10709      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 433, (False, 0));
10710      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10711       (Base + 433,
10712        AMF.Internals.Tables.UML_String_Data_05.MS_05E4'Access);
10713      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 433, (False, (Unlimited => True)));
10714      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 433, (False, AMF.CMOF.Public_Visibility));
10715   end Initialize_433;
10716
10717   --------------------
10718   -- Initialize_434 --
10719   --------------------
10720
10721   procedure Initialize_434 is
10722   begin
10723      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 434, (False, 0));
10724      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10725       (Base + 434,
10726        AMF.Internals.Tables.UML_String_Data_03.MS_0366'Access);
10727      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 434, (False, (Unlimited => True)));
10728      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 434, (False, AMF.CMOF.Public_Visibility));
10729   end Initialize_434;
10730
10731   --------------------
10732   -- Initialize_435 --
10733   --------------------
10734
10735   procedure Initialize_435 is
10736   begin
10737      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 435, True);
10738      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 435, (False, 0));
10739      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10740       (Base + 435,
10741        AMF.Internals.Tables.UML_String_Data_01.MS_01C2'Access);
10742      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 435, (False, (Unlimited => True)));
10743      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 435, (False, AMF.CMOF.Public_Visibility));
10744   end Initialize_435;
10745
10746   --------------------
10747   -- Initialize_436 --
10748   --------------------
10749
10750   procedure Initialize_436 is
10751   begin
10752      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 436, True);
10753      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 436, True);
10754      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 436, (False, 0));
10755      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10756       (Base + 436,
10757        AMF.Internals.Tables.UML_String_Data_02.MS_02F8'Access);
10758      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 436, (False, (Unlimited => True)));
10759      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 436, (False, AMF.CMOF.Public_Visibility));
10760   end Initialize_436;
10761
10762   --------------------
10763   -- Initialize_437 --
10764   --------------------
10765
10766   procedure Initialize_437 is
10767   begin
10768      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 437, (False, 0));
10769      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10770       (Base + 437,
10771        AMF.Internals.Tables.UML_String_Data_0A.MS_0AF1'Access);
10772      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 437, (False, (Unlimited => True)));
10773      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 437, (False, AMF.CMOF.Public_Visibility));
10774   end Initialize_437;
10775
10776   --------------------
10777   -- Initialize_438 --
10778   --------------------
10779
10780   procedure Initialize_438 is
10781   begin
10782      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 438, (False, 0));
10783      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10784       (Base + 438,
10785        AMF.Internals.Tables.UML_String_Data_08.MS_0880'Access);
10786      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 438, (False, (Unlimited => True)));
10787      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 438, (False, AMF.CMOF.Public_Visibility));
10788   end Initialize_438;
10789
10790   --------------------
10791   -- Initialize_439 --
10792   --------------------
10793
10794   procedure Initialize_439 is
10795   begin
10796      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 439, True);
10797      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived_Union (Base + 439, True);
10798      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 439, True);
10799      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 439, (False, 0));
10800      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10801       (Base + 439,
10802        AMF.Internals.Tables.UML_String_Data_02.MS_022B'Access);
10803      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 439, (False, (Unlimited => True)));
10804      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 439, (False, AMF.CMOF.Public_Visibility));
10805   end Initialize_439;
10806
10807   --------------------
10808   -- Initialize_440 --
10809   --------------------
10810
10811   procedure Initialize_440 is
10812   begin
10813      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 440, True);
10814      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived_Union (Base + 440, True);
10815      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 440, True);
10816      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 440, (False, 0));
10817      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10818       (Base + 440,
10819        AMF.Internals.Tables.UML_String_Data_03.MS_036B'Access);
10820      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 440, (False, (Unlimited => True)));
10821      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 440, (False, AMF.CMOF.Public_Visibility));
10822   end Initialize_440;
10823
10824   --------------------
10825   -- Initialize_441 --
10826   --------------------
10827
10828   procedure Initialize_441 is
10829   begin
10830      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 441, (False, 0));
10831      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10832       (Base + 441,
10833        AMF.Internals.Tables.UML_String_Data_09.MS_09FB'Access);
10834      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 441, (False, (Unlimited => True)));
10835      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 441, (False, AMF.CMOF.Public_Visibility));
10836   end Initialize_441;
10837
10838   --------------------
10839   -- Initialize_442 --
10840   --------------------
10841
10842   procedure Initialize_442 is
10843   begin
10844      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 442, True);
10845      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 442, True);
10846      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 442, (False, 0));
10847      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10848       (Base + 442,
10849        AMF.Internals.Tables.UML_String_Data_04.MS_04A2'Access);
10850      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 442, (False, (Unlimited => True)));
10851      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 442, (False, AMF.CMOF.Public_Visibility));
10852   end Initialize_442;
10853
10854   --------------------
10855   -- Initialize_443 --
10856   --------------------
10857
10858   procedure Initialize_443 is
10859   begin
10860      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 443, True);
10861      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 443, (False, 0));
10862      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10863       (Base + 443,
10864        AMF.Internals.Tables.UML_String_Data_05.MS_051C'Access);
10865      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 443, (False, (Unlimited => True)));
10866      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 443, (False, AMF.CMOF.Public_Visibility));
10867   end Initialize_443;
10868
10869   --------------------
10870   -- Initialize_444 --
10871   --------------------
10872
10873   procedure Initialize_444 is
10874   begin
10875      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 444, True);
10876      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 444, (False, 0));
10877      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10878       (Base + 444,
10879        AMF.Internals.Tables.UML_String_Data_09.MS_09B7'Access);
10880      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 444, (False, (Unlimited => True)));
10881      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 444, (False, AMF.CMOF.Public_Visibility));
10882   end Initialize_444;
10883
10884   --------------------
10885   -- Initialize_445 --
10886   --------------------
10887
10888   procedure Initialize_445 is
10889   begin
10890      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 445, True);
10891      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived_Union (Base + 445, True);
10892      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 445, True);
10893      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10894       (Base + 445,
10895        AMF.Internals.Tables.UML_String_Data_03.MS_0305'Access);
10896      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 445, (False, (Unlimited => True)));
10897      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 445, (False, AMF.CMOF.Public_Visibility));
10898   end Initialize_445;
10899
10900   --------------------
10901   -- Initialize_446 --
10902   --------------------
10903
10904   procedure Initialize_446 is
10905   begin
10906      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 446, True);
10907      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 446, (False, 0));
10908      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10909       (Base + 446,
10910        AMF.Internals.Tables.UML_String_Data_0B.MS_0BC9'Access);
10911      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 446, (False, (Unlimited => True)));
10912      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 446, (False, AMF.CMOF.Public_Visibility));
10913   end Initialize_446;
10914
10915   --------------------
10916   -- Initialize_447 --
10917   --------------------
10918
10919   procedure Initialize_447 is
10920   begin
10921      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 447, True);
10922      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 447, True);
10923      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 447, (False, 0));
10924      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10925       (Base + 447,
10926        AMF.Internals.Tables.UML_String_Data_00.MS_0031'Access);
10927      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 447, (False, (Unlimited => True)));
10928      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 447, (False, AMF.CMOF.Public_Visibility));
10929   end Initialize_447;
10930
10931   --------------------
10932   -- Initialize_448 --
10933   --------------------
10934
10935   procedure Initialize_448 is
10936   begin
10937      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 448, True);
10938      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 448, True);
10939      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 448, (False, 0));
10940      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10941       (Base + 448,
10942        AMF.Internals.Tables.UML_String_Data_01.MS_019B'Access);
10943      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 448, (False, (Unlimited => True)));
10944      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 448, (False, AMF.CMOF.Public_Visibility));
10945   end Initialize_448;
10946
10947   --------------------
10948   -- Initialize_449 --
10949   --------------------
10950
10951   procedure Initialize_449 is
10952   begin
10953      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 449, True);
10954      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 449, True);
10955      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 449, (False, 0));
10956      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10957       (Base + 449,
10958        AMF.Internals.Tables.UML_String_Data_04.MS_0406'Access);
10959      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 449, (False, (Unlimited => True)));
10960      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 449, (False, AMF.CMOF.Public_Visibility));
10961   end Initialize_449;
10962
10963   --------------------
10964   -- Initialize_450 --
10965   --------------------
10966
10967   procedure Initialize_450 is
10968   begin
10969      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 450, True);
10970      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 450, (False, 0));
10971      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10972       (Base + 450,
10973        AMF.Internals.Tables.UML_String_Data_01.MS_0144'Access);
10974      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 450, (False, (Unlimited => True)));
10975      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 450, (False, AMF.CMOF.Public_Visibility));
10976   end Initialize_450;
10977
10978   --------------------
10979   -- Initialize_451 --
10980   --------------------
10981
10982   procedure Initialize_451 is
10983   begin
10984      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 451, True);
10985      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 451, (False, 0));
10986      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
10987       (Base + 451,
10988        AMF.Internals.Tables.UML_String_Data_05.MS_0534'Access);
10989      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 451, (False, (Unlimited => True)));
10990      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 451, (False, AMF.CMOF.Public_Visibility));
10991   end Initialize_451;
10992
10993   --------------------
10994   -- Initialize_452 --
10995   --------------------
10996
10997   procedure Initialize_452 is
10998   begin
10999      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 452, True);
11000      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 452, (False, 0));
11001      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11002       (Base + 452,
11003        AMF.Internals.Tables.UML_String_Data_0B.MS_0B5D'Access);
11004      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 452, (False, (Unlimited => True)));
11005      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 452, (False, AMF.CMOF.Public_Visibility));
11006   end Initialize_452;
11007
11008   --------------------
11009   -- Initialize_453 --
11010   --------------------
11011
11012   procedure Initialize_453 is
11013   begin
11014      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 453, True);
11015      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 453, (False, 0));
11016      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11017       (Base + 453,
11018        AMF.Internals.Tables.UML_String_Data_05.MS_051A'Access);
11019      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 453, (False, (Unlimited => True)));
11020      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 453, (False, AMF.CMOF.Public_Visibility));
11021   end Initialize_453;
11022
11023   --------------------
11024   -- Initialize_454 --
11025   --------------------
11026
11027   procedure Initialize_454 is
11028   begin
11029      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 454, True);
11030      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 454, (False, 0));
11031      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11032       (Base + 454,
11033        AMF.Internals.Tables.UML_String_Data_05.MS_0534'Access);
11034      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 454, (False, (Unlimited => True)));
11035      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 454, (False, AMF.CMOF.Public_Visibility));
11036   end Initialize_454;
11037
11038   --------------------
11039   -- Initialize_455 --
11040   --------------------
11041
11042   procedure Initialize_455 is
11043   begin
11044      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 455, (False, 0));
11045      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11046       (Base + 455,
11047        AMF.Internals.Tables.UML_String_Data_02.MS_02E5'Access);
11048      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 455, (False, (Unlimited => True)));
11049      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 455, (False, AMF.CMOF.Public_Visibility));
11050   end Initialize_455;
11051
11052   --------------------
11053   -- Initialize_456 --
11054   --------------------
11055
11056   procedure Initialize_456 is
11057   begin
11058      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 456, True);
11059      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11060       (Base + 456,
11061        AMF.Internals.Tables.UML_String_Data_05.MS_051A'Access);
11062      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 456, (False, (Unlimited => True)));
11063      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 456, (False, AMF.CMOF.Public_Visibility));
11064   end Initialize_456;
11065
11066   --------------------
11067   -- Initialize_457 --
11068   --------------------
11069
11070   procedure Initialize_457 is
11071   begin
11072      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 457, (False, 0));
11073      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11074       (Base + 457,
11075        AMF.Internals.Tables.UML_String_Data_0B.MS_0BF4'Access);
11076      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 457, (False, (Unlimited => True)));
11077      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 457, (False, AMF.CMOF.Public_Visibility));
11078   end Initialize_457;
11079
11080   --------------------
11081   -- Initialize_458 --
11082   --------------------
11083
11084   procedure Initialize_458 is
11085   begin
11086      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 458, True);
11087      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 458, (False, 0));
11088      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11089       (Base + 458,
11090        AMF.Internals.Tables.UML_String_Data_06.MS_066B'Access);
11091      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 458, (False, (Unlimited => True)));
11092      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 458, (False, AMF.CMOF.Public_Visibility));
11093   end Initialize_458;
11094
11095   --------------------
11096   -- Initialize_459 --
11097   --------------------
11098
11099   procedure Initialize_459 is
11100   begin
11101      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 459, True);
11102      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 459, (False, 0));
11103      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11104       (Base + 459,
11105        AMF.Internals.Tables.UML_String_Data_0A.MS_0A67'Access);
11106      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 459, (False, (Unlimited => True)));
11107      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 459, (False, AMF.CMOF.Public_Visibility));
11108   end Initialize_459;
11109
11110   --------------------
11111   -- Initialize_460 --
11112   --------------------
11113
11114   procedure Initialize_460 is
11115   begin
11116      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 460, True);
11117      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 460, (False, 0));
11118      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11119       (Base + 460,
11120        AMF.Internals.Tables.UML_String_Data_02.MS_025C'Access);
11121      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 460, (False, (Unlimited => True)));
11122      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 460, (False, AMF.CMOF.Public_Visibility));
11123   end Initialize_460;
11124
11125   --------------------
11126   -- Initialize_461 --
11127   --------------------
11128
11129   procedure Initialize_461 is
11130   begin
11131      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 461, True);
11132      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 461, (False, 0));
11133      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11134       (Base + 461,
11135        AMF.Internals.Tables.UML_String_Data_07.MS_07A4'Access);
11136      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 461, (False, (Unlimited => True)));
11137      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 461, (False, AMF.CMOF.Public_Visibility));
11138   end Initialize_461;
11139
11140   --------------------
11141   -- Initialize_462 --
11142   --------------------
11143
11144   procedure Initialize_462 is
11145   begin
11146      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 462, True);
11147      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 462, (False, 0));
11148      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11149       (Base + 462,
11150        AMF.Internals.Tables.UML_String_Data_08.MS_08BF'Access);
11151      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 462, (False, (Unlimited => True)));
11152      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 462, (False, AMF.CMOF.Public_Visibility));
11153   end Initialize_462;
11154
11155   --------------------
11156   -- Initialize_463 --
11157   --------------------
11158
11159   procedure Initialize_463 is
11160   begin
11161      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 463, True);
11162      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 463, (False, 0));
11163      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11164       (Base + 463,
11165        AMF.Internals.Tables.UML_String_Data_0C.MS_0C9E'Access);
11166      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 463, (False, (Unlimited => True)));
11167      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 463, (False, AMF.CMOF.Public_Visibility));
11168   end Initialize_463;
11169
11170   --------------------
11171   -- Initialize_464 --
11172   --------------------
11173
11174   procedure Initialize_464 is
11175   begin
11176      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 464, True);
11177      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 464, (False, 0));
11178      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11179       (Base + 464,
11180        AMF.Internals.Tables.UML_String_Data_00.MS_0067'Access);
11181      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 464, (False, (Unlimited => True)));
11182      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 464, (False, AMF.CMOF.Public_Visibility));
11183   end Initialize_464;
11184
11185   --------------------
11186   -- Initialize_465 --
11187   --------------------
11188
11189   procedure Initialize_465 is
11190   begin
11191      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 465, True);
11192      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 465, True);
11193      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 465, (False, 0));
11194      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11195       (Base + 465,
11196        AMF.Internals.Tables.UML_String_Data_01.MS_019B'Access);
11197      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 465, (False, (Unlimited => True)));
11198      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 465, (False, AMF.CMOF.Public_Visibility));
11199   end Initialize_465;
11200
11201   --------------------
11202   -- Initialize_466 --
11203   --------------------
11204
11205   procedure Initialize_466 is
11206   begin
11207      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 466, True);
11208      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 466, (False, 0));
11209      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11210       (Base + 466,
11211        AMF.Internals.Tables.UML_String_Data_01.MS_014F'Access);
11212      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 466, (False, (Unlimited => True)));
11213      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 466, (False, AMF.CMOF.Public_Visibility));
11214   end Initialize_466;
11215
11216   --------------------
11217   -- Initialize_467 --
11218   --------------------
11219
11220   procedure Initialize_467 is
11221   begin
11222      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 467, True);
11223      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 467, True);
11224      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 467, (False, 0));
11225      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11226       (Base + 467,
11227        AMF.Internals.Tables.UML_String_Data_04.MS_047C'Access);
11228      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 467, (False, (Unlimited => True)));
11229      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 467, (False, AMF.CMOF.Public_Visibility));
11230   end Initialize_467;
11231
11232   --------------------
11233   -- Initialize_468 --
11234   --------------------
11235
11236   procedure Initialize_468 is
11237   begin
11238      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 468, True);
11239      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived_Union (Base + 468, True);
11240      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 468, True);
11241      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 468, (False, 0));
11242      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11243       (Base + 468,
11244        AMF.Internals.Tables.UML_String_Data_09.MS_092F'Access);
11245      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 468, (False, (Unlimited => True)));
11246      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 468, (False, AMF.CMOF.Public_Visibility));
11247   end Initialize_468;
11248
11249   --------------------
11250   -- Initialize_469 --
11251   --------------------
11252
11253   procedure Initialize_469 is
11254   begin
11255      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 469, True);
11256      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 469, (False, 0));
11257      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11258       (Base + 469,
11259        AMF.Internals.Tables.UML_String_Data_08.MS_083E'Access);
11260      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 469, (False, (Unlimited => True)));
11261      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 469, (False, AMF.CMOF.Public_Visibility));
11262   end Initialize_469;
11263
11264   --------------------
11265   -- Initialize_470 --
11266   --------------------
11267
11268   procedure Initialize_470 is
11269   begin
11270      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 470, True);
11271      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 470, True);
11272      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 470, (False, 0));
11273      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11274       (Base + 470,
11275        AMF.Internals.Tables.UML_String_Data_09.MS_0974'Access);
11276      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 470, (False, (Unlimited => True)));
11277      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 470, (False, AMF.CMOF.Public_Visibility));
11278   end Initialize_470;
11279
11280   --------------------
11281   -- Initialize_471 --
11282   --------------------
11283
11284   procedure Initialize_471 is
11285   begin
11286      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 471, True);
11287      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11288       (Base + 471,
11289        AMF.Internals.Tables.UML_String_Data_00.MS_0007'Access);
11290      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 471, (False, (Unlimited => True)));
11291      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 471, (False, AMF.CMOF.Public_Visibility));
11292   end Initialize_471;
11293
11294   --------------------
11295   -- Initialize_472 --
11296   --------------------
11297
11298   procedure Initialize_472 is
11299   begin
11300      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 472, True);
11301      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 472, (False, 0));
11302      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11303       (Base + 472,
11304        AMF.Internals.Tables.UML_String_Data_02.MS_0220'Access);
11305      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 472, (False, (Unlimited => True)));
11306      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 472, (False, AMF.CMOF.Public_Visibility));
11307   end Initialize_472;
11308
11309   --------------------
11310   -- Initialize_473 --
11311   --------------------
11312
11313   procedure Initialize_473 is
11314   begin
11315      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 473, (False, 0));
11316      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11317       (Base + 473,
11318        AMF.Internals.Tables.UML_String_Data_09.MS_090B'Access);
11319      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 473, (False, (Unlimited => True)));
11320      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 473, (False, AMF.CMOF.Public_Visibility));
11321   end Initialize_473;
11322
11323   --------------------
11324   -- Initialize_474 --
11325   --------------------
11326
11327   procedure Initialize_474 is
11328   begin
11329      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 474, True);
11330      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 474, (False, 0));
11331      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11332       (Base + 474,
11333        AMF.Internals.Tables.UML_String_Data_07.MS_073C'Access);
11334      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 474, (False, (Unlimited => True)));
11335      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 474, (False, AMF.CMOF.Public_Visibility));
11336   end Initialize_474;
11337
11338   --------------------
11339   -- Initialize_475 --
11340   --------------------
11341
11342   procedure Initialize_475 is
11343   begin
11344      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 475, (False, 0));
11345      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11346       (Base + 475,
11347        AMF.Internals.Tables.UML_String_Data_0B.MS_0B31'Access);
11348      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 475, (False, (Unlimited => True)));
11349      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 475, (False, AMF.CMOF.Public_Visibility));
11350   end Initialize_475;
11351
11352   --------------------
11353   -- Initialize_476 --
11354   --------------------
11355
11356   procedure Initialize_476 is
11357   begin
11358      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 476, True);
11359      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11360       (Base + 476,
11361        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
11362      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 476, (False, (Unlimited => True)));
11363      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 476, (False, AMF.CMOF.Public_Visibility));
11364   end Initialize_476;
11365
11366   --------------------
11367   -- Initialize_477 --
11368   --------------------
11369
11370   procedure Initialize_477 is
11371   begin
11372      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 477, True);
11373      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 477, (False, 0));
11374      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11375       (Base + 477,
11376        AMF.Internals.Tables.UML_String_Data_04.MS_0426'Access);
11377      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 477, (False, (Unlimited => True)));
11378      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 477, (False, AMF.CMOF.Public_Visibility));
11379   end Initialize_477;
11380
11381   --------------------
11382   -- Initialize_478 --
11383   --------------------
11384
11385   procedure Initialize_478 is
11386   begin
11387      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 478, True);
11388      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 478, (False, 0));
11389      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11390       (Base + 478,
11391        AMF.Internals.Tables.UML_String_Data_03.MS_03E4'Access);
11392      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 478, (False, (Unlimited => True)));
11393      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 478, (False, AMF.CMOF.Public_Visibility));
11394   end Initialize_478;
11395
11396   --------------------
11397   -- Initialize_479 --
11398   --------------------
11399
11400   procedure Initialize_479 is
11401   begin
11402      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 479, True);
11403      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 479, (False, 0));
11404      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11405       (Base + 479,
11406        AMF.Internals.Tables.UML_String_Data_0A.MS_0A4E'Access);
11407      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 479, (False, (Unlimited => True)));
11408      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 479, (False, AMF.CMOF.Public_Visibility));
11409   end Initialize_479;
11410
11411   --------------------
11412   -- Initialize_480 --
11413   --------------------
11414
11415   procedure Initialize_480 is
11416   begin
11417      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 480, (False, 0));
11418      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11419       (Base + 480,
11420        AMF.Internals.Tables.UML_String_Data_0B.MS_0BB6'Access);
11421      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 480, (False, (Unlimited => True)));
11422      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 480, (False, AMF.CMOF.Public_Visibility));
11423   end Initialize_480;
11424
11425   --------------------
11426   -- Initialize_481 --
11427   --------------------
11428
11429   procedure Initialize_481 is
11430   begin
11431      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 481, True);
11432      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 481, True);
11433      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 481, (False, 0));
11434      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11435       (Base + 481,
11436        AMF.Internals.Tables.UML_String_Data_04.MS_040B'Access);
11437      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 481, (False, (Unlimited => True)));
11438      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 481, (False, AMF.CMOF.Public_Visibility));
11439   end Initialize_481;
11440
11441   --------------------
11442   -- Initialize_482 --
11443   --------------------
11444
11445   procedure Initialize_482 is
11446   begin
11447      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 482, True);
11448      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 482, True);
11449      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 482, (False, 0));
11450      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11451       (Base + 482,
11452        AMF.Internals.Tables.UML_String_Data_00.MS_003C'Access);
11453      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 482, (False, (Unlimited => True)));
11454      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 482, (False, AMF.CMOF.Public_Visibility));
11455   end Initialize_482;
11456
11457   --------------------
11458   -- Initialize_483 --
11459   --------------------
11460
11461   procedure Initialize_483 is
11462   begin
11463      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 483, True);
11464      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 483, (False, 0));
11465      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11466       (Base + 483,
11467        AMF.Internals.Tables.UML_String_Data_06.MS_06DC'Access);
11468      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 483, (False, AMF.CMOF.Public_Visibility));
11469   end Initialize_483;
11470
11471   --------------------
11472   -- Initialize_484 --
11473   --------------------
11474
11475   procedure Initialize_484 is
11476   begin
11477      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 484, True);
11478      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11479       (Base + 484,
11480        AMF.Internals.Tables.UML_String_Data_01.MS_014D'Access);
11481      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 484, (False, AMF.CMOF.Public_Visibility));
11482   end Initialize_484;
11483
11484   --------------------
11485   -- Initialize_485 --
11486   --------------------
11487
11488   procedure Initialize_485 is
11489   begin
11490      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
11491       (Base + 485,
11492        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
11493      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11494       (Base + 485,
11495        AMF.Internals.Tables.UML_String_Data_07.MS_0763'Access);
11496      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 485, (False, AMF.CMOF.Public_Visibility));
11497   end Initialize_485;
11498
11499   --------------------
11500   -- Initialize_486 --
11501   --------------------
11502
11503   procedure Initialize_486 is
11504   begin
11505      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 486, True);
11506      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 486, True);
11507      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 486, (False, 0));
11508      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11509       (Base + 486,
11510        AMF.Internals.Tables.UML_String_Data_03.MS_03DB'Access);
11511      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 486, (False, AMF.CMOF.Public_Visibility));
11512   end Initialize_486;
11513
11514   --------------------
11515   -- Initialize_487 --
11516   --------------------
11517
11518   procedure Initialize_487 is
11519   begin
11520      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
11521       (Base + 487,
11522        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
11523      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11524       (Base + 487,
11525        AMF.Internals.Tables.UML_String_Data_0B.MS_0B63'Access);
11526      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 487, (False, AMF.CMOF.Public_Visibility));
11527   end Initialize_487;
11528
11529   --------------------
11530   -- Initialize_488 --
11531   --------------------
11532
11533   procedure Initialize_488 is
11534   begin
11535      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11536       (Base + 488,
11537        AMF.Internals.Tables.UML_String_Data_07.MS_07C7'Access);
11538      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 488, (False, AMF.CMOF.Public_Visibility));
11539   end Initialize_488;
11540
11541   --------------------
11542   -- Initialize_489 --
11543   --------------------
11544
11545   procedure Initialize_489 is
11546   begin
11547      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 489, True);
11548      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11549       (Base + 489,
11550        AMF.Internals.Tables.UML_String_Data_08.MS_0837'Access);
11551      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 489, (False, AMF.CMOF.Public_Visibility));
11552   end Initialize_489;
11553
11554   --------------------
11555   -- Initialize_490 --
11556   --------------------
11557
11558   procedure Initialize_490 is
11559   begin
11560      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
11561       (Base + 490,
11562        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
11563      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11564       (Base + 490,
11565        AMF.Internals.Tables.UML_String_Data_01.MS_0118'Access);
11566      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 490, (False, AMF.CMOF.Public_Visibility));
11567   end Initialize_490;
11568
11569   --------------------
11570   -- Initialize_491 --
11571   --------------------
11572
11573   procedure Initialize_491 is
11574   begin
11575      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
11576       (Base + 491,
11577        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
11578      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11579       (Base + 491,
11580        AMF.Internals.Tables.UML_String_Data_06.MS_060C'Access);
11581      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 491, (False, AMF.CMOF.Public_Visibility));
11582   end Initialize_491;
11583
11584   --------------------
11585   -- Initialize_492 --
11586   --------------------
11587
11588   procedure Initialize_492 is
11589   begin
11590      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 492, (False, 0));
11591      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11592       (Base + 492,
11593        AMF.Internals.Tables.UML_String_Data_09.MS_09A4'Access);
11594      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 492, (False, AMF.CMOF.Public_Visibility));
11595   end Initialize_492;
11596
11597   --------------------
11598   -- Initialize_493 --
11599   --------------------
11600
11601   procedure Initialize_493 is
11602   begin
11603      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 493, True);
11604      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11605       (Base + 493,
11606        AMF.Internals.Tables.UML_String_Data_05.MS_052C'Access);
11607      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 493, (False, AMF.CMOF.Public_Visibility));
11608   end Initialize_493;
11609
11610   --------------------
11611   -- Initialize_494 --
11612   --------------------
11613
11614   procedure Initialize_494 is
11615   begin
11616      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 494, (False, 0));
11617      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11618       (Base + 494,
11619        AMF.Internals.Tables.UML_String_Data_09.MS_0967'Access);
11620      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 494, (False, AMF.CMOF.Public_Visibility));
11621   end Initialize_494;
11622
11623   --------------------
11624   -- Initialize_495 --
11625   --------------------
11626
11627   procedure Initialize_495 is
11628   begin
11629      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 495, (False, 0));
11630      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11631       (Base + 495,
11632        AMF.Internals.Tables.UML_String_Data_04.MS_04D0'Access);
11633      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 495, (False, AMF.CMOF.Public_Visibility));
11634   end Initialize_495;
11635
11636   --------------------
11637   -- Initialize_496 --
11638   --------------------
11639
11640   procedure Initialize_496 is
11641   begin
11642      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11643       (Base + 496,
11644        AMF.Internals.Tables.UML_String_Data_02.MS_028D'Access);
11645      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 496, (False, AMF.CMOF.Public_Visibility));
11646   end Initialize_496;
11647
11648   --------------------
11649   -- Initialize_497 --
11650   --------------------
11651
11652   procedure Initialize_497 is
11653   begin
11654      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11655       (Base + 497,
11656        AMF.Internals.Tables.UML_String_Data_05.MS_05D0'Access);
11657      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 497, (False, AMF.CMOF.Public_Visibility));
11658   end Initialize_497;
11659
11660   --------------------
11661   -- Initialize_498 --
11662   --------------------
11663
11664   procedure Initialize_498 is
11665   begin
11666      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 498, True);
11667      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11668       (Base + 498,
11669        AMF.Internals.Tables.UML_String_Data_04.MS_04C0'Access);
11670      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 498, (False, AMF.CMOF.Public_Visibility));
11671   end Initialize_498;
11672
11673   --------------------
11674   -- Initialize_499 --
11675   --------------------
11676
11677   procedure Initialize_499 is
11678   begin
11679      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 499, (False, 0));
11680      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11681       (Base + 499,
11682        AMF.Internals.Tables.UML_String_Data_0C.MS_0C6D'Access);
11683      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 499, (False, AMF.CMOF.Public_Visibility));
11684   end Initialize_499;
11685
11686   --------------------
11687   -- Initialize_500 --
11688   --------------------
11689
11690   procedure Initialize_500 is
11691   begin
11692      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 500, True);
11693      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived_Union (Base + 500, True);
11694      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 500, True);
11695      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 500, (False, 0));
11696      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11697       (Base + 500,
11698        AMF.Internals.Tables.UML_String_Data_01.MS_0169'Access);
11699      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 500, (False, AMF.CMOF.Public_Visibility));
11700   end Initialize_500;
11701
11702   --------------------
11703   -- Initialize_501 --
11704   --------------------
11705
11706   procedure Initialize_501 is
11707   begin
11708      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 501, (False, 0));
11709      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11710       (Base + 501,
11711        AMF.Internals.Tables.UML_String_Data_09.MS_09A4'Access);
11712      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 501, (False, AMF.CMOF.Public_Visibility));
11713   end Initialize_501;
11714
11715   --------------------
11716   -- Initialize_502 --
11717   --------------------
11718
11719   procedure Initialize_502 is
11720   begin
11721      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 502, (False, 0));
11722      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11723       (Base + 502,
11724        AMF.Internals.Tables.UML_String_Data_09.MS_0967'Access);
11725      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 502, (False, AMF.CMOF.Public_Visibility));
11726   end Initialize_502;
11727
11728   --------------------
11729   -- Initialize_503 --
11730   --------------------
11731
11732   procedure Initialize_503 is
11733   begin
11734      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11735       (Base + 503,
11736        AMF.Internals.Tables.UML_String_Data_00.MS_0007'Access);
11737      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 503, (False, AMF.CMOF.Public_Visibility));
11738   end Initialize_503;
11739
11740   --------------------
11741   -- Initialize_504 --
11742   --------------------
11743
11744   procedure Initialize_504 is
11745   begin
11746      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
11747       (Base + 504,
11748        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
11749      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11750       (Base + 504,
11751        AMF.Internals.Tables.UML_String_Data_0B.MS_0BC3'Access);
11752      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 504, (False, AMF.CMOF.Public_Visibility));
11753   end Initialize_504;
11754
11755   --------------------
11756   -- Initialize_505 --
11757   --------------------
11758
11759   procedure Initialize_505 is
11760   begin
11761      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
11762       (Base + 505,
11763        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
11764      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11765       (Base + 505,
11766        AMF.Internals.Tables.UML_String_Data_04.MS_04A4'Access);
11767      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 505, (False, AMF.CMOF.Public_Visibility));
11768   end Initialize_505;
11769
11770   --------------------
11771   -- Initialize_506 --
11772   --------------------
11773
11774   procedure Initialize_506 is
11775   begin
11776      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 506, (False, 0));
11777      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11778       (Base + 506,
11779        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD7'Access);
11780      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 506, (False, AMF.CMOF.Public_Visibility));
11781   end Initialize_506;
11782
11783   --------------------
11784   -- Initialize_507 --
11785   --------------------
11786
11787   procedure Initialize_507 is
11788   begin
11789      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 507, (False, 0));
11790      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11791       (Base + 507,
11792        AMF.Internals.Tables.UML_String_Data_0A.MS_0AE8'Access);
11793      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 507, (False, AMF.CMOF.Public_Visibility));
11794   end Initialize_507;
11795
11796   --------------------
11797   -- Initialize_508 --
11798   --------------------
11799
11800   procedure Initialize_508 is
11801   begin
11802      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 508, True);
11803      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 508, (False, 0));
11804      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11805       (Base + 508,
11806        AMF.Internals.Tables.UML_String_Data_08.MS_08F4'Access);
11807      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 508, (False, AMF.CMOF.Public_Visibility));
11808   end Initialize_508;
11809
11810   --------------------
11811   -- Initialize_509 --
11812   --------------------
11813
11814   procedure Initialize_509 is
11815   begin
11816      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
11817       (Base + 509,
11818        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
11819      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11820       (Base + 509,
11821        AMF.Internals.Tables.UML_String_Data_04.MS_04A6'Access);
11822      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 509, (False, AMF.CMOF.Public_Visibility));
11823   end Initialize_509;
11824
11825   --------------------
11826   -- Initialize_510 --
11827   --------------------
11828
11829   procedure Initialize_510 is
11830   begin
11831      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 510, True);
11832      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 510, (False, 0));
11833      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11834       (Base + 510,
11835        AMF.Internals.Tables.UML_String_Data_08.MS_08F4'Access);
11836      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 510, (False, AMF.CMOF.Public_Visibility));
11837   end Initialize_510;
11838
11839   --------------------
11840   -- Initialize_511 --
11841   --------------------
11842
11843   procedure Initialize_511 is
11844   begin
11845      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
11846       (Base + 511,
11847        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
11848      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11849       (Base + 511,
11850        AMF.Internals.Tables.UML_String_Data_04.MS_04A6'Access);
11851      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 511, (False, AMF.CMOF.Public_Visibility));
11852   end Initialize_511;
11853
11854   --------------------
11855   -- Initialize_512 --
11856   --------------------
11857
11858   procedure Initialize_512 is
11859   begin
11860      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 512, (False, 0));
11861      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11862       (Base + 512,
11863        AMF.Internals.Tables.UML_String_Data_0A.MS_0A44'Access);
11864      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 512, (False, AMF.CMOF.Public_Visibility));
11865   end Initialize_512;
11866
11867   --------------------
11868   -- Initialize_513 --
11869   --------------------
11870
11871   procedure Initialize_513 is
11872   begin
11873      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
11874       (Base + 513,
11875        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
11876      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11877       (Base + 513,
11878        AMF.Internals.Tables.UML_String_Data_03.MS_039F'Access);
11879      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 513, (False, AMF.CMOF.Public_Visibility));
11880   end Initialize_513;
11881
11882   --------------------
11883   -- Initialize_514 --
11884   --------------------
11885
11886   procedure Initialize_514 is
11887   begin
11888      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 514, True);
11889      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 514, True);
11890      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 514, (False, 0));
11891      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11892       (Base + 514,
11893        AMF.Internals.Tables.UML_String_Data_03.MS_03DB'Access);
11894      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 514, (False, AMF.CMOF.Public_Visibility));
11895   end Initialize_514;
11896
11897   --------------------
11898   -- Initialize_515 --
11899   --------------------
11900
11901   procedure Initialize_515 is
11902   begin
11903      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
11904       (Base + 515,
11905        AMF.Internals.Tables.UML_String_Data_01.MS_0102'Access);
11906      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11907       (Base + 515,
11908        AMF.Internals.Tables.UML_String_Data_0C.MS_0C64'Access);
11909      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 515, (False, AMF.CMOF.Public_Visibility));
11910   end Initialize_515;
11911
11912   --------------------
11913   -- Initialize_516 --
11914   --------------------
11915
11916   procedure Initialize_516 is
11917   begin
11918      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 516, (False, 0));
11919      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11920       (Base + 516,
11921        AMF.Internals.Tables.UML_String_Data_02.MS_026B'Access);
11922      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 516, (False, AMF.CMOF.Public_Visibility));
11923   end Initialize_516;
11924
11925   --------------------
11926   -- Initialize_517 --
11927   --------------------
11928
11929   procedure Initialize_517 is
11930   begin
11931      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 517, (False, 0));
11932      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11933       (Base + 517,
11934        AMF.Internals.Tables.UML_String_Data_02.MS_029D'Access);
11935      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 517, (False, AMF.CMOF.Public_Visibility));
11936   end Initialize_517;
11937
11938   --------------------
11939   -- Initialize_518 --
11940   --------------------
11941
11942   procedure Initialize_518 is
11943   begin
11944      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
11945       (Base + 518,
11946        AMF.Internals.Tables.UML_String_Data_0C.MS_0C14'Access);
11947      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11948       (Base + 518,
11949        AMF.Internals.Tables.UML_String_Data_09.MS_09CE'Access);
11950      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 518, (False, AMF.CMOF.Public_Visibility));
11951   end Initialize_518;
11952
11953   --------------------
11954   -- Initialize_519 --
11955   --------------------
11956
11957   procedure Initialize_519 is
11958   begin
11959      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
11960       (Base + 519,
11961        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
11962      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11963       (Base + 519,
11964        AMF.Internals.Tables.UML_String_Data_08.MS_08A6'Access);
11965      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 519, (False, AMF.CMOF.Public_Visibility));
11966   end Initialize_519;
11967
11968   --------------------
11969   -- Initialize_520 --
11970   --------------------
11971
11972   procedure Initialize_520 is
11973   begin
11974      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 520, (False, 0));
11975      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11976       (Base + 520,
11977        AMF.Internals.Tables.UML_String_Data_0B.MS_0BF1'Access);
11978      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 520, (False, AMF.CMOF.Public_Visibility));
11979   end Initialize_520;
11980
11981   --------------------
11982   -- Initialize_521 --
11983   --------------------
11984
11985   procedure Initialize_521 is
11986   begin
11987      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
11988       (Base + 521,
11989        AMF.Internals.Tables.UML_String_Data_09.MS_0930'Access);
11990      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 521, (False, AMF.CMOF.Public_Visibility));
11991   end Initialize_521;
11992
11993   --------------------
11994   -- Initialize_522 --
11995   --------------------
11996
11997   procedure Initialize_522 is
11998   begin
11999      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
12000       (Base + 522,
12001        AMF.Internals.Tables.UML_String_Data_01.MS_0102'Access);
12002      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12003       (Base + 522,
12004        AMF.Internals.Tables.UML_String_Data_0A.MS_0A6A'Access);
12005      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 522, (False, AMF.CMOF.Public_Visibility));
12006   end Initialize_522;
12007
12008   --------------------
12009   -- Initialize_523 --
12010   --------------------
12011
12012   procedure Initialize_523 is
12013   begin
12014      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12015       (Base + 523,
12016        AMF.Internals.Tables.UML_String_Data_02.MS_029D'Access);
12017      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 523, (False, AMF.CMOF.Public_Visibility));
12018   end Initialize_523;
12019
12020   --------------------
12021   -- Initialize_524 --
12022   --------------------
12023
12024   procedure Initialize_524 is
12025   begin
12026      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12027       (Base + 524,
12028        AMF.Internals.Tables.UML_String_Data_06.MS_0638'Access);
12029      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 524, (False, AMF.CMOF.Public_Visibility));
12030   end Initialize_524;
12031
12032   --------------------
12033   -- Initialize_525 --
12034   --------------------
12035
12036   procedure Initialize_525 is
12037   begin
12038      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12039       (Base + 525,
12040        AMF.Internals.Tables.UML_String_Data_06.MS_0638'Access);
12041      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 525, (False, AMF.CMOF.Public_Visibility));
12042   end Initialize_525;
12043
12044   --------------------
12045   -- Initialize_526 --
12046   --------------------
12047
12048   procedure Initialize_526 is
12049   begin
12050      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 526, True);
12051      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12052       (Base + 526,
12053        AMF.Internals.Tables.UML_String_Data_05.MS_05D0'Access);
12054      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 526, (False, AMF.CMOF.Public_Visibility));
12055   end Initialize_526;
12056
12057   --------------------
12058   -- Initialize_527 --
12059   --------------------
12060
12061   procedure Initialize_527 is
12062   begin
12063      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 527, True);
12064      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12065       (Base + 527,
12066        AMF.Internals.Tables.UML_String_Data_02.MS_026E'Access);
12067      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 527, (False, AMF.CMOF.Public_Visibility));
12068   end Initialize_527;
12069
12070   --------------------
12071   -- Initialize_528 --
12072   --------------------
12073
12074   procedure Initialize_528 is
12075   begin
12076      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
12077       (Base + 528,
12078        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
12079      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12080       (Base + 528,
12081        AMF.Internals.Tables.UML_String_Data_08.MS_08A6'Access);
12082      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 528, (False, AMF.CMOF.Public_Visibility));
12083   end Initialize_528;
12084
12085   --------------------
12086   -- Initialize_529 --
12087   --------------------
12088
12089   procedure Initialize_529 is
12090   begin
12091      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
12092       (Base + 529,
12093        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
12094      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12095       (Base + 529,
12096        AMF.Internals.Tables.UML_String_Data_0A.MS_0A75'Access);
12097      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 529, (False, AMF.CMOF.Public_Visibility));
12098   end Initialize_529;
12099
12100   --------------------
12101   -- Initialize_530 --
12102   --------------------
12103
12104   procedure Initialize_530 is
12105   begin
12106      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
12107       (Base + 530,
12108        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
12109      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12110       (Base + 530,
12111        AMF.Internals.Tables.UML_String_Data_08.MS_08A6'Access);
12112      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 530, (False, AMF.CMOF.Public_Visibility));
12113   end Initialize_530;
12114
12115   --------------------
12116   -- Initialize_531 --
12117   --------------------
12118
12119   procedure Initialize_531 is
12120   begin
12121      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
12122       (Base + 531,
12123        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
12124      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12125       (Base + 531,
12126        AMF.Internals.Tables.UML_String_Data_0B.MS_0B9C'Access);
12127      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 531, (False, AMF.CMOF.Public_Visibility));
12128   end Initialize_531;
12129
12130   --------------------
12131   -- Initialize_532 --
12132   --------------------
12133
12134   procedure Initialize_532 is
12135   begin
12136      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 532, True);
12137      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 532, (False, 0));
12138      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12139       (Base + 532,
12140        AMF.Internals.Tables.UML_String_Data_08.MS_086C'Access);
12141      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 532, (False, AMF.CMOF.Public_Visibility));
12142   end Initialize_532;
12143
12144   --------------------
12145   -- Initialize_533 --
12146   --------------------
12147
12148   procedure Initialize_533 is
12149   begin
12150      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 533, (False, 0));
12151      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12152       (Base + 533,
12153        AMF.Internals.Tables.UML_String_Data_0B.MS_0BF0'Access);
12154      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 533, (False, AMF.CMOF.Public_Visibility));
12155   end Initialize_533;
12156
12157   --------------------
12158   -- Initialize_534 --
12159   --------------------
12160
12161   procedure Initialize_534 is
12162   begin
12163      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 534, (False, 0));
12164      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12165       (Base + 534,
12166        AMF.Internals.Tables.UML_String_Data_01.MS_01BF'Access);
12167      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 534, (False, AMF.CMOF.Public_Visibility));
12168   end Initialize_534;
12169
12170   --------------------
12171   -- Initialize_535 --
12172   --------------------
12173
12174   procedure Initialize_535 is
12175   begin
12176      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
12177       (Base + 535,
12178        AMF.Internals.Tables.UML_String_Data_01.MS_0102'Access);
12179      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12180       (Base + 535,
12181        AMF.Internals.Tables.UML_String_Data_00.MS_00FE'Access);
12182      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 535, (False, AMF.CMOF.Public_Visibility));
12183   end Initialize_535;
12184
12185   --------------------
12186   -- Initialize_536 --
12187   --------------------
12188
12189   procedure Initialize_536 is
12190   begin
12191      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12192       (Base + 536,
12193        AMF.Internals.Tables.UML_String_Data_07.MS_070A'Access);
12194      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 536, (False, AMF.CMOF.Public_Visibility));
12195   end Initialize_536;
12196
12197   --------------------
12198   -- Initialize_537 --
12199   --------------------
12200
12201   procedure Initialize_537 is
12202   begin
12203      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12204       (Base + 537,
12205        AMF.Internals.Tables.UML_String_Data_0B.MS_0BC7'Access);
12206      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 537, (False, AMF.CMOF.Public_Visibility));
12207   end Initialize_537;
12208
12209   --------------------
12210   -- Initialize_538 --
12211   --------------------
12212
12213   procedure Initialize_538 is
12214   begin
12215      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12216       (Base + 538,
12217        AMF.Internals.Tables.UML_String_Data_0A.MS_0A43'Access);
12218      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 538, (False, AMF.CMOF.Public_Visibility));
12219   end Initialize_538;
12220
12221   --------------------
12222   -- Initialize_539 --
12223   --------------------
12224
12225   procedure Initialize_539 is
12226   begin
12227      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 539, True);
12228      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12229       (Base + 539,
12230        AMF.Internals.Tables.UML_String_Data_0C.MS_0C18'Access);
12231      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 539, (False, AMF.CMOF.Public_Visibility));
12232   end Initialize_539;
12233
12234   --------------------
12235   -- Initialize_540 --
12236   --------------------
12237
12238   procedure Initialize_540 is
12239   begin
12240      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 540, True);
12241      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 540, (False, 0));
12242      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12243       (Base + 540,
12244        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
12245      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 540, (False, AMF.CMOF.Public_Visibility));
12246   end Initialize_540;
12247
12248   --------------------
12249   -- Initialize_541 --
12250   --------------------
12251
12252   procedure Initialize_541 is
12253   begin
12254      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12255       (Base + 541,
12256        AMF.Internals.Tables.UML_String_Data_0B.MS_0BB4'Access);
12257      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 541, (False, AMF.CMOF.Public_Visibility));
12258   end Initialize_541;
12259
12260   --------------------
12261   -- Initialize_542 --
12262   --------------------
12263
12264   procedure Initialize_542 is
12265   begin
12266      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
12267       (Base + 542,
12268        AMF.Internals.Tables.UML_String_Data_07.MS_07F5'Access);
12269      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12270       (Base + 542,
12271        AMF.Internals.Tables.UML_String_Data_01.MS_0180'Access);
12272      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 542, (False, AMF.CMOF.Public_Visibility));
12273   end Initialize_542;
12274
12275   --------------------
12276   -- Initialize_543 --
12277   --------------------
12278
12279   procedure Initialize_543 is
12280   begin
12281      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 543, (False, 0));
12282      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12283       (Base + 543,
12284        AMF.Internals.Tables.UML_String_Data_0B.MS_0B98'Access);
12285      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 543, (False, AMF.CMOF.Public_Visibility));
12286   end Initialize_543;
12287
12288   --------------------
12289   -- Initialize_544 --
12290   --------------------
12291
12292   procedure Initialize_544 is
12293   begin
12294      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
12295       (Base + 544,
12296        AMF.Internals.Tables.UML_String_Data_01.MS_0102'Access);
12297      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12298       (Base + 544,
12299        AMF.Internals.Tables.UML_String_Data_02.MS_0276'Access);
12300      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 544, (False, AMF.CMOF.Public_Visibility));
12301   end Initialize_544;
12302
12303   --------------------
12304   -- Initialize_545 --
12305   --------------------
12306
12307   procedure Initialize_545 is
12308   begin
12309      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 545, (False, 0));
12310      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12311       (Base + 545,
12312        AMF.Internals.Tables.UML_String_Data_0A.MS_0ADA'Access);
12313      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 545, (False, AMF.CMOF.Public_Visibility));
12314   end Initialize_545;
12315
12316   --------------------
12317   -- Initialize_546 --
12318   --------------------
12319
12320   procedure Initialize_546 is
12321   begin
12322      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
12323       (Base + 546,
12324        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
12325      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12326       (Base + 546,
12327        AMF.Internals.Tables.UML_String_Data_03.MS_0344'Access);
12328      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 546, (False, AMF.CMOF.Public_Visibility));
12329   end Initialize_546;
12330
12331   --------------------
12332   -- Initialize_547 --
12333   --------------------
12334
12335   procedure Initialize_547 is
12336   begin
12337      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
12338       (Base + 547,
12339        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
12340      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12341       (Base + 547,
12342        AMF.Internals.Tables.UML_String_Data_00.MS_0003'Access);
12343      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 547, (False, AMF.CMOF.Public_Visibility));
12344   end Initialize_547;
12345
12346   --------------------
12347   -- Initialize_548 --
12348   --------------------
12349
12350   procedure Initialize_548 is
12351   begin
12352      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 548, (False, 0));
12353      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12354       (Base + 548,
12355        AMF.Internals.Tables.UML_String_Data_01.MS_01BF'Access);
12356      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 548, (False, AMF.CMOF.Public_Visibility));
12357   end Initialize_548;
12358
12359   --------------------
12360   -- Initialize_549 --
12361   --------------------
12362
12363   procedure Initialize_549 is
12364   begin
12365      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12366       (Base + 549,
12367        AMF.Internals.Tables.UML_String_Data_07.MS_070A'Access);
12368      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 549, (False, AMF.CMOF.Public_Visibility));
12369   end Initialize_549;
12370
12371   --------------------
12372   -- Initialize_550 --
12373   --------------------
12374
12375   procedure Initialize_550 is
12376   begin
12377      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 550, (False, 0));
12378      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12379       (Base + 550,
12380        AMF.Internals.Tables.UML_String_Data_02.MS_0273'Access);
12381      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 550, (False, AMF.CMOF.Public_Visibility));
12382   end Initialize_550;
12383
12384   --------------------
12385   -- Initialize_551 --
12386   --------------------
12387
12388   procedure Initialize_551 is
12389   begin
12390      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 551, True);
12391      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 551, True);
12392      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12393       (Base + 551,
12394        AMF.Internals.Tables.UML_String_Data_01.MS_01C4'Access);
12395      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 551, (False, AMF.CMOF.Public_Visibility));
12396   end Initialize_551;
12397
12398   --------------------
12399   -- Initialize_552 --
12400   --------------------
12401
12402   procedure Initialize_552 is
12403   begin
12404      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 552, (False, 0));
12405      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12406       (Base + 552,
12407        AMF.Internals.Tables.UML_String_Data_0B.MS_0BB4'Access);
12408      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 552, (False, AMF.CMOF.Public_Visibility));
12409   end Initialize_552;
12410
12411   --------------------
12412   -- Initialize_553 --
12413   --------------------
12414
12415   procedure Initialize_553 is
12416   begin
12417      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 553, True);
12418      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 553, True);
12419      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 553, (False, 0));
12420      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12421       (Base + 553,
12422        AMF.Internals.Tables.UML_String_Data_06.MS_0611'Access);
12423      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 553, (False, AMF.CMOF.Public_Visibility));
12424   end Initialize_553;
12425
12426   --------------------
12427   -- Initialize_554 --
12428   --------------------
12429
12430   procedure Initialize_554 is
12431   begin
12432      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 554, (False, 0));
12433      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12434       (Base + 554,
12435        AMF.Internals.Tables.UML_String_Data_09.MS_09BE'Access);
12436      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 554, (False, AMF.CMOF.Public_Visibility));
12437   end Initialize_554;
12438
12439   --------------------
12440   -- Initialize_555 --
12441   --------------------
12442
12443   procedure Initialize_555 is
12444   begin
12445      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12446       (Base + 555,
12447        AMF.Internals.Tables.UML_String_Data_09.MS_092F'Access);
12448      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 555, (False, AMF.CMOF.Public_Visibility));
12449   end Initialize_555;
12450
12451   --------------------
12452   -- Initialize_556 --
12453   --------------------
12454
12455   procedure Initialize_556 is
12456   begin
12457      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 556, (False, 0));
12458      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12459       (Base + 556,
12460        AMF.Internals.Tables.UML_String_Data_03.MS_03DB'Access);
12461      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 556, (False, AMF.CMOF.Public_Visibility));
12462   end Initialize_556;
12463
12464   --------------------
12465   -- Initialize_557 --
12466   --------------------
12467
12468   procedure Initialize_557 is
12469   begin
12470      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 557, True);
12471      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12472       (Base + 557,
12473        AMF.Internals.Tables.UML_String_Data_02.MS_026B'Access);
12474      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 557, (False, AMF.CMOF.Public_Visibility));
12475   end Initialize_557;
12476
12477   --------------------
12478   -- Initialize_558 --
12479   --------------------
12480
12481   procedure Initialize_558 is
12482   begin
12483      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
12484       (Base + 558,
12485        AMF.Internals.Tables.UML_String_Data_01.MS_0102'Access);
12486      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12487       (Base + 558,
12488        AMF.Internals.Tables.UML_String_Data_09.MS_0945'Access);
12489      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 558, (False, AMF.CMOF.Public_Visibility));
12490   end Initialize_558;
12491
12492   --------------------
12493   -- Initialize_559 --
12494   --------------------
12495
12496   procedure Initialize_559 is
12497   begin
12498      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 559, True);
12499      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12500       (Base + 559,
12501        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
12502      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 559, (False, AMF.CMOF.Public_Visibility));
12503   end Initialize_559;
12504
12505   --------------------
12506   -- Initialize_560 --
12507   --------------------
12508
12509   procedure Initialize_560 is
12510   begin
12511      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12512       (Base + 560,
12513        AMF.Internals.Tables.UML_String_Data_03.MS_0321'Access);
12514      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 560, (False, AMF.CMOF.Public_Visibility));
12515   end Initialize_560;
12516
12517   --------------------
12518   -- Initialize_561 --
12519   --------------------
12520
12521   procedure Initialize_561 is
12522   begin
12523      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 561, True);
12524      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12525       (Base + 561,
12526        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
12527      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 561, (False, AMF.CMOF.Public_Visibility));
12528   end Initialize_561;
12529
12530   --------------------
12531   -- Initialize_562 --
12532   --------------------
12533
12534   procedure Initialize_562 is
12535   begin
12536      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 562, (False, 0));
12537      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12538       (Base + 562,
12539        AMF.Internals.Tables.UML_String_Data_04.MS_0487'Access);
12540      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 562, (False, AMF.CMOF.Public_Visibility));
12541   end Initialize_562;
12542
12543   --------------------
12544   -- Initialize_563 --
12545   --------------------
12546
12547   procedure Initialize_563 is
12548   begin
12549      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 563, (False, 0));
12550      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12551       (Base + 563,
12552        AMF.Internals.Tables.UML_String_Data_07.MS_0771'Access);
12553      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 563, (False, AMF.CMOF.Public_Visibility));
12554   end Initialize_563;
12555
12556   --------------------
12557   -- Initialize_564 --
12558   --------------------
12559
12560   procedure Initialize_564 is
12561   begin
12562      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12563       (Base + 564,
12564        AMF.Internals.Tables.UML_String_Data_0C.MS_0C8F'Access);
12565      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 564, (False, AMF.CMOF.Public_Visibility));
12566   end Initialize_564;
12567
12568   --------------------
12569   -- Initialize_565 --
12570   --------------------
12571
12572   procedure Initialize_565 is
12573   begin
12574      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 565, (False, 0));
12575      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12576       (Base + 565,
12577        AMF.Internals.Tables.UML_String_Data_03.MS_03AD'Access);
12578      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 565, (False, AMF.CMOF.Public_Visibility));
12579   end Initialize_565;
12580
12581   --------------------
12582   -- Initialize_566 --
12583   --------------------
12584
12585   procedure Initialize_566 is
12586   begin
12587      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 566, (False, 0));
12588      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12589       (Base + 566,
12590        AMF.Internals.Tables.UML_String_Data_05.MS_0566'Access);
12591      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 566, (False, AMF.CMOF.Public_Visibility));
12592   end Initialize_566;
12593
12594   --------------------
12595   -- Initialize_567 --
12596   --------------------
12597
12598   procedure Initialize_567 is
12599   begin
12600      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 567, (False, 0));
12601      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12602       (Base + 567,
12603        AMF.Internals.Tables.UML_String_Data_07.MS_0778'Access);
12604      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 567, (False, AMF.CMOF.Public_Visibility));
12605   end Initialize_567;
12606
12607   --------------------
12608   -- Initialize_568 --
12609   --------------------
12610
12611   procedure Initialize_568 is
12612   begin
12613      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
12614       (Base + 568,
12615        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
12616      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12617       (Base + 568,
12618        AMF.Internals.Tables.UML_String_Data_07.MS_0798'Access);
12619      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 568, (False, AMF.CMOF.Public_Visibility));
12620   end Initialize_568;
12621
12622   --------------------
12623   -- Initialize_569 --
12624   --------------------
12625
12626   procedure Initialize_569 is
12627   begin
12628      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
12629       (Base + 569,
12630        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
12631      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12632       (Base + 569,
12633        AMF.Internals.Tables.UML_String_Data_06.MS_068D'Access);
12634      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 569, (False, AMF.CMOF.Public_Visibility));
12635   end Initialize_569;
12636
12637   --------------------
12638   -- Initialize_570 --
12639   --------------------
12640
12641   procedure Initialize_570 is
12642   begin
12643      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 570, True);
12644      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12645       (Base + 570,
12646        AMF.Internals.Tables.UML_String_Data_05.MS_05D0'Access);
12647      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 570, (False, AMF.CMOF.Public_Visibility));
12648   end Initialize_570;
12649
12650   --------------------
12651   -- Initialize_571 --
12652   --------------------
12653
12654   procedure Initialize_571 is
12655   begin
12656      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 571, True);
12657      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 571, (False, 0));
12658      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12659       (Base + 571,
12660        AMF.Internals.Tables.UML_String_Data_03.MS_0379'Access);
12661      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 571, (False, AMF.CMOF.Public_Visibility));
12662   end Initialize_571;
12663
12664   --------------------
12665   -- Initialize_572 --
12666   --------------------
12667
12668   procedure Initialize_572 is
12669   begin
12670      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 572, (False, 0));
12671      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12672       (Base + 572,
12673        AMF.Internals.Tables.UML_String_Data_0A.MS_0A41'Access);
12674      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 572, (False, (False, 2)));
12675      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 572, (False, AMF.CMOF.Public_Visibility));
12676   end Initialize_572;
12677
12678   --------------------
12679   -- Initialize_573 --
12680   --------------------
12681
12682   procedure Initialize_573 is
12683   begin
12684      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 573, True);
12685      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12686       (Base + 573,
12687        AMF.Internals.Tables.UML_String_Data_02.MS_026B'Access);
12688      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 573, (False, AMF.CMOF.Public_Visibility));
12689   end Initialize_573;
12690
12691   --------------------
12692   -- Initialize_574 --
12693   --------------------
12694
12695   procedure Initialize_574 is
12696   begin
12697      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12698       (Base + 574,
12699        AMF.Internals.Tables.UML_String_Data_0C.MS_0C0C'Access);
12700      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 574, (False, AMF.CMOF.Public_Visibility));
12701   end Initialize_574;
12702
12703   --------------------
12704   -- Initialize_575 --
12705   --------------------
12706
12707   procedure Initialize_575 is
12708   begin
12709      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12710       (Base + 575,
12711        AMF.Internals.Tables.UML_String_Data_0B.MS_0B40'Access);
12712      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 575, (False, AMF.CMOF.Public_Visibility));
12713   end Initialize_575;
12714
12715   --------------------
12716   -- Initialize_576 --
12717   --------------------
12718
12719   procedure Initialize_576 is
12720   begin
12721      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 576, (False, 0));
12722      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12723       (Base + 576,
12724        AMF.Internals.Tables.UML_String_Data_0A.MS_0A41'Access);
12725      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 576, (False, (False, 2)));
12726      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 576, (False, AMF.CMOF.Public_Visibility));
12727   end Initialize_576;
12728
12729   --------------------
12730   -- Initialize_577 --
12731   --------------------
12732
12733   procedure Initialize_577 is
12734   begin
12735      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 577, True);
12736      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived_Union (Base + 577, True);
12737      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 577, True);
12738      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 577, (False, 0));
12739      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12740       (Base + 577,
12741        AMF.Internals.Tables.UML_String_Data_05.MS_0556'Access);
12742      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 577, (False, AMF.CMOF.Public_Visibility));
12743   end Initialize_577;
12744
12745   --------------------
12746   -- Initialize_578 --
12747   --------------------
12748
12749   procedure Initialize_578 is
12750   begin
12751      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 578, (False, 0));
12752      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12753       (Base + 578,
12754        AMF.Internals.Tables.UML_String_Data_07.MS_073E'Access);
12755      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 578, (False, AMF.CMOF.Public_Visibility));
12756   end Initialize_578;
12757
12758   --------------------
12759   -- Initialize_579 --
12760   --------------------
12761
12762   procedure Initialize_579 is
12763   begin
12764      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12765       (Base + 579,
12766        AMF.Internals.Tables.UML_String_Data_04.MS_04D1'Access);
12767      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 579, (False, AMF.CMOF.Public_Visibility));
12768   end Initialize_579;
12769
12770   --------------------
12771   -- Initialize_580 --
12772   --------------------
12773
12774   procedure Initialize_580 is
12775   begin
12776      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12777       (Base + 580,
12778        AMF.Internals.Tables.UML_String_Data_07.MS_0780'Access);
12779      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 580, (False, AMF.CMOF.Public_Visibility));
12780   end Initialize_580;
12781
12782   --------------------
12783   -- Initialize_581 --
12784   --------------------
12785
12786   procedure Initialize_581 is
12787   begin
12788      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
12789       (Base + 581,
12790        AMF.Internals.Tables.UML_String_Data_05.MS_055A'Access);
12791      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12792       (Base + 581,
12793        AMF.Internals.Tables.UML_String_Data_0B.MS_0B62'Access);
12794      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 581, (False, AMF.CMOF.Public_Visibility));
12795   end Initialize_581;
12796
12797   --------------------
12798   -- Initialize_582 --
12799   --------------------
12800
12801   procedure Initialize_582 is
12802   begin
12803      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 582, True);
12804      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 582, True);
12805      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12806       (Base + 582,
12807        AMF.Internals.Tables.UML_String_Data_03.MS_0321'Access);
12808      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 582, (False, AMF.CMOF.Public_Visibility));
12809   end Initialize_582;
12810
12811   --------------------
12812   -- Initialize_583 --
12813   --------------------
12814
12815   procedure Initialize_583 is
12816   begin
12817      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 583, (False, 0));
12818      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12819       (Base + 583,
12820        AMF.Internals.Tables.UML_String_Data_00.MS_005B'Access);
12821      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 583, (False, AMF.CMOF.Public_Visibility));
12822   end Initialize_583;
12823
12824   --------------------
12825   -- Initialize_584 --
12826   --------------------
12827
12828   procedure Initialize_584 is
12829   begin
12830      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12831       (Base + 584,
12832        AMF.Internals.Tables.UML_String_Data_04.MS_0436'Access);
12833      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 584, (False, AMF.CMOF.Public_Visibility));
12834   end Initialize_584;
12835
12836   --------------------
12837   -- Initialize_585 --
12838   --------------------
12839
12840   procedure Initialize_585 is
12841   begin
12842      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12843       (Base + 585,
12844        AMF.Internals.Tables.UML_String_Data_03.MS_03F5'Access);
12845      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 585, (False, AMF.CMOF.Public_Visibility));
12846   end Initialize_585;
12847
12848   --------------------
12849   -- Initialize_586 --
12850   --------------------
12851
12852   procedure Initialize_586 is
12853   begin
12854      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12855       (Base + 586,
12856        AMF.Internals.Tables.UML_String_Data_07.MS_07BB'Access);
12857      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 586, (False, AMF.CMOF.Public_Visibility));
12858   end Initialize_586;
12859
12860   --------------------
12861   -- Initialize_587 --
12862   --------------------
12863
12864   procedure Initialize_587 is
12865   begin
12866      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12867       (Base + 587,
12868        AMF.Internals.Tables.UML_String_Data_00.MS_005F'Access);
12869      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 587, (False, AMF.CMOF.Public_Visibility));
12870   end Initialize_587;
12871
12872   --------------------
12873   -- Initialize_588 --
12874   --------------------
12875
12876   procedure Initialize_588 is
12877   begin
12878      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12879       (Base + 588,
12880        AMF.Internals.Tables.UML_String_Data_0C.MS_0C39'Access);
12881      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 588, (False, AMF.CMOF.Public_Visibility));
12882   end Initialize_588;
12883
12884   --------------------
12885   -- Initialize_589 --
12886   --------------------
12887
12888   procedure Initialize_589 is
12889   begin
12890      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12891       (Base + 589,
12892        AMF.Internals.Tables.UML_String_Data_06.MS_0651'Access);
12893      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 589, (False, AMF.CMOF.Public_Visibility));
12894   end Initialize_589;
12895
12896   --------------------
12897   -- Initialize_590 --
12898   --------------------
12899
12900   procedure Initialize_590 is
12901   begin
12902      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 590, (False, 0));
12903      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12904       (Base + 590,
12905        AMF.Internals.Tables.UML_String_Data_09.MS_0986'Access);
12906      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 590, (False, AMF.CMOF.Public_Visibility));
12907   end Initialize_590;
12908
12909   --------------------
12910   -- Initialize_591 --
12911   --------------------
12912
12913   procedure Initialize_591 is
12914   begin
12915      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 591, (False, 0));
12916      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12917       (Base + 591,
12918        AMF.Internals.Tables.UML_String_Data_0B.MS_0BBB'Access);
12919      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 591, (False, AMF.CMOF.Public_Visibility));
12920   end Initialize_591;
12921
12922   --------------------
12923   -- Initialize_592 --
12924   --------------------
12925
12926   procedure Initialize_592 is
12927   begin
12928      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
12929       (Base + 592,
12930        AMF.Internals.Tables.UML_String_Data_04.MS_047F'Access);
12931      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12932       (Base + 592,
12933        AMF.Internals.Tables.UML_String_Data_04.MS_04A9'Access);
12934      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 592, (False, AMF.CMOF.Public_Visibility));
12935   end Initialize_592;
12936
12937   --------------------
12938   -- Initialize_593 --
12939   --------------------
12940
12941   procedure Initialize_593 is
12942   begin
12943      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 593, (False, 0));
12944      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12945       (Base + 593,
12946        AMF.Internals.Tables.UML_String_Data_05.MS_05FB'Access);
12947      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 593, (False, AMF.CMOF.Public_Visibility));
12948   end Initialize_593;
12949
12950   --------------------
12951   -- Initialize_594 --
12952   --------------------
12953
12954   procedure Initialize_594 is
12955   begin
12956      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 594, True);
12957      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 594, (False, 0));
12958      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12959       (Base + 594,
12960        AMF.Internals.Tables.UML_String_Data_0C.MS_0C0B'Access);
12961      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 594, (False, AMF.CMOF.Public_Visibility));
12962   end Initialize_594;
12963
12964   --------------------
12965   -- Initialize_595 --
12966   --------------------
12967
12968   procedure Initialize_595 is
12969   begin
12970      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12971       (Base + 595,
12972        AMF.Internals.Tables.UML_String_Data_0B.MS_0BE8'Access);
12973      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 595, (False, AMF.CMOF.Public_Visibility));
12974   end Initialize_595;
12975
12976   --------------------
12977   -- Initialize_596 --
12978   --------------------
12979
12980   procedure Initialize_596 is
12981   begin
12982      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
12983       (Base + 596,
12984        AMF.Internals.Tables.UML_String_Data_02.MS_0202'Access);
12985      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 596, (False, AMF.CMOF.Public_Visibility));
12986   end Initialize_596;
12987
12988   --------------------
12989   -- Initialize_597 --
12990   --------------------
12991
12992   procedure Initialize_597 is
12993   begin
12994      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
12995       (Base + 597,
12996        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
12997      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 597, True);
12998      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 597, True);
12999      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13000       (Base + 597,
13001        AMF.Internals.Tables.UML_String_Data_0B.MS_0BE2'Access);
13002      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 597, (False, AMF.CMOF.Public_Visibility));
13003   end Initialize_597;
13004
13005   --------------------
13006   -- Initialize_598 --
13007   --------------------
13008
13009   procedure Initialize_598 is
13010   begin
13011      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 598, True);
13012      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 598, True);
13013      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13014       (Base + 598,
13015        AMF.Internals.Tables.UML_String_Data_00.MS_00FF'Access);
13016      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 598, (False, AMF.CMOF.Public_Visibility));
13017   end Initialize_598;
13018
13019   --------------------
13020   -- Initialize_599 --
13021   --------------------
13022
13023   procedure Initialize_599 is
13024   begin
13025      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 599, True);
13026      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13027       (Base + 599,
13028        AMF.Internals.Tables.UML_String_Data_0B.MS_0B09'Access);
13029      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 599, (False, AMF.CMOF.Public_Visibility));
13030   end Initialize_599;
13031
13032   --------------------
13033   -- Initialize_600 --
13034   --------------------
13035
13036   procedure Initialize_600 is
13037   begin
13038      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
13039       (Base + 600,
13040        AMF.Internals.Tables.UML_String_Data_09.MS_09FC'Access);
13041      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 600, True);
13042      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 600, (False, 0));
13043      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13044       (Base + 600,
13045        AMF.Internals.Tables.UML_String_Data_04.MS_04AC'Access);
13046      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 600, (False, AMF.CMOF.Public_Visibility));
13047   end Initialize_600;
13048
13049   --------------------
13050   -- Initialize_601 --
13051   --------------------
13052
13053   procedure Initialize_601 is
13054   begin
13055      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13056       (Base + 601,
13057        AMF.Internals.Tables.UML_String_Data_0B.MS_0BB4'Access);
13058      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 601, (False, AMF.CMOF.Public_Visibility));
13059   end Initialize_601;
13060
13061   --------------------
13062   -- Initialize_602 --
13063   --------------------
13064
13065   procedure Initialize_602 is
13066   begin
13067      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13068       (Base + 602,
13069        AMF.Internals.Tables.UML_String_Data_00.MS_00B9'Access);
13070      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 602, (False, AMF.CMOF.Public_Visibility));
13071   end Initialize_602;
13072
13073   --------------------
13074   -- Initialize_603 --
13075   --------------------
13076
13077   procedure Initialize_603 is
13078   begin
13079      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
13080       (Base + 603,
13081        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
13082      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13083       (Base + 603,
13084        AMF.Internals.Tables.UML_String_Data_0B.MS_0B48'Access);
13085      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 603, (False, AMF.CMOF.Public_Visibility));
13086   end Initialize_603;
13087
13088   --------------------
13089   -- Initialize_604 --
13090   --------------------
13091
13092   procedure Initialize_604 is
13093   begin
13094      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13095       (Base + 604,
13096        AMF.Internals.Tables.UML_String_Data_05.MS_0508'Access);
13097      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 604, (False, AMF.CMOF.Public_Visibility));
13098   end Initialize_604;
13099
13100   --------------------
13101   -- Initialize_605 --
13102   --------------------
13103
13104   procedure Initialize_605 is
13105   begin
13106      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13107       (Base + 605,
13108        AMF.Internals.Tables.UML_String_Data_02.MS_02C9'Access);
13109      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 605, (False, AMF.CMOF.Public_Visibility));
13110   end Initialize_605;
13111
13112   --------------------
13113   -- Initialize_606 --
13114   --------------------
13115
13116   procedure Initialize_606 is
13117   begin
13118      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13119       (Base + 606,
13120        AMF.Internals.Tables.UML_String_Data_05.MS_0598'Access);
13121      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 606, (False, AMF.CMOF.Public_Visibility));
13122   end Initialize_606;
13123
13124   --------------------
13125   -- Initialize_607 --
13126   --------------------
13127
13128   procedure Initialize_607 is
13129   begin
13130      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
13131       (Base + 607,
13132        AMF.Internals.Tables.UML_String_Data_01.MS_0102'Access);
13133      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 607, (False, 0));
13134      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13135       (Base + 607,
13136        AMF.Internals.Tables.UML_String_Data_09.MS_09D2'Access);
13137      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 607, (False, AMF.CMOF.Public_Visibility));
13138   end Initialize_607;
13139
13140   --------------------
13141   -- Initialize_608 --
13142   --------------------
13143
13144   procedure Initialize_608 is
13145   begin
13146      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13147       (Base + 608,
13148        AMF.Internals.Tables.UML_String_Data_0A.MS_0A1E'Access);
13149      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 608, (False, AMF.CMOF.Public_Visibility));
13150   end Initialize_608;
13151
13152   --------------------
13153   -- Initialize_609 --
13154   --------------------
13155
13156   procedure Initialize_609 is
13157   begin
13158      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
13159       (Base + 609,
13160        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
13161      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13162       (Base + 609,
13163        AMF.Internals.Tables.UML_String_Data_07.MS_0728'Access);
13164      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 609, (False, AMF.CMOF.Public_Visibility));
13165   end Initialize_609;
13166
13167   --------------------
13168   -- Initialize_610 --
13169   --------------------
13170
13171   procedure Initialize_610 is
13172   begin
13173      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
13174       (Base + 610,
13175        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
13176      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13177       (Base + 610,
13178        AMF.Internals.Tables.UML_String_Data_02.MS_02AF'Access);
13179      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 610, (False, AMF.CMOF.Public_Visibility));
13180   end Initialize_610;
13181
13182   --------------------
13183   -- Initialize_611 --
13184   --------------------
13185
13186   procedure Initialize_611 is
13187   begin
13188      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 611, (False, 0));
13189      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13190       (Base + 611,
13191        AMF.Internals.Tables.UML_String_Data_0C.MS_0C71'Access);
13192      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 611, (False, AMF.CMOF.Public_Visibility));
13193   end Initialize_611;
13194
13195   --------------------
13196   -- Initialize_612 --
13197   --------------------
13198
13199   procedure Initialize_612 is
13200   begin
13201      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 612, (False, 0));
13202      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13203       (Base + 612,
13204        AMF.Internals.Tables.UML_String_Data_07.MS_07E5'Access);
13205      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 612, (False, AMF.CMOF.Public_Visibility));
13206   end Initialize_612;
13207
13208   --------------------
13209   -- Initialize_613 --
13210   --------------------
13211
13212   procedure Initialize_613 is
13213   begin
13214      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 613, (False, 0));
13215      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13216       (Base + 613,
13217        AMF.Internals.Tables.UML_String_Data_0B.MS_0BCF'Access);
13218      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 613, (False, AMF.CMOF.Public_Visibility));
13219   end Initialize_613;
13220
13221   --------------------
13222   -- Initialize_614 --
13223   --------------------
13224
13225   procedure Initialize_614 is
13226   begin
13227      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 614, (False, 0));
13228      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13229       (Base + 614,
13230        AMF.Internals.Tables.UML_String_Data_0C.MS_0C8F'Access);
13231      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 614, (False, AMF.CMOF.Public_Visibility));
13232   end Initialize_614;
13233
13234   --------------------
13235   -- Initialize_615 --
13236   --------------------
13237
13238   procedure Initialize_615 is
13239   begin
13240      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13241       (Base + 615,
13242        AMF.Internals.Tables.UML_String_Data_04.MS_0457'Access);
13243      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 615, (False, AMF.CMOF.Public_Visibility));
13244   end Initialize_615;
13245
13246   --------------------
13247   -- Initialize_616 --
13248   --------------------
13249
13250   procedure Initialize_616 is
13251   begin
13252      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13253       (Base + 616,
13254        AMF.Internals.Tables.UML_String_Data_04.MS_04DB'Access);
13255      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 616, (False, AMF.CMOF.Public_Visibility));
13256   end Initialize_616;
13257
13258   --------------------
13259   -- Initialize_617 --
13260   --------------------
13261
13262   procedure Initialize_617 is
13263   begin
13264      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 617, True);
13265      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 617, (False, 0));
13266      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13267       (Base + 617,
13268        AMF.Internals.Tables.UML_String_Data_02.MS_026B'Access);
13269      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 617, (False, AMF.CMOF.Public_Visibility));
13270   end Initialize_617;
13271
13272   --------------------
13273   -- Initialize_618 --
13274   --------------------
13275
13276   procedure Initialize_618 is
13277   begin
13278      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13279       (Base + 618,
13280        AMF.Internals.Tables.UML_String_Data_0B.MS_0BAB'Access);
13281      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 618, (False, AMF.CMOF.Public_Visibility));
13282   end Initialize_618;
13283
13284   --------------------
13285   -- Initialize_619 --
13286   --------------------
13287
13288   procedure Initialize_619 is
13289   begin
13290      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 619, True);
13291      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 619, (False, 0));
13292      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13293       (Base + 619,
13294        AMF.Internals.Tables.UML_String_Data_02.MS_0264'Access);
13295      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 619, (False, AMF.CMOF.Public_Visibility));
13296   end Initialize_619;
13297
13298   --------------------
13299   -- Initialize_620 --
13300   --------------------
13301
13302   procedure Initialize_620 is
13303   begin
13304      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 620, True);
13305      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 620, (False, 0));
13306      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13307       (Base + 620,
13308        AMF.Internals.Tables.UML_String_Data_0A.MS_0AC3'Access);
13309      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 620, (False, AMF.CMOF.Public_Visibility));
13310   end Initialize_620;
13311
13312   --------------------
13313   -- Initialize_621 --
13314   --------------------
13315
13316   procedure Initialize_621 is
13317   begin
13318      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 621, (False, 0));
13319      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13320       (Base + 621,
13321        AMF.Internals.Tables.UML_String_Data_01.MS_01AD'Access);
13322      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 621, (False, AMF.CMOF.Public_Visibility));
13323   end Initialize_621;
13324
13325   --------------------
13326   -- Initialize_622 --
13327   --------------------
13328
13329   procedure Initialize_622 is
13330   begin
13331      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 622, (False, 0));
13332      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13333       (Base + 622,
13334        AMF.Internals.Tables.UML_String_Data_00.MS_001E'Access);
13335      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 622, (False, AMF.CMOF.Public_Visibility));
13336   end Initialize_622;
13337
13338   --------------------
13339   -- Initialize_623 --
13340   --------------------
13341
13342   procedure Initialize_623 is
13343   begin
13344      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 623, True);
13345      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 623, (False, 0));
13346      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13347       (Base + 623,
13348        AMF.Internals.Tables.UML_String_Data_05.MS_052C'Access);
13349      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 623, (False, AMF.CMOF.Public_Visibility));
13350   end Initialize_623;
13351
13352   --------------------
13353   -- Initialize_624 --
13354   --------------------
13355
13356   procedure Initialize_624 is
13357   begin
13358      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13359       (Base + 624,
13360        AMF.Internals.Tables.UML_String_Data_04.MS_04D3'Access);
13361      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 624, (False, AMF.CMOF.Public_Visibility));
13362   end Initialize_624;
13363
13364   --------------------
13365   -- Initialize_625 --
13366   --------------------
13367
13368   procedure Initialize_625 is
13369   begin
13370      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 625, True);
13371      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 625, (False, 0));
13372      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13373       (Base + 625,
13374        AMF.Internals.Tables.UML_String_Data_01.MS_013E'Access);
13375      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 625, (False, AMF.CMOF.Public_Visibility));
13376   end Initialize_625;
13377
13378   --------------------
13379   -- Initialize_626 --
13380   --------------------
13381
13382   procedure Initialize_626 is
13383   begin
13384      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 626, (False, 0));
13385      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13386       (Base + 626,
13387        AMF.Internals.Tables.UML_String_Data_00.MS_00F1'Access);
13388      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 626, (False, AMF.CMOF.Public_Visibility));
13389   end Initialize_626;
13390
13391   --------------------
13392   -- Initialize_627 --
13393   --------------------
13394
13395   procedure Initialize_627 is
13396   begin
13397      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 627, True);
13398      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 627, (False, 0));
13399      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13400       (Base + 627,
13401        AMF.Internals.Tables.UML_String_Data_08.MS_0898'Access);
13402      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 627, (False, AMF.CMOF.Public_Visibility));
13403   end Initialize_627;
13404
13405   --------------------
13406   -- Initialize_628 --
13407   --------------------
13408
13409   procedure Initialize_628 is
13410   begin
13411      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13412       (Base + 628,
13413        AMF.Internals.Tables.UML_String_Data_01.MS_01F0'Access);
13414      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 628, (False, AMF.CMOF.Public_Visibility));
13415   end Initialize_628;
13416
13417   --------------------
13418   -- Initialize_629 --
13419   --------------------
13420
13421   procedure Initialize_629 is
13422   begin
13423      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13424       (Base + 629,
13425        AMF.Internals.Tables.UML_String_Data_05.MS_0550'Access);
13426      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 629, (False, AMF.CMOF.Public_Visibility));
13427   end Initialize_629;
13428
13429   --------------------
13430   -- Initialize_630 --
13431   --------------------
13432
13433   procedure Initialize_630 is
13434   begin
13435      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13436       (Base + 630,
13437        AMF.Internals.Tables.UML_String_Data_0C.MS_0C0C'Access);
13438      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 630, (False, AMF.CMOF.Public_Visibility));
13439   end Initialize_630;
13440
13441   --------------------
13442   -- Initialize_631 --
13443   --------------------
13444
13445   procedure Initialize_631 is
13446   begin
13447      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13448       (Base + 631,
13449        AMF.Internals.Tables.UML_String_Data_0B.MS_0B40'Access);
13450      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 631, (False, AMF.CMOF.Public_Visibility));
13451   end Initialize_631;
13452
13453   --------------------
13454   -- Initialize_632 --
13455   --------------------
13456
13457   procedure Initialize_632 is
13458   begin
13459      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 632, True);
13460      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13461       (Base + 632,
13462        AMF.Internals.Tables.UML_String_Data_02.MS_026B'Access);
13463      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 632, (False, AMF.CMOF.Public_Visibility));
13464   end Initialize_632;
13465
13466   --------------------
13467   -- Initialize_633 --
13468   --------------------
13469
13470   procedure Initialize_633 is
13471   begin
13472      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 633, (False, 0));
13473      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13474       (Base + 633,
13475        AMF.Internals.Tables.UML_String_Data_0A.MS_0A38'Access);
13476      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 633, (False, AMF.CMOF.Public_Visibility));
13477   end Initialize_633;
13478
13479   --------------------
13480   -- Initialize_634 --
13481   --------------------
13482
13483   procedure Initialize_634 is
13484   begin
13485      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
13486       (Base + 634,
13487        AMF.Internals.Tables.UML_String_Data_01.MS_0102'Access);
13488      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13489       (Base + 634,
13490        AMF.Internals.Tables.UML_String_Data_08.MS_08D4'Access);
13491      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 634, (False, AMF.CMOF.Public_Visibility));
13492   end Initialize_634;
13493
13494   --------------------
13495   -- Initialize_635 --
13496   --------------------
13497
13498   procedure Initialize_635 is
13499   begin
13500      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 635, True);
13501      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13502       (Base + 635,
13503        AMF.Internals.Tables.UML_String_Data_01.MS_014B'Access);
13504      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 635, (False, AMF.CMOF.Public_Visibility));
13505   end Initialize_635;
13506
13507   --------------------
13508   -- Initialize_636 --
13509   --------------------
13510
13511   procedure Initialize_636 is
13512   begin
13513      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 636, (False, 0));
13514      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13515       (Base + 636,
13516        AMF.Internals.Tables.UML_String_Data_06.MS_061D'Access);
13517      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 636, (False, AMF.CMOF.Public_Visibility));
13518   end Initialize_636;
13519
13520   --------------------
13521   -- Initialize_637 --
13522   --------------------
13523
13524   procedure Initialize_637 is
13525   begin
13526      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13527       (Base + 637,
13528        AMF.Internals.Tables.UML_String_Data_08.MS_0854'Access);
13529      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 637, (False, AMF.CMOF.Public_Visibility));
13530   end Initialize_637;
13531
13532   --------------------
13533   -- Initialize_638 --
13534   --------------------
13535
13536   procedure Initialize_638 is
13537   begin
13538      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 638, (False, 0));
13539      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13540       (Base + 638,
13541        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD7'Access);
13542      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 638, (False, AMF.CMOF.Public_Visibility));
13543   end Initialize_638;
13544
13545   --------------------
13546   -- Initialize_639 --
13547   --------------------
13548
13549   procedure Initialize_639 is
13550   begin
13551      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 639, True);
13552      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 639, (False, 0));
13553      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13554       (Base + 639,
13555        AMF.Internals.Tables.UML_String_Data_04.MS_04CE'Access);
13556      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 639, (False, AMF.CMOF.Public_Visibility));
13557   end Initialize_639;
13558
13559   --------------------
13560   -- Initialize_640 --
13561   --------------------
13562
13563   procedure Initialize_640 is
13564   begin
13565      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 640, (False, 0));
13566      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13567       (Base + 640,
13568        AMF.Internals.Tables.UML_String_Data_08.MS_08F4'Access);
13569      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 640, (False, AMF.CMOF.Public_Visibility));
13570   end Initialize_640;
13571
13572   --------------------
13573   -- Initialize_641 --
13574   --------------------
13575
13576   procedure Initialize_641 is
13577   begin
13578      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
13579       (Base + 641,
13580        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
13581      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13582       (Base + 641,
13583        AMF.Internals.Tables.UML_String_Data_04.MS_04A6'Access);
13584      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 641, (False, AMF.CMOF.Public_Visibility));
13585   end Initialize_641;
13586
13587   --------------------
13588   -- Initialize_642 --
13589   --------------------
13590
13591   procedure Initialize_642 is
13592   begin
13593      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13594       (Base + 642,
13595        AMF.Internals.Tables.UML_String_Data_02.MS_0277'Access);
13596      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 642, (False, AMF.CMOF.Public_Visibility));
13597   end Initialize_642;
13598
13599   --------------------
13600   -- Initialize_643 --
13601   --------------------
13602
13603   procedure Initialize_643 is
13604   begin
13605      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 643, (False, 0));
13606      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13607       (Base + 643,
13608        AMF.Internals.Tables.UML_String_Data_04.MS_0406'Access);
13609      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 643, (False, AMF.CMOF.Public_Visibility));
13610   end Initialize_643;
13611
13612   --------------------
13613   -- Initialize_644 --
13614   --------------------
13615
13616   procedure Initialize_644 is
13617   begin
13618      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 644, (False, 0));
13619      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13620       (Base + 644,
13621        AMF.Internals.Tables.UML_String_Data_0B.MS_0B16'Access);
13622      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 644, (False, AMF.CMOF.Public_Visibility));
13623   end Initialize_644;
13624
13625   --------------------
13626   -- Initialize_645 --
13627   --------------------
13628
13629   procedure Initialize_645 is
13630   begin
13631      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
13632       (Base + 645,
13633        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
13634      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13635       (Base + 645,
13636        AMF.Internals.Tables.UML_String_Data_09.MS_097A'Access);
13637      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 645, (False, AMF.CMOF.Public_Visibility));
13638   end Initialize_645;
13639
13640   --------------------
13641   -- Initialize_646 --
13642   --------------------
13643
13644   procedure Initialize_646 is
13645   begin
13646      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
13647       (Base + 646,
13648        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
13649      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13650       (Base + 646,
13651        AMF.Internals.Tables.UML_String_Data_04.MS_0406'Access);
13652      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 646, (False, AMF.CMOF.Public_Visibility));
13653   end Initialize_646;
13654
13655   --------------------
13656   -- Initialize_647 --
13657   --------------------
13658
13659   procedure Initialize_647 is
13660   begin
13661      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
13662       (Base + 647,
13663        AMF.Internals.Tables.UML_String_Data_09.MS_09FC'Access);
13664      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13665       (Base + 647,
13666        AMF.Internals.Tables.UML_String_Data_04.MS_0406'Access);
13667      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 647, (False, AMF.CMOF.Public_Visibility));
13668   end Initialize_647;
13669
13670   --------------------
13671   -- Initialize_648 --
13672   --------------------
13673
13674   procedure Initialize_648 is
13675   begin
13676      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13677       (Base + 648,
13678        AMF.Internals.Tables.UML_String_Data_04.MS_0406'Access);
13679      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 648, (False, AMF.CMOF.Public_Visibility));
13680   end Initialize_648;
13681
13682   --------------------
13683   -- Initialize_649 --
13684   --------------------
13685
13686   procedure Initialize_649 is
13687   begin
13688      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 649, (False, 0));
13689      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13690       (Base + 649,
13691        AMF.Internals.Tables.UML_String_Data_04.MS_0406'Access);
13692      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 649, (False, AMF.CMOF.Public_Visibility));
13693   end Initialize_649;
13694
13695   --------------------
13696   -- Initialize_650 --
13697   --------------------
13698
13699   procedure Initialize_650 is
13700   begin
13701      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
13702       (Base + 650,
13703        AMF.Internals.Tables.UML_String_Data_09.MS_09FC'Access);
13704      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13705       (Base + 650,
13706        AMF.Internals.Tables.UML_String_Data_04.MS_0406'Access);
13707      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 650, (False, AMF.CMOF.Public_Visibility));
13708   end Initialize_650;
13709
13710   --------------------
13711   -- Initialize_651 --
13712   --------------------
13713
13714   procedure Initialize_651 is
13715   begin
13716      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13717       (Base + 651,
13718        AMF.Internals.Tables.UML_String_Data_0B.MS_0BC7'Access);
13719      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 651, (False, AMF.CMOF.Public_Visibility));
13720   end Initialize_651;
13721
13722   --------------------
13723   -- Initialize_652 --
13724   --------------------
13725
13726   procedure Initialize_652 is
13727   begin
13728      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
13729       (Base + 652,
13730        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
13731      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13732       (Base + 652,
13733        AMF.Internals.Tables.UML_String_Data_0B.MS_0BCA'Access);
13734      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 652, (False, AMF.CMOF.Public_Visibility));
13735   end Initialize_652;
13736
13737   --------------------
13738   -- Initialize_653 --
13739   --------------------
13740
13741   procedure Initialize_653 is
13742   begin
13743      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13744       (Base + 653,
13745        AMF.Internals.Tables.UML_String_Data_07.MS_075A'Access);
13746      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 653, (False, AMF.CMOF.Public_Visibility));
13747   end Initialize_653;
13748
13749   --------------------
13750   -- Initialize_654 --
13751   --------------------
13752
13753   procedure Initialize_654 is
13754   begin
13755      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 654, (False, 0));
13756      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13757       (Base + 654,
13758        AMF.Internals.Tables.UML_String_Data_07.MS_07F2'Access);
13759      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 654, (False, AMF.CMOF.Public_Visibility));
13760   end Initialize_654;
13761
13762   --------------------
13763   -- Initialize_655 --
13764   --------------------
13765
13766   procedure Initialize_655 is
13767   begin
13768      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13769       (Base + 655,
13770        AMF.Internals.Tables.UML_String_Data_08.MS_0854'Access);
13771      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 655, (False, AMF.CMOF.Public_Visibility));
13772   end Initialize_655;
13773
13774   --------------------
13775   -- Initialize_656 --
13776   --------------------
13777
13778   procedure Initialize_656 is
13779   begin
13780      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
13781       (Base + 656,
13782        AMF.Internals.Tables.UML_String_Data_0A.MS_0A8D'Access);
13783      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 656, True);
13784      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 656, True);
13785      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13786       (Base + 656,
13787        AMF.Internals.Tables.UML_String_Data_08.MS_08BC'Access);
13788      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 656, (False, AMF.CMOF.Public_Visibility));
13789   end Initialize_656;
13790
13791   --------------------
13792   -- Initialize_657 --
13793   --------------------
13794
13795   procedure Initialize_657 is
13796   begin
13797      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
13798       (Base + 657,
13799        AMF.Internals.Tables.UML_String_Data_09.MS_09BF'Access);
13800      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13801       (Base + 657,
13802        AMF.Internals.Tables.UML_String_Data_02.MS_0230'Access);
13803      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 657, (False, AMF.CMOF.Public_Visibility));
13804   end Initialize_657;
13805
13806   --------------------
13807   -- Initialize_658 --
13808   --------------------
13809
13810   procedure Initialize_658 is
13811   begin
13812      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 658, (False, 0));
13813      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13814       (Base + 658,
13815        AMF.Internals.Tables.UML_String_Data_01.MS_019C'Access);
13816      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 658, (False, AMF.CMOF.Public_Visibility));
13817   end Initialize_658;
13818
13819   --------------------
13820   -- Initialize_659 --
13821   --------------------
13822
13823   procedure Initialize_659 is
13824   begin
13825      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 659, (False, 0));
13826      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13827       (Base + 659,
13828        AMF.Internals.Tables.UML_String_Data_0A.MS_0A3B'Access);
13829      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 659, (False, AMF.CMOF.Public_Visibility));
13830   end Initialize_659;
13831
13832   --------------------
13833   -- Initialize_660 --
13834   --------------------
13835
13836   procedure Initialize_660 is
13837   begin
13838      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 660, (False, 0));
13839      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13840       (Base + 660,
13841        AMF.Internals.Tables.UML_String_Data_09.MS_09F2'Access);
13842      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 660, (False, AMF.CMOF.Public_Visibility));
13843   end Initialize_660;
13844
13845   --------------------
13846   -- Initialize_661 --
13847   --------------------
13848
13849   procedure Initialize_661 is
13850   begin
13851      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 661, (False, 0));
13852      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13853       (Base + 661,
13854        AMF.Internals.Tables.UML_String_Data_07.MS_0736'Access);
13855      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 661, (False, AMF.CMOF.Public_Visibility));
13856   end Initialize_661;
13857
13858   --------------------
13859   -- Initialize_662 --
13860   --------------------
13861
13862   procedure Initialize_662 is
13863   begin
13864      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 662, (False, 0));
13865      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13866       (Base + 662,
13867        AMF.Internals.Tables.UML_String_Data_05.MS_05CB'Access);
13868      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 662, (False, AMF.CMOF.Public_Visibility));
13869   end Initialize_662;
13870
13871   --------------------
13872   -- Initialize_663 --
13873   --------------------
13874
13875   procedure Initialize_663 is
13876   begin
13877      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
13878       (Base + 663,
13879        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
13880      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13881       (Base + 663,
13882        AMF.Internals.Tables.UML_String_Data_07.MS_07DE'Access);
13883      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 663, (False, AMF.CMOF.Public_Visibility));
13884   end Initialize_663;
13885
13886   --------------------
13887   -- Initialize_664 --
13888   --------------------
13889
13890   procedure Initialize_664 is
13891   begin
13892      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
13893       (Base + 664,
13894        AMF.Internals.Tables.UML_String_Data_01.MS_0102'Access);
13895      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13896       (Base + 664,
13897        AMF.Internals.Tables.UML_String_Data_08.MS_08C3'Access);
13898      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 664, (False, AMF.CMOF.Public_Visibility));
13899   end Initialize_664;
13900
13901   --------------------
13902   -- Initialize_665 --
13903   --------------------
13904
13905   procedure Initialize_665 is
13906   begin
13907      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
13908       (Base + 665,
13909        AMF.Internals.Tables.UML_String_Data_03.MS_0373'Access);
13910      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 665, True);
13911      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 665, (False, 0));
13912      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13913       (Base + 665,
13914        AMF.Internals.Tables.UML_String_Data_04.MS_04AC'Access);
13915      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 665, (False, AMF.CMOF.Public_Visibility));
13916   end Initialize_665;
13917
13918   --------------------
13919   -- Initialize_666 --
13920   --------------------
13921
13922   procedure Initialize_666 is
13923   begin
13924      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 666, True);
13925      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 666, (False, 0));
13926      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13927       (Base + 666,
13928        AMF.Internals.Tables.UML_String_Data_04.MS_04DD'Access);
13929      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 666, (False, AMF.CMOF.Public_Visibility));
13930   end Initialize_666;
13931
13932   --------------------
13933   -- Initialize_667 --
13934   --------------------
13935
13936   procedure Initialize_667 is
13937   begin
13938      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
13939       (Base + 667,
13940        AMF.Internals.Tables.UML_String_Data_03.MS_0373'Access);
13941      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 667, True);
13942      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 667, (False, 0));
13943      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13944       (Base + 667,
13945        AMF.Internals.Tables.UML_String_Data_06.MS_06C8'Access);
13946      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 667, (False, AMF.CMOF.Public_Visibility));
13947   end Initialize_667;
13948
13949   --------------------
13950   -- Initialize_668 --
13951   --------------------
13952
13953   procedure Initialize_668 is
13954   begin
13955      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 668, True);
13956      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 668, (False, 0));
13957      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13958       (Base + 668,
13959        AMF.Internals.Tables.UML_String_Data_0A.MS_0AB7'Access);
13960      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 668, (False, AMF.CMOF.Public_Visibility));
13961   end Initialize_668;
13962
13963   --------------------
13964   -- Initialize_669 --
13965   --------------------
13966
13967   procedure Initialize_669 is
13968   begin
13969      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 669, (False, 0));
13970      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13971       (Base + 669,
13972        AMF.Internals.Tables.UML_String_Data_0B.MS_0B83'Access);
13973      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 669, (False, AMF.CMOF.Public_Visibility));
13974   end Initialize_669;
13975
13976   --------------------
13977   -- Initialize_670 --
13978   --------------------
13979
13980   procedure Initialize_670 is
13981   begin
13982      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 670, True);
13983      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 670, (False, 0));
13984      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
13985       (Base + 670,
13986        AMF.Internals.Tables.UML_String_Data_03.MS_0354'Access);
13987      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 670, (False, AMF.CMOF.Public_Visibility));
13988   end Initialize_670;
13989
13990   --------------------
13991   -- Initialize_671 --
13992   --------------------
13993
13994   procedure Initialize_671 is
13995   begin
13996      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 671, True);
13997      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived_Union (Base + 671, True);
13998      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 671, True);
13999      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 671, (False, 0));
14000      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14001       (Base + 671,
14002        AMF.Internals.Tables.UML_String_Data_05.MS_05FF'Access);
14003      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 671, (False, AMF.CMOF.Public_Visibility));
14004   end Initialize_671;
14005
14006   --------------------
14007   -- Initialize_672 --
14008   --------------------
14009
14010   procedure Initialize_672 is
14011   begin
14012      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 672, True);
14013      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 672, True);
14014      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 672, (False, 0));
14015      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14016       (Base + 672,
14017        AMF.Internals.Tables.UML_String_Data_01.MS_011F'Access);
14018      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 672, (False, AMF.CMOF.Public_Visibility));
14019   end Initialize_672;
14020
14021   --------------------
14022   -- Initialize_673 --
14023   --------------------
14024
14025   procedure Initialize_673 is
14026   begin
14027      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 673, (False, 0));
14028      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14029       (Base + 673,
14030        AMF.Internals.Tables.UML_String_Data_0B.MS_0B62'Access);
14031      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 673, (False, AMF.CMOF.Public_Visibility));
14032   end Initialize_673;
14033
14034   --------------------
14035   -- Initialize_674 --
14036   --------------------
14037
14038   procedure Initialize_674 is
14039   begin
14040      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
14041       (Base + 674,
14042        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
14043      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14044       (Base + 674,
14045        AMF.Internals.Tables.UML_String_Data_05.MS_05DE'Access);
14046      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 674, (False, AMF.CMOF.Public_Visibility));
14047   end Initialize_674;
14048
14049   --------------------
14050   -- Initialize_675 --
14051   --------------------
14052
14053   procedure Initialize_675 is
14054   begin
14055      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
14056       (Base + 675,
14057        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
14058      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14059       (Base + 675,
14060        AMF.Internals.Tables.UML_String_Data_05.MS_05FE'Access);
14061      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 675, (False, AMF.CMOF.Public_Visibility));
14062   end Initialize_675;
14063
14064   --------------------
14065   -- Initialize_676 --
14066   --------------------
14067
14068   procedure Initialize_676 is
14069   begin
14070      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 676, (False, 0));
14071      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14072       (Base + 676,
14073        AMF.Internals.Tables.UML_String_Data_0A.MS_0A28'Access);
14074      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 676, (False, AMF.CMOF.Public_Visibility));
14075   end Initialize_676;
14076
14077   --------------------
14078   -- Initialize_677 --
14079   --------------------
14080
14081   procedure Initialize_677 is
14082   begin
14083      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 677, (False, 0));
14084      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14085       (Base + 677,
14086        AMF.Internals.Tables.UML_String_Data_05.MS_05D5'Access);
14087      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 677, (False, AMF.CMOF.Public_Visibility));
14088   end Initialize_677;
14089
14090   --------------------
14091   -- Initialize_678 --
14092   --------------------
14093
14094   procedure Initialize_678 is
14095   begin
14096      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
14097       (Base + 678,
14098        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
14099      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14100       (Base + 678,
14101        AMF.Internals.Tables.UML_String_Data_0B.MS_0B92'Access);
14102      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 678, (False, AMF.CMOF.Public_Visibility));
14103   end Initialize_678;
14104
14105   --------------------
14106   -- Initialize_679 --
14107   --------------------
14108
14109   procedure Initialize_679 is
14110   begin
14111      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
14112       (Base + 679,
14113        AMF.Internals.Tables.UML_String_Data_0C.MS_0C7A'Access);
14114      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14115       (Base + 679,
14116        AMF.Internals.Tables.UML_String_Data_0A.MS_0A85'Access);
14117      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 679, (False, AMF.CMOF.Public_Visibility));
14118   end Initialize_679;
14119
14120   --------------------
14121   -- Initialize_680 --
14122   --------------------
14123
14124   procedure Initialize_680 is
14125   begin
14126      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 680, (False, 0));
14127      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14128       (Base + 680,
14129        AMF.Internals.Tables.UML_String_Data_0A.MS_0A28'Access);
14130      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 680, (False, AMF.CMOF.Public_Visibility));
14131   end Initialize_680;
14132
14133   --------------------
14134   -- Initialize_681 --
14135   --------------------
14136
14137   procedure Initialize_681 is
14138   begin
14139      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 681, True);
14140      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14141       (Base + 681,
14142        AMF.Internals.Tables.UML_String_Data_04.MS_044E'Access);
14143      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 681, (False, AMF.CMOF.Public_Visibility));
14144   end Initialize_681;
14145
14146   --------------------
14147   -- Initialize_682 --
14148   --------------------
14149
14150   procedure Initialize_682 is
14151   begin
14152      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14153       (Base + 682,
14154        AMF.Internals.Tables.UML_String_Data_02.MS_02BA'Access);
14155      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 682, (False, AMF.CMOF.Public_Visibility));
14156   end Initialize_682;
14157
14158   --------------------
14159   -- Initialize_683 --
14160   --------------------
14161
14162   procedure Initialize_683 is
14163   begin
14164      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 683, True);
14165      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Unique (Base + 683, False);
14166      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 683, (False, 0));
14167      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14168       (Base + 683,
14169        AMF.Internals.Tables.UML_String_Data_0B.MS_0B98'Access);
14170      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 683, (False, (Unlimited => True)));
14171      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 683, (False, AMF.CMOF.Public_Visibility));
14172   end Initialize_683;
14173
14174   --------------------
14175   -- Initialize_684 --
14176   --------------------
14177
14178   procedure Initialize_684 is
14179   begin
14180      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 684, True);
14181      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 684, (False, 0));
14182      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14183       (Base + 684,
14184        AMF.Internals.Tables.UML_String_Data_0B.MS_0B5A'Access);
14185      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 684, (False, (Unlimited => True)));
14186      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 684, (False, AMF.CMOF.Public_Visibility));
14187   end Initialize_684;
14188
14189   --------------------
14190   -- Initialize_685 --
14191   --------------------
14192
14193   procedure Initialize_685 is
14194   begin
14195      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 685, True);
14196      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Unique (Base + 685, False);
14197      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 685, (False, 0));
14198      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14199       (Base + 685,
14200        AMF.Internals.Tables.UML_String_Data_0B.MS_0B98'Access);
14201      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 685, (False, (Unlimited => True)));
14202      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 685, (False, AMF.CMOF.Public_Visibility));
14203   end Initialize_685;
14204
14205   --------------------
14206   -- Initialize_686 --
14207   --------------------
14208
14209   procedure Initialize_686 is
14210   begin
14211      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 686, True);
14212      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 686, (False, 0));
14213      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14214       (Base + 686,
14215        AMF.Internals.Tables.UML_String_Data_0B.MS_0B5A'Access);
14216      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 686, (False, (Unlimited => True)));
14217      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 686, (False, AMF.CMOF.Public_Visibility));
14218   end Initialize_686;
14219
14220   --------------------
14221   -- Initialize_687 --
14222   --------------------
14223
14224   procedure Initialize_687 is
14225   begin
14226      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 687, (False, 0));
14227      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14228       (Base + 687,
14229        AMF.Internals.Tables.UML_String_Data_02.MS_029D'Access);
14230      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 687, (False, AMF.CMOF.Public_Visibility));
14231   end Initialize_687;
14232
14233   --------------------
14234   -- Initialize_688 --
14235   --------------------
14236
14237   procedure Initialize_688 is
14238   begin
14239      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 688, True);
14240      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Unique (Base + 688, False);
14241      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 688, (False, 0));
14242      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14243       (Base + 688,
14244        AMF.Internals.Tables.UML_String_Data_0B.MS_0B98'Access);
14245      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 688, (False, (Unlimited => True)));
14246      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 688, (False, AMF.CMOF.Public_Visibility));
14247   end Initialize_688;
14248
14249   --------------------
14250   -- Initialize_689 --
14251   --------------------
14252
14253   procedure Initialize_689 is
14254   begin
14255      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 689, True);
14256      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 689, (False, 0));
14257      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14258       (Base + 689,
14259        AMF.Internals.Tables.UML_String_Data_0B.MS_0B5A'Access);
14260      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 689, (False, (Unlimited => True)));
14261      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 689, (False, AMF.CMOF.Public_Visibility));
14262   end Initialize_689;
14263
14264   --------------------
14265   -- Initialize_690 --
14266   --------------------
14267
14268   procedure Initialize_690 is
14269   begin
14270      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 690, True);
14271      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 690, True);
14272      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 690, (False, 0));
14273      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14274       (Base + 690,
14275        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
14276      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 690, (False, AMF.CMOF.Public_Visibility));
14277   end Initialize_690;
14278
14279   --------------------
14280   -- Initialize_691 --
14281   --------------------
14282
14283   procedure Initialize_691 is
14284   begin
14285      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 691, True);
14286      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 691, (False, 0));
14287      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14288       (Base + 691,
14289        AMF.Internals.Tables.UML_String_Data_03.MS_030A'Access);
14290      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 691, (False, AMF.CMOF.Public_Visibility));
14291   end Initialize_691;
14292
14293   --------------------
14294   -- Initialize_692 --
14295   --------------------
14296
14297   procedure Initialize_692 is
14298   begin
14299      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 692, (False, 0));
14300      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14301       (Base + 692,
14302        AMF.Internals.Tables.UML_String_Data_04.MS_0494'Access);
14303      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 692, (False, AMF.CMOF.Public_Visibility));
14304   end Initialize_692;
14305
14306   --------------------
14307   -- Initialize_693 --
14308   --------------------
14309
14310   procedure Initialize_693 is
14311   begin
14312      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 693, (False, 0));
14313      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14314       (Base + 693,
14315        AMF.Internals.Tables.UML_String_Data_00.MS_00A1'Access);
14316      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 693, (False, AMF.CMOF.Public_Visibility));
14317   end Initialize_693;
14318
14319   --------------------
14320   -- Initialize_694 --
14321   --------------------
14322
14323   procedure Initialize_694 is
14324   begin
14325      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 694, (False, 0));
14326      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14327       (Base + 694,
14328        AMF.Internals.Tables.UML_String_Data_07.MS_07C5'Access);
14329      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 694, (False, AMF.CMOF.Public_Visibility));
14330   end Initialize_694;
14331
14332   --------------------
14333   -- Initialize_695 --
14334   --------------------
14335
14336   procedure Initialize_695 is
14337   begin
14338      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
14339       (Base + 695,
14340        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
14341      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 695, True);
14342      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 695, True);
14343      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14344       (Base + 695,
14345        AMF.Internals.Tables.UML_String_Data_07.MS_07DE'Access);
14346      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 695, (False, AMF.CMOF.Public_Visibility));
14347   end Initialize_695;
14348
14349   --------------------
14350   -- Initialize_696 --
14351   --------------------
14352
14353   procedure Initialize_696 is
14354   begin
14355      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
14356       (Base + 696,
14357        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
14358      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14359       (Base + 696,
14360        AMF.Internals.Tables.UML_String_Data_03.MS_0329'Access);
14361      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 696, (False, AMF.CMOF.Public_Visibility));
14362   end Initialize_696;
14363
14364   --------------------
14365   -- Initialize_697 --
14366   --------------------
14367
14368   procedure Initialize_697 is
14369   begin
14370      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
14371       (Base + 697,
14372        AMF.Internals.Tables.UML_String_Data_01.MS_0102'Access);
14373      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 697, True);
14374      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 697, True);
14375      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14376       (Base + 697,
14377        AMF.Internals.Tables.UML_String_Data_08.MS_08C3'Access);
14378      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 697, (False, AMF.CMOF.Public_Visibility));
14379   end Initialize_697;
14380
14381   --------------------
14382   -- Initialize_698 --
14383   --------------------
14384
14385   procedure Initialize_698 is
14386   begin
14387      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
14388       (Base + 698,
14389        AMF.Internals.Tables.UML_String_Data_03.MS_0373'Access);
14390      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 698, True);
14391      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 698, True);
14392      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 698, (False, 0));
14393      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14394       (Base + 698,
14395        AMF.Internals.Tables.UML_String_Data_04.MS_04AC'Access);
14396      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 698, (False, AMF.CMOF.Public_Visibility));
14397   end Initialize_698;
14398
14399   --------------------
14400   -- Initialize_699 --
14401   --------------------
14402
14403   procedure Initialize_699 is
14404   begin
14405      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 699, (False, 0));
14406      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14407       (Base + 699,
14408        AMF.Internals.Tables.UML_String_Data_01.MS_01BF'Access);
14409      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 699, (False, AMF.CMOF.Public_Visibility));
14410   end Initialize_699;
14411
14412   --------------------
14413   -- Initialize_700 --
14414   --------------------
14415
14416   procedure Initialize_700 is
14417   begin
14418      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 700, True);
14419      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 700, True);
14420      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 700, (False, 0));
14421      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14422       (Base + 700,
14423        AMF.Internals.Tables.UML_String_Data_0B.MS_0BB4'Access);
14424      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 700, (False, AMF.CMOF.Public_Visibility));
14425   end Initialize_700;
14426
14427   --------------------
14428   -- Initialize_701 --
14429   --------------------
14430
14431   procedure Initialize_701 is
14432   begin
14433      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
14434       (Base + 701,
14435        AMF.Internals.Tables.UML_String_Data_03.MS_0373'Access);
14436      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 701, True);
14437      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 701, True);
14438      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 701, (False, 0));
14439      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14440       (Base + 701,
14441        AMF.Internals.Tables.UML_String_Data_06.MS_06C8'Access);
14442      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 701, (False, AMF.CMOF.Public_Visibility));
14443   end Initialize_701;
14444
14445   --------------------
14446   -- Initialize_702 --
14447   --------------------
14448
14449   procedure Initialize_702 is
14450   begin
14451      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14452       (Base + 702,
14453        AMF.Internals.Tables.UML_String_Data_07.MS_070A'Access);
14454      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 702, (False, AMF.CMOF.Public_Visibility));
14455   end Initialize_702;
14456
14457   --------------------
14458   -- Initialize_703 --
14459   --------------------
14460
14461   procedure Initialize_703 is
14462   begin
14463      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 703, (False, 0));
14464      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14465       (Base + 703,
14466        AMF.Internals.Tables.UML_String_Data_0A.MS_0A77'Access);
14467      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 703, (False, AMF.CMOF.Public_Visibility));
14468   end Initialize_703;
14469
14470   --------------------
14471   -- Initialize_704 --
14472   --------------------
14473
14474   procedure Initialize_704 is
14475   begin
14476      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 704, (False, 0));
14477      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14478       (Base + 704,
14479        AMF.Internals.Tables.UML_String_Data_04.MS_04B2'Access);
14480      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 704, (False, AMF.CMOF.Public_Visibility));
14481   end Initialize_704;
14482
14483   --------------------
14484   -- Initialize_705 --
14485   --------------------
14486
14487   procedure Initialize_705 is
14488   begin
14489      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14490       (Base + 705,
14491        AMF.Internals.Tables.UML_String_Data_0C.MS_0C0A'Access);
14492      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 705, (False, AMF.CMOF.Public_Visibility));
14493   end Initialize_705;
14494
14495   --------------------
14496   -- Initialize_706 --
14497   --------------------
14498
14499   procedure Initialize_706 is
14500   begin
14501      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14502       (Base + 706,
14503        AMF.Internals.Tables.UML_String_Data_07.MS_0780'Access);
14504      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 706, (False, AMF.CMOF.Public_Visibility));
14505   end Initialize_706;
14506
14507   --------------------
14508   -- Initialize_707 --
14509   --------------------
14510
14511   procedure Initialize_707 is
14512   begin
14513      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
14514       (Base + 707,
14515        AMF.Internals.Tables.UML_String_Data_05.MS_055A'Access);
14516      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14517       (Base + 707,
14518        AMF.Internals.Tables.UML_String_Data_0B.MS_0B62'Access);
14519      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 707, (False, AMF.CMOF.Public_Visibility));
14520   end Initialize_707;
14521
14522   --------------------
14523   -- Initialize_708 --
14524   --------------------
14525
14526   procedure Initialize_708 is
14527   begin
14528      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14529       (Base + 708,
14530        AMF.Internals.Tables.UML_String_Data_01.MS_010E'Access);
14531      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 708, (False, AMF.CMOF.Public_Visibility));
14532   end Initialize_708;
14533
14534   --------------------
14535   -- Initialize_709 --
14536   --------------------
14537
14538   procedure Initialize_709 is
14539   begin
14540      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14541       (Base + 709,
14542        AMF.Internals.Tables.UML_String_Data_01.MS_01A3'Access);
14543      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 709, (False, AMF.CMOF.Public_Visibility));
14544   end Initialize_709;
14545
14546   --------------------
14547   -- Initialize_710 --
14548   --------------------
14549
14550   procedure Initialize_710 is
14551   begin
14552      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
14553       (Base + 710,
14554        AMF.Internals.Tables.UML_String_Data_05.MS_055A'Access);
14555      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14556       (Base + 710,
14557        AMF.Internals.Tables.UML_String_Data_0B.MS_0B62'Access);
14558      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 710, (False, AMF.CMOF.Public_Visibility));
14559   end Initialize_710;
14560
14561   --------------------
14562   -- Initialize_711 --
14563   --------------------
14564
14565   procedure Initialize_711 is
14566   begin
14567      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 711, True);
14568      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 711, (False, 0));
14569      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14570       (Base + 711,
14571        AMF.Internals.Tables.UML_String_Data_00.MS_00FB'Access);
14572      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 711, (False, AMF.CMOF.Public_Visibility));
14573   end Initialize_711;
14574
14575   --------------------
14576   -- Initialize_712 --
14577   --------------------
14578
14579   procedure Initialize_712 is
14580   begin
14581      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 712, True);
14582      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 712, (False, 0));
14583      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14584       (Base + 712,
14585        AMF.Internals.Tables.UML_String_Data_03.MS_0362'Access);
14586      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 712, (False, AMF.CMOF.Public_Visibility));
14587   end Initialize_712;
14588
14589   --------------------
14590   -- Initialize_713 --
14591   --------------------
14592
14593   procedure Initialize_713 is
14594   begin
14595      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
14596       (Base + 713,
14597        AMF.Internals.Tables.UML_String_Data_06.MS_0688'Access);
14598      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14599       (Base + 713,
14600        AMF.Internals.Tables.UML_String_Data_0C.MS_0C05'Access);
14601      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 713, (False, AMF.CMOF.Public_Visibility));
14602   end Initialize_713;
14603
14604   --------------------
14605   -- Initialize_714 --
14606   --------------------
14607
14608   procedure Initialize_714 is
14609   begin
14610      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 714, (False, 0));
14611      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14612       (Base + 714,
14613        AMF.Internals.Tables.UML_String_Data_00.MS_004F'Access);
14614      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 714, (False, AMF.CMOF.Public_Visibility));
14615   end Initialize_714;
14616
14617   --------------------
14618   -- Initialize_715 --
14619   --------------------
14620
14621   procedure Initialize_715 is
14622   begin
14623      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
14624       (Base + 715,
14625        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
14626      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14627       (Base + 715,
14628        AMF.Internals.Tables.UML_String_Data_03.MS_0337'Access);
14629      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 715, (False, AMF.CMOF.Public_Visibility));
14630   end Initialize_715;
14631
14632   --------------------
14633   -- Initialize_716 --
14634   --------------------
14635
14636   procedure Initialize_716 is
14637   begin
14638      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
14639       (Base + 716,
14640        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
14641      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14642       (Base + 716,
14643        AMF.Internals.Tables.UML_String_Data_01.MS_01E3'Access);
14644      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 716, (False, AMF.CMOF.Public_Visibility));
14645   end Initialize_716;
14646
14647   --------------------
14648   -- Initialize_717 --
14649   --------------------
14650
14651   procedure Initialize_717 is
14652   begin
14653      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 717, (False, 0));
14654      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14655       (Base + 717,
14656        AMF.Internals.Tables.UML_String_Data_06.MS_0638'Access);
14657      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 717, (False, AMF.CMOF.Public_Visibility));
14658   end Initialize_717;
14659
14660   --------------------
14661   -- Initialize_718 --
14662   --------------------
14663
14664   procedure Initialize_718 is
14665   begin
14666      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 718, (False, 0));
14667      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14668       (Base + 718,
14669        AMF.Internals.Tables.UML_String_Data_04.MS_045C'Access);
14670      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 718, (False, AMF.CMOF.Public_Visibility));
14671   end Initialize_718;
14672
14673   --------------------
14674   -- Initialize_719 --
14675   --------------------
14676
14677   procedure Initialize_719 is
14678   begin
14679      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 719, (False, 0));
14680      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14681       (Base + 719,
14682        AMF.Internals.Tables.UML_String_Data_01.MS_01BF'Access);
14683      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 719, (False, AMF.CMOF.Public_Visibility));
14684   end Initialize_719;
14685
14686   --------------------
14687   -- Initialize_720 --
14688   --------------------
14689
14690   procedure Initialize_720 is
14691   begin
14692      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
14693       (Base + 720,
14694        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
14695      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14696       (Base + 720,
14697        AMF.Internals.Tables.UML_String_Data_0B.MS_0B94'Access);
14698      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 720, (False, AMF.CMOF.Public_Visibility));
14699   end Initialize_720;
14700
14701   --------------------
14702   -- Initialize_721 --
14703   --------------------
14704
14705   procedure Initialize_721 is
14706   begin
14707      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
14708       (Base + 721,
14709        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
14710      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14711       (Base + 721,
14712        AMF.Internals.Tables.UML_String_Data_0B.MS_0B30'Access);
14713      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 721, (False, AMF.CMOF.Public_Visibility));
14714   end Initialize_721;
14715
14716   --------------------
14717   -- Initialize_722 --
14718   --------------------
14719
14720   procedure Initialize_722 is
14721   begin
14722      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
14723       (Base + 722,
14724        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
14725      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14726       (Base + 722,
14727        AMF.Internals.Tables.UML_String_Data_0A.MS_0A6F'Access);
14728      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 722, (False, AMF.CMOF.Public_Visibility));
14729   end Initialize_722;
14730
14731   --------------------
14732   -- Initialize_723 --
14733   --------------------
14734
14735   procedure Initialize_723 is
14736   begin
14737      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
14738       (Base + 723,
14739        AMF.Internals.Tables.UML_String_Data_01.MS_0102'Access);
14740      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14741       (Base + 723,
14742        AMF.Internals.Tables.UML_String_Data_09.MS_09E3'Access);
14743      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 723, (False, AMF.CMOF.Public_Visibility));
14744   end Initialize_723;
14745
14746   --------------------
14747   -- Initialize_724 --
14748   --------------------
14749
14750   procedure Initialize_724 is
14751   begin
14752      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 724, (False, 0));
14753      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14754       (Base + 724,
14755        AMF.Internals.Tables.UML_String_Data_08.MS_0898'Access);
14756      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 724, (False, AMF.CMOF.Public_Visibility));
14757   end Initialize_724;
14758
14759   --------------------
14760   -- Initialize_725 --
14761   --------------------
14762
14763   procedure Initialize_725 is
14764   begin
14765      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14766       (Base + 725,
14767        AMF.Internals.Tables.UML_String_Data_02.MS_0203'Access);
14768      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 725, (False, AMF.CMOF.Public_Visibility));
14769   end Initialize_725;
14770
14771   --------------------
14772   -- Initialize_726 --
14773   --------------------
14774
14775   procedure Initialize_726 is
14776   begin
14777      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14778       (Base + 726,
14779        AMF.Internals.Tables.UML_String_Data_07.MS_07FB'Access);
14780      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 726, (False, AMF.CMOF.Public_Visibility));
14781   end Initialize_726;
14782
14783   --------------------
14784   -- Initialize_727 --
14785   --------------------
14786
14787   procedure Initialize_727 is
14788   begin
14789      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
14790       (Base + 727,
14791        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
14792      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14793       (Base + 727,
14794        AMF.Internals.Tables.UML_String_Data_03.MS_0325'Access);
14795      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 727, (False, AMF.CMOF.Public_Visibility));
14796   end Initialize_727;
14797
14798   --------------------
14799   -- Initialize_728 --
14800   --------------------
14801
14802   procedure Initialize_728 is
14803   begin
14804      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
14805       (Base + 728,
14806        AMF.Internals.Tables.UML_String_Data_01.MS_015B'Access);
14807      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14808       (Base + 728,
14809        AMF.Internals.Tables.UML_String_Data_0B.MS_0BFD'Access);
14810      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 728, (False, AMF.CMOF.Public_Visibility));
14811   end Initialize_728;
14812
14813   --------------------
14814   -- Initialize_729 --
14815   --------------------
14816
14817   procedure Initialize_729 is
14818   begin
14819      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 729, (False, 0));
14820      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14821       (Base + 729,
14822        AMF.Internals.Tables.UML_String_Data_0A.MS_0A43'Access);
14823      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 729, (False, AMF.CMOF.Public_Visibility));
14824   end Initialize_729;
14825
14826   --------------------
14827   -- Initialize_730 --
14828   --------------------
14829
14830   procedure Initialize_730 is
14831   begin
14832      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 730, (False, 0));
14833      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14834       (Base + 730,
14835        AMF.Internals.Tables.UML_String_Data_0B.MS_0B19'Access);
14836      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 730, (False, AMF.CMOF.Public_Visibility));
14837   end Initialize_730;
14838
14839   --------------------
14840   -- Initialize_731 --
14841   --------------------
14842
14843   procedure Initialize_731 is
14844   begin
14845      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 731, (False, 0));
14846      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14847       (Base + 731,
14848        AMF.Internals.Tables.UML_String_Data_04.MS_0494'Access);
14849      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 731, (False, AMF.CMOF.Public_Visibility));
14850   end Initialize_731;
14851
14852   --------------------
14853   -- Initialize_732 --
14854   --------------------
14855
14856   procedure Initialize_732 is
14857   begin
14858      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 732, (False, 0));
14859      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14860       (Base + 732,
14861        AMF.Internals.Tables.UML_String_Data_00.MS_00A1'Access);
14862      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 732, (False, AMF.CMOF.Public_Visibility));
14863   end Initialize_732;
14864
14865   --------------------
14866   -- Initialize_733 --
14867   --------------------
14868
14869   procedure Initialize_733 is
14870   begin
14871      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 733, True);
14872      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 733, (False, 0));
14873      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14874       (Base + 733,
14875        AMF.Internals.Tables.UML_String_Data_00.MS_00FB'Access);
14876      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 733, (False, AMF.CMOF.Public_Visibility));
14877   end Initialize_733;
14878
14879   --------------------
14880   -- Initialize_734 --
14881   --------------------
14882
14883   procedure Initialize_734 is
14884   begin
14885      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 734, True);
14886      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 734, (False, 0));
14887      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14888       (Base + 734,
14889        AMF.Internals.Tables.UML_String_Data_03.MS_0362'Access);
14890      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 734, (False, AMF.CMOF.Public_Visibility));
14891   end Initialize_734;
14892
14893   --------------------
14894   -- Initialize_735 --
14895   --------------------
14896
14897   procedure Initialize_735 is
14898   begin
14899      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 735, (False, 0));
14900      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14901       (Base + 735,
14902        AMF.Internals.Tables.UML_String_Data_07.MS_07C5'Access);
14903      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 735, (False, AMF.CMOF.Public_Visibility));
14904   end Initialize_735;
14905
14906   --------------------
14907   -- Initialize_736 --
14908   --------------------
14909
14910   procedure Initialize_736 is
14911   begin
14912      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
14913       (Base + 736,
14914        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
14915      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 736, True);
14916      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14917       (Base + 736,
14918        AMF.Internals.Tables.UML_String_Data_06.MS_060E'Access);
14919      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 736, (False, AMF.CMOF.Public_Visibility));
14920   end Initialize_736;
14921
14922   --------------------
14923   -- Initialize_737 --
14924   --------------------
14925
14926   procedure Initialize_737 is
14927   begin
14928      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
14929       (Base + 737,
14930        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
14931      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14932       (Base + 737,
14933        AMF.Internals.Tables.UML_String_Data_03.MS_039F'Access);
14934      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 737, (False, AMF.CMOF.Public_Visibility));
14935   end Initialize_737;
14936
14937   --------------------
14938   -- Initialize_738 --
14939   --------------------
14940
14941   procedure Initialize_738 is
14942   begin
14943      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
14944       (Base + 738,
14945        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
14946      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14947       (Base + 738,
14948        AMF.Internals.Tables.UML_String_Data_01.MS_0176'Access);
14949      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 738, (False, AMF.CMOF.Public_Visibility));
14950   end Initialize_738;
14951
14952   --------------------
14953   -- Initialize_739 --
14954   --------------------
14955
14956   procedure Initialize_739 is
14957   begin
14958      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
14959       (Base + 739,
14960        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
14961      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14962       (Base + 739,
14963        AMF.Internals.Tables.UML_String_Data_0A.MS_0A0C'Access);
14964      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 739, (False, AMF.CMOF.Public_Visibility));
14965   end Initialize_739;
14966
14967   --------------------
14968   -- Initialize_740 --
14969   --------------------
14970
14971   procedure Initialize_740 is
14972   begin
14973      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
14974       (Base + 740,
14975        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
14976      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14977       (Base + 740,
14978        AMF.Internals.Tables.UML_String_Data_01.MS_0118'Access);
14979      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 740, (False, AMF.CMOF.Public_Visibility));
14980   end Initialize_740;
14981
14982   --------------------
14983   -- Initialize_741 --
14984   --------------------
14985
14986   procedure Initialize_741 is
14987   begin
14988      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 741, True);
14989      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 741, (False, 0));
14990      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
14991       (Base + 741,
14992        AMF.Internals.Tables.UML_String_Data_04.MS_0444'Access);
14993      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 741, (False, AMF.CMOF.Public_Visibility));
14994   end Initialize_741;
14995
14996   --------------------
14997   -- Initialize_742 --
14998   --------------------
14999
15000   procedure Initialize_742 is
15001   begin
15002      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 742, (False, 0));
15003      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15004       (Base + 742,
15005        AMF.Internals.Tables.UML_String_Data_04.MS_049F'Access);
15006      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 742, (False, AMF.CMOF.Public_Visibility));
15007   end Initialize_742;
15008
15009   --------------------
15010   -- Initialize_743 --
15011   --------------------
15012
15013   procedure Initialize_743 is
15014   begin
15015      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15016       (Base + 743,
15017        AMF.Internals.Tables.UML_String_Data_0A.MS_0A5F'Access);
15018      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 743, (False, AMF.CMOF.Public_Visibility));
15019   end Initialize_743;
15020
15021   --------------------
15022   -- Initialize_744 --
15023   --------------------
15024
15025   procedure Initialize_744 is
15026   begin
15027      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15028       (Base + 744,
15029        AMF.Internals.Tables.UML_String_Data_00.MS_008A'Access);
15030      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 744, (False, AMF.CMOF.Public_Visibility));
15031   end Initialize_744;
15032
15033   --------------------
15034   -- Initialize_745 --
15035   --------------------
15036
15037   procedure Initialize_745 is
15038   begin
15039      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 745, True);
15040      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 745, (False, 0));
15041      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15042       (Base + 745,
15043        AMF.Internals.Tables.UML_String_Data_05.MS_05F1'Access);
15044      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 745, (False, AMF.CMOF.Public_Visibility));
15045   end Initialize_745;
15046
15047   --------------------
15048   -- Initialize_746 --
15049   --------------------
15050
15051   procedure Initialize_746 is
15052   begin
15053      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 746, True);
15054      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 746, (False, 0));
15055      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15056       (Base + 746,
15057        AMF.Internals.Tables.UML_String_Data_0A.MS_0AB1'Access);
15058      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 746, (False, AMF.CMOF.Public_Visibility));
15059   end Initialize_746;
15060
15061   --------------------
15062   -- Initialize_747 --
15063   --------------------
15064
15065   procedure Initialize_747 is
15066   begin
15067      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
15068       (Base + 747,
15069        AMF.Internals.Tables.UML_String_Data_09.MS_090C'Access);
15070      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15071       (Base + 747,
15072        AMF.Internals.Tables.UML_String_Data_01.MS_01C4'Access);
15073      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 747, (False, AMF.CMOF.Public_Visibility));
15074   end Initialize_747;
15075
15076   --------------------
15077   -- Initialize_748 --
15078   --------------------
15079
15080   procedure Initialize_748 is
15081   begin
15082      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 748, (False, 0));
15083      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15084       (Base + 748,
15085        AMF.Internals.Tables.UML_String_Data_02.MS_0273'Access);
15086      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 748, (False, AMF.CMOF.Public_Visibility));
15087   end Initialize_748;
15088
15089   --------------------
15090   -- Initialize_749 --
15091   --------------------
15092
15093   procedure Initialize_749 is
15094   begin
15095      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 749, (False, 0));
15096      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15097       (Base + 749,
15098        AMF.Internals.Tables.UML_String_Data_0B.MS_0B7D'Access);
15099      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 749, (False, AMF.CMOF.Public_Visibility));
15100   end Initialize_749;
15101
15102   --------------------
15103   -- Initialize_750 --
15104   --------------------
15105
15106   procedure Initialize_750 is
15107   begin
15108      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15109       (Base + 750,
15110        AMF.Internals.Tables.UML_String_Data_03.MS_03A6'Access);
15111      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 750, (False, AMF.CMOF.Public_Visibility));
15112   end Initialize_750;
15113
15114   --------------------
15115   -- Initialize_751 --
15116   --------------------
15117
15118   procedure Initialize_751 is
15119   begin
15120      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15121       (Base + 751,
15122        AMF.Internals.Tables.UML_String_Data_04.MS_0406'Access);
15123      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 751, (False, AMF.CMOF.Public_Visibility));
15124   end Initialize_751;
15125
15126   --------------------
15127   -- Initialize_752 --
15128   --------------------
15129
15130   procedure Initialize_752 is
15131   begin
15132      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 752, True);
15133      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15134       (Base + 752,
15135        AMF.Internals.Tables.UML_String_Data_07.MS_0790'Access);
15136      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 752, (False, AMF.CMOF.Public_Visibility));
15137   end Initialize_752;
15138
15139   --------------------
15140   -- Initialize_753 --
15141   --------------------
15142
15143   procedure Initialize_753 is
15144   begin
15145      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15146       (Base + 753,
15147        AMF.Internals.Tables.UML_String_Data_03.MS_0321'Access);
15148      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 753, (False, AMF.CMOF.Public_Visibility));
15149   end Initialize_753;
15150
15151   --------------------
15152   -- Initialize_754 --
15153   --------------------
15154
15155   procedure Initialize_754 is
15156   begin
15157      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 754, True);
15158      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15159       (Base + 754,
15160        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
15161      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 754, (False, AMF.CMOF.Public_Visibility));
15162   end Initialize_754;
15163
15164   --------------------
15165   -- Initialize_755 --
15166   --------------------
15167
15168   procedure Initialize_755 is
15169   begin
15170      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15171       (Base + 755,
15172        AMF.Internals.Tables.UML_String_Data_03.MS_0321'Access);
15173      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 755, (False, AMF.CMOF.Public_Visibility));
15174   end Initialize_755;
15175
15176   --------------------
15177   -- Initialize_756 --
15178   --------------------
15179
15180   procedure Initialize_756 is
15181   begin
15182      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
15183       (Base + 756,
15184        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
15185      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15186       (Base + 756,
15187        AMF.Internals.Tables.UML_String_Data_02.MS_021D'Access);
15188      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 756, (False, AMF.CMOF.Public_Visibility));
15189   end Initialize_756;
15190
15191   --------------------
15192   -- Initialize_757 --
15193   --------------------
15194
15195   procedure Initialize_757 is
15196   begin
15197      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 757, True);
15198      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15199       (Base + 757,
15200        AMF.Internals.Tables.UML_String_Data_0C.MS_0C18'Access);
15201      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 757, (False, AMF.CMOF.Public_Visibility));
15202   end Initialize_757;
15203
15204   --------------------
15205   -- Initialize_758 --
15206   --------------------
15207
15208   procedure Initialize_758 is
15209   begin
15210      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 758, True);
15211      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15212       (Base + 758,
15213        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
15214      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 758, (False, AMF.CMOF.Public_Visibility));
15215   end Initialize_758;
15216
15217   --------------------
15218   -- Initialize_759 --
15219   --------------------
15220
15221   procedure Initialize_759 is
15222   begin
15223      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 759, True);
15224      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15225       (Base + 759,
15226        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
15227      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 759, (False, AMF.CMOF.Public_Visibility));
15228   end Initialize_759;
15229
15230   --------------------
15231   -- Initialize_760 --
15232   --------------------
15233
15234   procedure Initialize_760 is
15235   begin
15236      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15237       (Base + 760,
15238        AMF.Internals.Tables.UML_String_Data_02.MS_0277'Access);
15239      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 760, (False, AMF.CMOF.Public_Visibility));
15240   end Initialize_760;
15241
15242   --------------------
15243   -- Initialize_761 --
15244   --------------------
15245
15246   procedure Initialize_761 is
15247   begin
15248      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 761, True);
15249      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15250       (Base + 761,
15251        AMF.Internals.Tables.UML_String_Data_0C.MS_0C18'Access);
15252      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 761, (False, AMF.CMOF.Public_Visibility));
15253   end Initialize_761;
15254
15255   --------------------
15256   -- Initialize_762 --
15257   --------------------
15258
15259   procedure Initialize_762 is
15260   begin
15261      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 762, True);
15262      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15263       (Base + 762,
15264        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
15265      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 762, (False, AMF.CMOF.Public_Visibility));
15266   end Initialize_762;
15267
15268   --------------------
15269   -- Initialize_763 --
15270   --------------------
15271
15272   procedure Initialize_763 is
15273   begin
15274      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 763, True);
15275      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15276       (Base + 763,
15277        AMF.Internals.Tables.UML_String_Data_0C.MS_0C18'Access);
15278      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 763, (False, AMF.CMOF.Public_Visibility));
15279   end Initialize_763;
15280
15281   --------------------
15282   -- Initialize_764 --
15283   --------------------
15284
15285   procedure Initialize_764 is
15286   begin
15287      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15288       (Base + 764,
15289        AMF.Internals.Tables.UML_String_Data_03.MS_03A6'Access);
15290      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 764, (False, AMF.CMOF.Public_Visibility));
15291   end Initialize_764;
15292
15293   --------------------
15294   -- Initialize_765 --
15295   --------------------
15296
15297   procedure Initialize_765 is
15298   begin
15299      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 765, True);
15300      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15301       (Base + 765,
15302        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
15303      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 765, (False, AMF.CMOF.Public_Visibility));
15304   end Initialize_765;
15305
15306   --------------------
15307   -- Initialize_766 --
15308   --------------------
15309
15310   procedure Initialize_766 is
15311   begin
15312      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 766, True);
15313      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15314       (Base + 766,
15315        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
15316      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 766, (False, AMF.CMOF.Public_Visibility));
15317   end Initialize_766;
15318
15319   --------------------
15320   -- Initialize_767 --
15321   --------------------
15322
15323   procedure Initialize_767 is
15324   begin
15325      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 767, True);
15326      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15327       (Base + 767,
15328        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
15329      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 767, (False, AMF.CMOF.Public_Visibility));
15330   end Initialize_767;
15331
15332   --------------------
15333   -- Initialize_768 --
15334   --------------------
15335
15336   procedure Initialize_768 is
15337   begin
15338      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 768, True);
15339      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15340       (Base + 768,
15341        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
15342      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 768, (False, AMF.CMOF.Public_Visibility));
15343   end Initialize_768;
15344
15345   --------------------
15346   -- Initialize_769 --
15347   --------------------
15348
15349   procedure Initialize_769 is
15350   begin
15351      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15352       (Base + 769,
15353        AMF.Internals.Tables.UML_String_Data_09.MS_0930'Access);
15354      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 769, (False, AMF.CMOF.Public_Visibility));
15355   end Initialize_769;
15356
15357   --------------------
15358   -- Initialize_770 --
15359   --------------------
15360
15361   procedure Initialize_770 is
15362   begin
15363      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
15364       (Base + 770,
15365        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
15366      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15367       (Base + 770,
15368        AMF.Internals.Tables.UML_String_Data_04.MS_04A6'Access);
15369      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 770, (False, AMF.CMOF.Public_Visibility));
15370   end Initialize_770;
15371
15372   --------------------
15373   -- Initialize_771 --
15374   --------------------
15375
15376   procedure Initialize_771 is
15377   begin
15378      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 771, True);
15379      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15380       (Base + 771,
15381        AMF.Internals.Tables.UML_String_Data_0C.MS_0C18'Access);
15382      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 771, (False, AMF.CMOF.Public_Visibility));
15383   end Initialize_771;
15384
15385   --------------------
15386   -- Initialize_772 --
15387   --------------------
15388
15389   procedure Initialize_772 is
15390   begin
15391      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
15392       (Base + 772,
15393        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
15394      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15395       (Base + 772,
15396        AMF.Internals.Tables.UML_String_Data_03.MS_0302'Access);
15397      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 772, (False, AMF.CMOF.Public_Visibility));
15398   end Initialize_772;
15399
15400   --------------------
15401   -- Initialize_773 --
15402   --------------------
15403
15404   procedure Initialize_773 is
15405   begin
15406      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15407       (Base + 773,
15408        AMF.Internals.Tables.UML_String_Data_03.MS_0321'Access);
15409      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 773, (False, AMF.CMOF.Public_Visibility));
15410   end Initialize_773;
15411
15412   --------------------
15413   -- Initialize_774 --
15414   --------------------
15415
15416   procedure Initialize_774 is
15417   begin
15418      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 774, True);
15419      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15420       (Base + 774,
15421        AMF.Internals.Tables.UML_String_Data_06.MS_0686'Access);
15422      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 774, (False, AMF.CMOF.Public_Visibility));
15423   end Initialize_774;
15424
15425   --------------------
15426   -- Initialize_775 --
15427   --------------------
15428
15429   procedure Initialize_775 is
15430   begin
15431      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
15432       (Base + 775,
15433        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
15434      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15435       (Base + 775,
15436        AMF.Internals.Tables.UML_String_Data_07.MS_07DE'Access);
15437      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 775, (False, AMF.CMOF.Public_Visibility));
15438   end Initialize_775;
15439
15440   --------------------
15441   -- Initialize_776 --
15442   --------------------
15443
15444   procedure Initialize_776 is
15445   begin
15446      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15447       (Base + 776,
15448        AMF.Internals.Tables.UML_String_Data_01.MS_01FF'Access);
15449      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 776, (False, AMF.CMOF.Public_Visibility));
15450   end Initialize_776;
15451
15452   --------------------
15453   -- Initialize_777 --
15454   --------------------
15455
15456   procedure Initialize_777 is
15457   begin
15458      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 777, True);
15459      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15460       (Base + 777,
15461        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
15462      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 777, (False, AMF.CMOF.Public_Visibility));
15463   end Initialize_777;
15464
15465   --------------------
15466   -- Initialize_778 --
15467   --------------------
15468
15469   procedure Initialize_778 is
15470   begin
15471      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 778, (False, 0));
15472      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15473       (Base + 778,
15474        AMF.Internals.Tables.UML_String_Data_0A.MS_0A1A'Access);
15475      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 778, (False, AMF.CMOF.Public_Visibility));
15476   end Initialize_778;
15477
15478   --------------------
15479   -- Initialize_779 --
15480   --------------------
15481
15482   procedure Initialize_779 is
15483   begin
15484      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 779, True);
15485      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 779, True);
15486      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15487       (Base + 779,
15488        AMF.Internals.Tables.UML_String_Data_03.MS_036B'Access);
15489      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 779, (False, AMF.CMOF.Public_Visibility));
15490   end Initialize_779;
15491
15492   --------------------
15493   -- Initialize_780 --
15494   --------------------
15495
15496   procedure Initialize_780 is
15497   begin
15498      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 780, (False, 0));
15499      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15500       (Base + 780,
15501        AMF.Internals.Tables.UML_String_Data_02.MS_0273'Access);
15502      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 780, (False, AMF.CMOF.Public_Visibility));
15503   end Initialize_780;
15504
15505   --------------------
15506   -- Initialize_781 --
15507   --------------------
15508
15509   procedure Initialize_781 is
15510   begin
15511      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 781, (False, 0));
15512      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15513       (Base + 781,
15514        AMF.Internals.Tables.UML_String_Data_0B.MS_0B7D'Access);
15515      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 781, (False, AMF.CMOF.Public_Visibility));
15516   end Initialize_781;
15517
15518   --------------------
15519   -- Initialize_782 --
15520   --------------------
15521
15522   procedure Initialize_782 is
15523   begin
15524      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
15525       (Base + 782,
15526        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
15527      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15528       (Base + 782,
15529        AMF.Internals.Tables.UML_String_Data_09.MS_09A8'Access);
15530      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 782, (False, AMF.CMOF.Public_Visibility));
15531   end Initialize_782;
15532
15533   --------------------
15534   -- Initialize_783 --
15535   --------------------
15536
15537   procedure Initialize_783 is
15538   begin
15539      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 783, True);
15540      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 783, (False, 0));
15541      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15542       (Base + 783,
15543        AMF.Internals.Tables.UML_String_Data_03.MS_03C3'Access);
15544      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 783, (False, AMF.CMOF.Public_Visibility));
15545   end Initialize_783;
15546
15547   --------------------
15548   -- Initialize_784 --
15549   --------------------
15550
15551   procedure Initialize_784 is
15552   begin
15553      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
15554       (Base + 784,
15555        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
15556      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15557       (Base + 784,
15558        AMF.Internals.Tables.UML_String_Data_09.MS_09A8'Access);
15559      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 784, (False, AMF.CMOF.Public_Visibility));
15560   end Initialize_784;
15561
15562   --------------------
15563   -- Initialize_785 --
15564   --------------------
15565
15566   procedure Initialize_785 is
15567   begin
15568      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 785, True);
15569      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 785, (False, 0));
15570      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15571       (Base + 785,
15572        AMF.Internals.Tables.UML_String_Data_03.MS_03C3'Access);
15573      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 785, (False, AMF.CMOF.Public_Visibility));
15574   end Initialize_785;
15575
15576   --------------------
15577   -- Initialize_786 --
15578   --------------------
15579
15580   procedure Initialize_786 is
15581   begin
15582      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15583       (Base + 786,
15584        AMF.Internals.Tables.UML_String_Data_03.MS_03D6'Access);
15585      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 786, (False, AMF.CMOF.Public_Visibility));
15586   end Initialize_786;
15587
15588   --------------------
15589   -- Initialize_787 --
15590   --------------------
15591
15592   procedure Initialize_787 is
15593   begin
15594      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 787, True);
15595      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15596       (Base + 787,
15597        AMF.Internals.Tables.UML_String_Data_01.MS_014D'Access);
15598      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 787, (False, AMF.CMOF.Public_Visibility));
15599   end Initialize_787;
15600
15601   --------------------
15602   -- Initialize_788 --
15603   --------------------
15604
15605   procedure Initialize_788 is
15606   begin
15607      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 788, True);
15608      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15609       (Base + 788,
15610        AMF.Internals.Tables.UML_String_Data_0B.MS_0B04'Access);
15611      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 788, (False, AMF.CMOF.Public_Visibility));
15612   end Initialize_788;
15613
15614   --------------------
15615   -- Initialize_789 --
15616   --------------------
15617
15618   procedure Initialize_789 is
15619   begin
15620      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 789, True);
15621      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15622       (Base + 789,
15623        AMF.Internals.Tables.UML_String_Data_05.MS_05D0'Access);
15624      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 789, (False, AMF.CMOF.Public_Visibility));
15625   end Initialize_789;
15626
15627   --------------------
15628   -- Initialize_790 --
15629   --------------------
15630
15631   procedure Initialize_790 is
15632   begin
15633      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15634       (Base + 790,
15635        AMF.Internals.Tables.UML_String_Data_09.MS_0930'Access);
15636      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 790, (False, AMF.CMOF.Public_Visibility));
15637   end Initialize_790;
15638
15639   --------------------
15640   -- Initialize_791 --
15641   --------------------
15642
15643   procedure Initialize_791 is
15644   begin
15645      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 791, True);
15646      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15647       (Base + 791,
15648        AMF.Internals.Tables.UML_String_Data_05.MS_05D0'Access);
15649      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 791, (False, AMF.CMOF.Public_Visibility));
15650   end Initialize_791;
15651
15652   --------------------
15653   -- Initialize_792 --
15654   --------------------
15655
15656   procedure Initialize_792 is
15657   begin
15658      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15659       (Base + 792,
15660        AMF.Internals.Tables.UML_String_Data_09.MS_0930'Access);
15661      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 792, (False, AMF.CMOF.Public_Visibility));
15662   end Initialize_792;
15663
15664   --------------------
15665   -- Initialize_793 --
15666   --------------------
15667
15668   procedure Initialize_793 is
15669   begin
15670      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15671       (Base + 793,
15672        AMF.Internals.Tables.UML_String_Data_07.MS_076F'Access);
15673      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 793, (False, AMF.CMOF.Public_Visibility));
15674   end Initialize_793;
15675
15676   --------------------
15677   -- Initialize_794 --
15678   --------------------
15679
15680   procedure Initialize_794 is
15681   begin
15682      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15683       (Base + 794,
15684        AMF.Internals.Tables.UML_String_Data_0B.MS_0B77'Access);
15685      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 794, (False, AMF.CMOF.Public_Visibility));
15686   end Initialize_794;
15687
15688   --------------------
15689   -- Initialize_795 --
15690   --------------------
15691
15692   procedure Initialize_795 is
15693   begin
15694      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 795, True);
15695      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15696       (Base + 795,
15697        AMF.Internals.Tables.UML_String_Data_0C.MS_0C18'Access);
15698      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 795, (False, AMF.CMOF.Public_Visibility));
15699   end Initialize_795;
15700
15701   --------------------
15702   -- Initialize_796 --
15703   --------------------
15704
15705   procedure Initialize_796 is
15706   begin
15707      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 796, True);
15708      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15709       (Base + 796,
15710        AMF.Internals.Tables.UML_String_Data_0C.MS_0C18'Access);
15711      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 796, (False, AMF.CMOF.Public_Visibility));
15712   end Initialize_796;
15713
15714   --------------------
15715   -- Initialize_797 --
15716   --------------------
15717
15718   procedure Initialize_797 is
15719   begin
15720      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 797, True);
15721      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 797, (False, 0));
15722      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15723       (Base + 797,
15724        AMF.Internals.Tables.UML_String_Data_0C.MS_0C65'Access);
15725      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 797, (False, AMF.CMOF.Public_Visibility));
15726   end Initialize_797;
15727
15728   --------------------
15729   -- Initialize_798 --
15730   --------------------
15731
15732   procedure Initialize_798 is
15733   begin
15734      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 798, True);
15735      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 798, (False, 0));
15736      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15737       (Base + 798,
15738        AMF.Internals.Tables.UML_String_Data_02.MS_0271'Access);
15739      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 798, (False, AMF.CMOF.Public_Visibility));
15740   end Initialize_798;
15741
15742   --------------------
15743   -- Initialize_799 --
15744   --------------------
15745
15746   procedure Initialize_799 is
15747   begin
15748      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 799, True);
15749      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 799, (False, 0));
15750      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15751       (Base + 799,
15752        AMF.Internals.Tables.UML_String_Data_0A.MS_0A37'Access);
15753      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 799, (False, AMF.CMOF.Public_Visibility));
15754   end Initialize_799;
15755
15756   --------------------
15757   -- Initialize_800 --
15758   --------------------
15759
15760   procedure Initialize_800 is
15761   begin
15762      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
15763       (Base + 800,
15764        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
15765      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 800, True);
15766      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 800, True);
15767      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15768       (Base + 800,
15769        AMF.Internals.Tables.UML_String_Data_06.MS_060E'Access);
15770      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 800, (False, AMF.CMOF.Public_Visibility));
15771   end Initialize_800;
15772
15773   --------------------
15774   -- Initialize_801 --
15775   --------------------
15776
15777   procedure Initialize_801 is
15778   begin
15779      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
15780       (Base + 801,
15781        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
15782      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 801, True);
15783      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 801, True);
15784      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15785       (Base + 801,
15786        AMF.Internals.Tables.UML_String_Data_0B.MS_0BBC'Access);
15787      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 801, (False, AMF.CMOF.Public_Visibility));
15788   end Initialize_801;
15789
15790   --------------------
15791   -- Initialize_802 --
15792   --------------------
15793
15794   procedure Initialize_802 is
15795   begin
15796      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
15797       (Base + 802,
15798        AMF.Internals.Tables.UML_String_Data_01.MS_0102'Access);
15799      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 802, True);
15800      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 802, True);
15801      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15802       (Base + 802,
15803        AMF.Internals.Tables.UML_String_Data_08.MS_0850'Access);
15804      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 802, (False, AMF.CMOF.Public_Visibility));
15805   end Initialize_802;
15806
15807   --------------------
15808   -- Initialize_803 --
15809   --------------------
15810
15811   procedure Initialize_803 is
15812   begin
15813      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
15814       (Base + 803,
15815        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
15816      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 803, True);
15817      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 803, True);
15818      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15819       (Base + 803,
15820        AMF.Internals.Tables.UML_String_Data_07.MS_0767'Access);
15821      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 803, (False, AMF.CMOF.Public_Visibility));
15822   end Initialize_803;
15823
15824   --------------------
15825   -- Initialize_804 --
15826   --------------------
15827
15828   procedure Initialize_804 is
15829   begin
15830      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 804, (False, 0));
15831      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15832       (Base + 804,
15833        AMF.Internals.Tables.UML_String_Data_07.MS_07B2'Access);
15834      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 804, (False, AMF.CMOF.Public_Visibility));
15835   end Initialize_804;
15836
15837   --------------------
15838   -- Initialize_805 --
15839   --------------------
15840
15841   procedure Initialize_805 is
15842   begin
15843      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 805, True);
15844      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 805, True);
15845      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15846       (Base + 805,
15847        AMF.Internals.Tables.UML_String_Data_03.MS_036B'Access);
15848      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 805, (False, AMF.CMOF.Public_Visibility));
15849   end Initialize_805;
15850
15851   --------------------
15852   -- Initialize_806 --
15853   --------------------
15854
15855   procedure Initialize_806 is
15856   begin
15857      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 806, True);
15858      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 806, (False, 0));
15859      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15860       (Base + 806,
15861        AMF.Internals.Tables.UML_String_Data_06.MS_06E3'Access);
15862      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 806, (False, AMF.CMOF.Public_Visibility));
15863   end Initialize_806;
15864
15865   --------------------
15866   -- Initialize_807 --
15867   --------------------
15868
15869   procedure Initialize_807 is
15870   begin
15871      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 807, (False, 0));
15872      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15873       (Base + 807,
15874        AMF.Internals.Tables.UML_String_Data_04.MS_04E4'Access);
15875      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 807, (False, AMF.CMOF.Public_Visibility));
15876   end Initialize_807;
15877
15878   --------------------
15879   -- Initialize_808 --
15880   --------------------
15881
15882   procedure Initialize_808 is
15883   begin
15884      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15885       (Base + 808,
15886        AMF.Internals.Tables.UML_String_Data_02.MS_02BA'Access);
15887      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 808, (False, AMF.CMOF.Public_Visibility));
15888   end Initialize_808;
15889
15890   --------------------
15891   -- Initialize_809 --
15892   --------------------
15893
15894   procedure Initialize_809 is
15895   begin
15896      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 809, True);
15897      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15898       (Base + 809,
15899        AMF.Internals.Tables.UML_String_Data_05.MS_054E'Access);
15900      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 809, (False, AMF.CMOF.Public_Visibility));
15901   end Initialize_809;
15902
15903   --------------------
15904   -- Initialize_810 --
15905   --------------------
15906
15907   procedure Initialize_810 is
15908   begin
15909      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 810, True);
15910      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 810, True);
15911      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15912       (Base + 810,
15913        AMF.Internals.Tables.UML_String_Data_0B.MS_0BB8'Access);
15914      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 810, (False, AMF.CMOF.Public_Visibility));
15915   end Initialize_810;
15916
15917   --------------------
15918   -- Initialize_811 --
15919   --------------------
15920
15921   procedure Initialize_811 is
15922   begin
15923      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 811, (False, 0));
15924      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15925       (Base + 811,
15926        AMF.Internals.Tables.UML_String_Data_07.MS_0791'Access);
15927      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 811, (False, AMF.CMOF.Public_Visibility));
15928   end Initialize_811;
15929
15930   --------------------
15931   -- Initialize_812 --
15932   --------------------
15933
15934   procedure Initialize_812 is
15935   begin
15936      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
15937       (Base + 812,
15938        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
15939      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15940       (Base + 812,
15941        AMF.Internals.Tables.UML_String_Data_01.MS_0118'Access);
15942      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 812, (False, AMF.CMOF.Public_Visibility));
15943   end Initialize_812;
15944
15945   --------------------
15946   -- Initialize_813 --
15947   --------------------
15948
15949   procedure Initialize_813 is
15950   begin
15951      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 813, True);
15952      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15953       (Base + 813,
15954        AMF.Internals.Tables.UML_String_Data_0C.MS_0C18'Access);
15955      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 813, (False, AMF.CMOF.Public_Visibility));
15956   end Initialize_813;
15957
15958   --------------------
15959   -- Initialize_814 --
15960   --------------------
15961
15962   procedure Initialize_814 is
15963   begin
15964      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15965       (Base + 814,
15966        AMF.Internals.Tables.UML_String_Data_02.MS_0270'Access);
15967      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 814, (False, AMF.CMOF.Public_Visibility));
15968   end Initialize_814;
15969
15970   --------------------
15971   -- Initialize_815 --
15972   --------------------
15973
15974   procedure Initialize_815 is
15975   begin
15976      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 815, (False, 0));
15977      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15978       (Base + 815,
15979        AMF.Internals.Tables.UML_String_Data_09.MS_09A4'Access);
15980      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 815, (False, AMF.CMOF.Public_Visibility));
15981   end Initialize_815;
15982
15983   --------------------
15984   -- Initialize_816 --
15985   --------------------
15986
15987   procedure Initialize_816 is
15988   begin
15989      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
15990       (Base + 816,
15991        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
15992      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
15993       (Base + 816,
15994        AMF.Internals.Tables.UML_String_Data_03.MS_0315'Access);
15995      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 816, (False, AMF.CMOF.Public_Visibility));
15996   end Initialize_816;
15997
15998   --------------------
15999   -- Initialize_817 --
16000   --------------------
16001
16002   procedure Initialize_817 is
16003   begin
16004      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16005       (Base + 817,
16006        AMF.Internals.Tables.UML_String_Data_01.MS_01F0'Access);
16007      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 817, (False, AMF.CMOF.Public_Visibility));
16008   end Initialize_817;
16009
16010   --------------------
16011   -- Initialize_818 --
16012   --------------------
16013
16014   procedure Initialize_818 is
16015   begin
16016      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16017       (Base + 818,
16018        AMF.Internals.Tables.UML_String_Data_09.MS_0924'Access);
16019      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 818, (False, AMF.CMOF.Public_Visibility));
16020   end Initialize_818;
16021
16022   --------------------
16023   -- Initialize_819 --
16024   --------------------
16025
16026   procedure Initialize_819 is
16027   begin
16028      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16029       (Base + 819,
16030        AMF.Internals.Tables.UML_String_Data_09.MS_0927'Access);
16031      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 819, (False, AMF.CMOF.Public_Visibility));
16032   end Initialize_819;
16033
16034   --------------------
16035   -- Initialize_820 --
16036   --------------------
16037
16038   procedure Initialize_820 is
16039   begin
16040      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16041       (Base + 820,
16042        AMF.Internals.Tables.UML_String_Data_09.MS_09F2'Access);
16043      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 820, (False, AMF.CMOF.Public_Visibility));
16044   end Initialize_820;
16045
16046   --------------------
16047   -- Initialize_821 --
16048   --------------------
16049
16050   procedure Initialize_821 is
16051   begin
16052      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 821, (False, 0));
16053      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16054       (Base + 821,
16055        AMF.Internals.Tables.UML_String_Data_00.MS_00FB'Access);
16056      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 821, (False, AMF.CMOF.Public_Visibility));
16057   end Initialize_821;
16058
16059   --------------------
16060   -- Initialize_822 --
16061   --------------------
16062
16063   procedure Initialize_822 is
16064   begin
16065      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 822, True);
16066      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 822, (False, 0));
16067      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16068       (Base + 822,
16069        AMF.Internals.Tables.UML_String_Data_07.MS_0782'Access);
16070      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 822, (False, AMF.CMOF.Public_Visibility));
16071   end Initialize_822;
16072
16073   --------------------
16074   -- Initialize_823 --
16075   --------------------
16076
16077   procedure Initialize_823 is
16078   begin
16079      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 823, True);
16080      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 823, (False, 0));
16081      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16082       (Base + 823,
16083        AMF.Internals.Tables.UML_String_Data_05.MS_05D6'Access);
16084      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 823, (False, AMF.CMOF.Public_Visibility));
16085   end Initialize_823;
16086
16087   --------------------
16088   -- Initialize_824 --
16089   --------------------
16090
16091   procedure Initialize_824 is
16092   begin
16093      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16094       (Base + 824,
16095        AMF.Internals.Tables.UML_String_Data_07.MS_070A'Access);
16096      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 824, (False, AMF.CMOF.Public_Visibility));
16097   end Initialize_824;
16098
16099   --------------------
16100   -- Initialize_825 --
16101   --------------------
16102
16103   procedure Initialize_825 is
16104   begin
16105      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16106       (Base + 825,
16107        AMF.Internals.Tables.UML_String_Data_09.MS_09F2'Access);
16108      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 825, (False, AMF.CMOF.Public_Visibility));
16109   end Initialize_825;
16110
16111   --------------------
16112   -- Initialize_826 --
16113   --------------------
16114
16115   procedure Initialize_826 is
16116   begin
16117      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16118       (Base + 826,
16119        AMF.Internals.Tables.UML_String_Data_05.MS_0578'Access);
16120      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 826, (False, AMF.CMOF.Public_Visibility));
16121   end Initialize_826;
16122
16123   --------------------
16124   -- Initialize_827 --
16125   --------------------
16126
16127   procedure Initialize_827 is
16128   begin
16129      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16130       (Base + 827,
16131        AMF.Internals.Tables.UML_String_Data_01.MS_01AC'Access);
16132      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 827, (False, AMF.CMOF.Public_Visibility));
16133   end Initialize_827;
16134
16135   --------------------
16136   -- Initialize_828 --
16137   --------------------
16138
16139   procedure Initialize_828 is
16140   begin
16141      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 828, True);
16142      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 828, (False, 0));
16143      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16144       (Base + 828,
16145        AMF.Internals.Tables.UML_String_Data_0A.MS_0AE3'Access);
16146      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 828, (False, AMF.CMOF.Public_Visibility));
16147   end Initialize_828;
16148
16149   --------------------
16150   -- Initialize_829 --
16151   --------------------
16152
16153   procedure Initialize_829 is
16154   begin
16155      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16156       (Base + 829,
16157        AMF.Internals.Tables.UML_String_Data_02.MS_0220'Access);
16158      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 829, (False, AMF.CMOF.Public_Visibility));
16159   end Initialize_829;
16160
16161   --------------------
16162   -- Initialize_830 --
16163   --------------------
16164
16165   procedure Initialize_830 is
16166   begin
16167      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16168       (Base + 830,
16169        AMF.Internals.Tables.UML_String_Data_09.MS_09CB'Access);
16170      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 830, (False, AMF.CMOF.Public_Visibility));
16171   end Initialize_830;
16172
16173   --------------------
16174   -- Initialize_831 --
16175   --------------------
16176
16177   procedure Initialize_831 is
16178   begin
16179      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 831, True);
16180      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 831, (False, 0));
16181      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16182       (Base + 831,
16183        AMF.Internals.Tables.UML_String_Data_08.MS_086C'Access);
16184      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 831, (False, AMF.CMOF.Public_Visibility));
16185   end Initialize_831;
16186
16187   --------------------
16188   -- Initialize_832 --
16189   --------------------
16190
16191   procedure Initialize_832 is
16192   begin
16193      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 832, True);
16194      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16195       (Base + 832,
16196        AMF.Internals.Tables.UML_String_Data_07.MS_078D'Access);
16197      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 832, (False, AMF.CMOF.Public_Visibility));
16198   end Initialize_832;
16199
16200   --------------------
16201   -- Initialize_833 --
16202   --------------------
16203
16204   procedure Initialize_833 is
16205   begin
16206      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 833, True);
16207      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16208       (Base + 833,
16209        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
16210      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 833, (False, AMF.CMOF.Public_Visibility));
16211   end Initialize_833;
16212
16213   --------------------
16214   -- Initialize_834 --
16215   --------------------
16216
16217   procedure Initialize_834 is
16218   begin
16219      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 834, True);
16220      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16221       (Base + 834,
16222        AMF.Internals.Tables.UML_String_Data_04.MS_0437'Access);
16223      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 834, (False, AMF.CMOF.Public_Visibility));
16224   end Initialize_834;
16225
16226   --------------------
16227   -- Initialize_835 --
16228   --------------------
16229
16230   procedure Initialize_835 is
16231   begin
16232      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
16233       (Base + 835,
16234        AMF.Internals.Tables.UML_String_Data_01.MS_0102'Access);
16235      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 835, (False, 0));
16236      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16237       (Base + 835,
16238        AMF.Internals.Tables.UML_String_Data_0A.MS_0A41'Access);
16239      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 835, (False, AMF.CMOF.Public_Visibility));
16240   end Initialize_835;
16241
16242   --------------------
16243   -- Initialize_836 --
16244   --------------------
16245
16246   procedure Initialize_836 is
16247   begin
16248      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 836, True);
16249      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16250       (Base + 836,
16251        AMF.Internals.Tables.UML_String_Data_02.MS_026B'Access);
16252      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 836, (False, AMF.CMOF.Public_Visibility));
16253   end Initialize_836;
16254
16255   --------------------
16256   -- Initialize_837 --
16257   --------------------
16258
16259   procedure Initialize_837 is
16260   begin
16261      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
16262       (Base + 837,
16263        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
16264      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16265       (Base + 837,
16266        AMF.Internals.Tables.UML_String_Data_00.MS_00C5'Access);
16267      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 837, (False, AMF.CMOF.Public_Visibility));
16268   end Initialize_837;
16269
16270   --------------------
16271   -- Initialize_838 --
16272   --------------------
16273
16274   procedure Initialize_838 is
16275   begin
16276      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 838, True);
16277      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16278       (Base + 838,
16279        AMF.Internals.Tables.UML_String_Data_04.MS_041F'Access);
16280      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 838, (False, AMF.CMOF.Public_Visibility));
16281   end Initialize_838;
16282
16283   --------------------
16284   -- Initialize_839 --
16285   --------------------
16286
16287   procedure Initialize_839 is
16288   begin
16289      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 839, True);
16290      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 839, (False, 0));
16291      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16292       (Base + 839,
16293        AMF.Internals.Tables.UML_String_Data_03.MS_0379'Access);
16294      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 839, (False, AMF.CMOF.Public_Visibility));
16295   end Initialize_839;
16296
16297   --------------------
16298   -- Initialize_840 --
16299   --------------------
16300
16301   procedure Initialize_840 is
16302   begin
16303      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16304       (Base + 840,
16305        AMF.Internals.Tables.UML_String_Data_0C.MS_0C0C'Access);
16306      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 840, (False, AMF.CMOF.Public_Visibility));
16307   end Initialize_840;
16308
16309   --------------------
16310   -- Initialize_841 --
16311   --------------------
16312
16313   procedure Initialize_841 is
16314   begin
16315      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16316       (Base + 841,
16317        AMF.Internals.Tables.UML_String_Data_0B.MS_0B40'Access);
16318      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 841, (False, AMF.CMOF.Public_Visibility));
16319   end Initialize_841;
16320
16321   --------------------
16322   -- Initialize_842 --
16323   --------------------
16324
16325   procedure Initialize_842 is
16326   begin
16327      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16328       (Base + 842,
16329        AMF.Internals.Tables.UML_String_Data_08.MS_08D0'Access);
16330      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 842, (False, AMF.CMOF.Public_Visibility));
16331   end Initialize_842;
16332
16333   --------------------
16334   -- Initialize_843 --
16335   --------------------
16336
16337   procedure Initialize_843 is
16338   begin
16339      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
16340       (Base + 843,
16341        AMF.Internals.Tables.UML_String_Data_08.MS_0824'Access);
16342      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16343       (Base + 843,
16344        AMF.Internals.Tables.UML_String_Data_0A.MS_0A41'Access);
16345      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 843, (False, AMF.CMOF.Public_Visibility));
16346   end Initialize_843;
16347
16348   --------------------
16349   -- Initialize_844 --
16350   --------------------
16351
16352   procedure Initialize_844 is
16353   begin
16354      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16355       (Base + 844,
16356        AMF.Internals.Tables.UML_String_Data_0B.MS_0BAD'Access);
16357      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 844, (False, AMF.CMOF.Public_Visibility));
16358   end Initialize_844;
16359
16360   --------------------
16361   -- Initialize_845 --
16362   --------------------
16363
16364   procedure Initialize_845 is
16365   begin
16366      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 845, True);
16367      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 845, (False, 0));
16368      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16369       (Base + 845,
16370        AMF.Internals.Tables.UML_String_Data_00.MS_004F'Access);
16371      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 845, (False, AMF.CMOF.Public_Visibility));
16372   end Initialize_845;
16373
16374   --------------------
16375   -- Initialize_846 --
16376   --------------------
16377
16378   procedure Initialize_846 is
16379   begin
16380      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 846, True);
16381      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 846, (False, 0));
16382      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16383       (Base + 846,
16384        AMF.Internals.Tables.UML_String_Data_05.MS_052C'Access);
16385      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 846, (False, AMF.CMOF.Public_Visibility));
16386   end Initialize_846;
16387
16388   --------------------
16389   -- Initialize_847 --
16390   --------------------
16391
16392   procedure Initialize_847 is
16393   begin
16394      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Default
16395       (Base + 847,
16396        AMF.Internals.Tables.UML_String_Data_0C.MS_0C79'Access);
16397      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16398       (Base + 847,
16399        AMF.Internals.Tables.UML_String_Data_01.MS_01C4'Access);
16400      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 847, (False, AMF.CMOF.Public_Visibility));
16401   end Initialize_847;
16402
16403   --------------------
16404   -- Initialize_848 --
16405   --------------------
16406
16407   procedure Initialize_848 is
16408   begin
16409      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 848, (False, 0));
16410      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16411       (Base + 848,
16412        AMF.Internals.Tables.UML_String_Data_02.MS_022A'Access);
16413      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 848, (False, AMF.CMOF.Public_Visibility));
16414   end Initialize_848;
16415
16416   --------------------
16417   -- Initialize_849 --
16418   --------------------
16419
16420   procedure Initialize_849 is
16421   begin
16422      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 849, True);
16423      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Read_Only (Base + 849, True);
16424      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16425       (Base + 849,
16426        AMF.Internals.Tables.UML_String_Data_03.MS_036B'Access);
16427      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 849, (False, AMF.CMOF.Public_Visibility));
16428   end Initialize_849;
16429
16430   --------------------
16431   -- Initialize_850 --
16432   --------------------
16433
16434   procedure Initialize_850 is
16435   begin
16436      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16437       (Base + 850,
16438        AMF.Internals.Tables.UML_String_Data_02.MS_028D'Access);
16439      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 850, (False, AMF.CMOF.Public_Visibility));
16440   end Initialize_850;
16441
16442   --------------------
16443   -- Initialize_851 --
16444   --------------------
16445
16446   procedure Initialize_851 is
16447   begin
16448      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16449       (Base + 851,
16450        AMF.Internals.Tables.UML_String_Data_05.MS_05D0'Access);
16451      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 851, (False, AMF.CMOF.Public_Visibility));
16452   end Initialize_851;
16453
16454   --------------------
16455   -- Initialize_852 --
16456   --------------------
16457
16458   procedure Initialize_852 is
16459   begin
16460      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16461       (Base + 852,
16462        AMF.Internals.Tables.UML_String_Data_08.MS_08D0'Access);
16463      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 852, (False, AMF.CMOF.Public_Visibility));
16464   end Initialize_852;
16465
16466   --------------------
16467   -- Initialize_853 --
16468   --------------------
16469
16470   procedure Initialize_853 is
16471   begin
16472      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 853, (False, 0));
16473      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16474       (Base + 853,
16475        AMF.Internals.Tables.UML_String_Data_03.MS_03C0'Access);
16476      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 853, (False, AMF.CMOF.Public_Visibility));
16477   end Initialize_853;
16478
16479   --------------------
16480   -- Initialize_854 --
16481   --------------------
16482
16483   procedure Initialize_854 is
16484   begin
16485      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 854, (False, 0));
16486      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16487       (Base + 854,
16488        AMF.Internals.Tables.UML_String_Data_0B.MS_0BB4'Access);
16489      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 854, (False, AMF.CMOF.Public_Visibility));
16490   end Initialize_854;
16491
16492   --------------------
16493   -- Initialize_855 --
16494   --------------------
16495
16496   procedure Initialize_855 is
16497   begin
16498      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 855, True);
16499      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16500       (Base + 855,
16501        AMF.Internals.Tables.UML_String_Data_0C.MS_0C18'Access);
16502      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 855, (False, AMF.CMOF.Public_Visibility));
16503   end Initialize_855;
16504
16505   --------------------
16506   -- Initialize_856 --
16507   --------------------
16508
16509   procedure Initialize_856 is
16510   begin
16511      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16512       (Base + 856,
16513        AMF.Internals.Tables.UML_String_Data_02.MS_02A5'Access);
16514      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 856, (False, AMF.CMOF.Public_Visibility));
16515   end Initialize_856;
16516
16517   --------------------
16518   -- Initialize_857 --
16519   --------------------
16520
16521   procedure Initialize_857 is
16522   begin
16523      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 857, True);
16524      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16525       (Base + 857,
16526        AMF.Internals.Tables.UML_String_Data_04.MS_0406'Access);
16527      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 857, (False, AMF.CMOF.Public_Visibility));
16528   end Initialize_857;
16529
16530   --------------------
16531   -- Initialize_858 --
16532   --------------------
16533
16534   procedure Initialize_858 is
16535   begin
16536      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 858, True);
16537      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16538       (Base + 858,
16539        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
16540      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 858, (False, AMF.CMOF.Public_Visibility));
16541   end Initialize_858;
16542
16543   --------------------
16544   -- Initialize_859 --
16545   --------------------
16546
16547   procedure Initialize_859 is
16548   begin
16549      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 859, True);
16550      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16551       (Base + 859,
16552        AMF.Internals.Tables.UML_String_Data_04.MS_0406'Access);
16553      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 859, (False, AMF.CMOF.Public_Visibility));
16554   end Initialize_859;
16555
16556   --------------------
16557   -- Initialize_860 --
16558   --------------------
16559
16560   procedure Initialize_860 is
16561   begin
16562      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 860, (False, 0));
16563      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16564       (Base + 860,
16565        AMF.Internals.Tables.UML_String_Data_09.MS_0901'Access);
16566      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 860, (False, AMF.CMOF.Public_Visibility));
16567   end Initialize_860;
16568
16569   --------------------
16570   -- Initialize_861 --
16571   --------------------
16572
16573   procedure Initialize_861 is
16574   begin
16575      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 861, (False, 0));
16576      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16577       (Base + 861,
16578        AMF.Internals.Tables.UML_String_Data_00.MS_0006'Access);
16579      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 861, (False, AMF.CMOF.Public_Visibility));
16580   end Initialize_861;
16581
16582   --------------------
16583   -- Initialize_862 --
16584   --------------------
16585
16586   procedure Initialize_862 is
16587   begin
16588      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16589       (Base + 862,
16590        AMF.Internals.Tables.UML_String_Data_00.MS_0067'Access);
16591      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 862, (False, AMF.CMOF.Public_Visibility));
16592   end Initialize_862;
16593
16594   --------------------
16595   -- Initialize_863 --
16596   --------------------
16597
16598   procedure Initialize_863 is
16599   begin
16600      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 863, (False, 0));
16601      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16602       (Base + 863,
16603        AMF.Internals.Tables.UML_String_Data_0B.MS_0BAD'Access);
16604      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 863, (False, AMF.CMOF.Public_Visibility));
16605   end Initialize_863;
16606
16607   --------------------
16608   -- Initialize_864 --
16609   --------------------
16610
16611   procedure Initialize_864 is
16612   begin
16613      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 864, True);
16614      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 864, (False, 0));
16615      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16616       (Base + 864,
16617        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
16618      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 864, (False, AMF.CMOF.Public_Visibility));
16619   end Initialize_864;
16620
16621   --------------------
16622   -- Initialize_865 --
16623   --------------------
16624
16625   procedure Initialize_865 is
16626   begin
16627      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 865, True);
16628      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 865, (False, 0));
16629      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16630       (Base + 865,
16631        AMF.Internals.Tables.UML_String_Data_04.MS_0406'Access);
16632      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 865, (False, AMF.CMOF.Public_Visibility));
16633   end Initialize_865;
16634
16635   --------------------
16636   -- Initialize_866 --
16637   --------------------
16638
16639   procedure Initialize_866 is
16640   begin
16641      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Composite (Base + 866, True);
16642      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 866, (False, 0));
16643      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16644       (Base + 866,
16645        AMF.Internals.Tables.UML_String_Data_04.MS_0406'Access);
16646      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 866, (False, AMF.CMOF.Public_Visibility));
16647   end Initialize_866;
16648
16649   --------------------
16650   -- Initialize_867 --
16651   --------------------
16652
16653   procedure Initialize_867 is
16654   begin
16655      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16656       (Base + 867,
16657        AMF.Internals.Tables.UML_String_Data_0A.MS_0A11'Access);
16658      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 867, (Is_Empty => True));
16659   end Initialize_867;
16660
16661   --------------------
16662   -- Initialize_868 --
16663   --------------------
16664
16665   procedure Initialize_868 is
16666   begin
16667      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16668       (Base + 868,
16669        AMF.Internals.Tables.UML_String_Data_09.MS_096F'Access);
16670      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 868, (Is_Empty => True));
16671   end Initialize_868;
16672
16673   --------------------
16674   -- Initialize_869 --
16675   --------------------
16676
16677   procedure Initialize_869 is
16678   begin
16679      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16680       (Base + 869,
16681        AMF.Internals.Tables.UML_String_Data_00.MS_0080'Access);
16682      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 869, (Is_Empty => True));
16683   end Initialize_869;
16684
16685   --------------------
16686   -- Initialize_870 --
16687   --------------------
16688
16689   procedure Initialize_870 is
16690   begin
16691      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16692       (Base + 870,
16693        AMF.Internals.Tables.UML_String_Data_06.MS_0654'Access);
16694      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 870, (Is_Empty => True));
16695   end Initialize_870;
16696
16697   --------------------
16698   -- Initialize_871 --
16699   --------------------
16700
16701   procedure Initialize_871 is
16702   begin
16703      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16704       (Base + 871,
16705        AMF.Internals.Tables.UML_String_Data_09.MS_097E'Access);
16706      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 871, (Is_Empty => True));
16707   end Initialize_871;
16708
16709   --------------------
16710   -- Initialize_872 --
16711   --------------------
16712
16713   procedure Initialize_872 is
16714   begin
16715      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16716       (Base + 872,
16717        AMF.Internals.Tables.UML_String_Data_09.MS_097F'Access);
16718      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 872, (Is_Empty => True));
16719   end Initialize_872;
16720
16721   --------------------
16722   -- Initialize_873 --
16723   --------------------
16724
16725   procedure Initialize_873 is
16726   begin
16727      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16728       (Base + 873,
16729        AMF.Internals.Tables.UML_String_Data_05.MS_0539'Access);
16730      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 873, (Is_Empty => True));
16731   end Initialize_873;
16732
16733   --------------------
16734   -- Initialize_874 --
16735   --------------------
16736
16737   procedure Initialize_874 is
16738   begin
16739      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16740       (Base + 874,
16741        AMF.Internals.Tables.UML_String_Data_06.MS_06A9'Access);
16742      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 874, (Is_Empty => True));
16743   end Initialize_874;
16744
16745   --------------------
16746   -- Initialize_875 --
16747   --------------------
16748
16749   procedure Initialize_875 is
16750   begin
16751      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16752       (Base + 875,
16753        AMF.Internals.Tables.UML_String_Data_0B.MS_0B13'Access);
16754      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 875, (Is_Empty => True));
16755   end Initialize_875;
16756
16757   --------------------
16758   -- Initialize_876 --
16759   --------------------
16760
16761   procedure Initialize_876 is
16762   begin
16763      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16764       (Base + 876,
16765        AMF.Internals.Tables.UML_String_Data_06.MS_06F3'Access);
16766      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 876, (Is_Empty => True));
16767   end Initialize_876;
16768
16769   --------------------
16770   -- Initialize_877 --
16771   --------------------
16772
16773   procedure Initialize_877 is
16774   begin
16775      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16776       (Base + 877,
16777        AMF.Internals.Tables.UML_String_Data_0A.MS_0AC8'Access);
16778      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 877, (Is_Empty => True));
16779   end Initialize_877;
16780
16781   --------------------
16782   -- Initialize_878 --
16783   --------------------
16784
16785   procedure Initialize_878 is
16786   begin
16787      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16788       (Base + 878,
16789        AMF.Internals.Tables.UML_String_Data_03.MS_0341'Access);
16790      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 878, (Is_Empty => True));
16791   end Initialize_878;
16792
16793   --------------------
16794   -- Initialize_879 --
16795   --------------------
16796
16797   procedure Initialize_879 is
16798   begin
16799      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16800       (Base + 879,
16801        AMF.Internals.Tables.UML_String_Data_0B.MS_0B74'Access);
16802      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 879, (Is_Empty => True));
16803   end Initialize_879;
16804
16805   --------------------
16806   -- Initialize_880 --
16807   --------------------
16808
16809   procedure Initialize_880 is
16810   begin
16811      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16812       (Base + 880,
16813        AMF.Internals.Tables.UML_String_Data_02.MS_02E3'Access);
16814      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 880, (Is_Empty => True));
16815   end Initialize_880;
16816
16817   --------------------
16818   -- Initialize_881 --
16819   --------------------
16820
16821   procedure Initialize_881 is
16822   begin
16823      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16824       (Base + 881,
16825        AMF.Internals.Tables.UML_String_Data_00.MS_004D'Access);
16826      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 881, (Is_Empty => True));
16827   end Initialize_881;
16828
16829   --------------------
16830   -- Initialize_882 --
16831   --------------------
16832
16833   procedure Initialize_882 is
16834   begin
16835      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16836       (Base + 882,
16837        AMF.Internals.Tables.UML_String_Data_05.MS_0568'Access);
16838      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 882, (Is_Empty => True));
16839   end Initialize_882;
16840
16841   --------------------
16842   -- Initialize_883 --
16843   --------------------
16844
16845   procedure Initialize_883 is
16846   begin
16847      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16848       (Base + 883,
16849        AMF.Internals.Tables.UML_String_Data_01.MS_0149'Access);
16850      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 883, (Is_Empty => True));
16851   end Initialize_883;
16852
16853   --------------------
16854   -- Initialize_884 --
16855   --------------------
16856
16857   procedure Initialize_884 is
16858   begin
16859      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16860       (Base + 884,
16861        AMF.Internals.Tables.UML_String_Data_09.MS_09D3'Access);
16862      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 884, (Is_Empty => True));
16863   end Initialize_884;
16864
16865   --------------------
16866   -- Initialize_885 --
16867   --------------------
16868
16869   procedure Initialize_885 is
16870   begin
16871      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16872       (Base + 885,
16873        AMF.Internals.Tables.UML_String_Data_04.MS_04A8'Access);
16874      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 885, (Is_Empty => True));
16875   end Initialize_885;
16876
16877   --------------------
16878   -- Initialize_886 --
16879   --------------------
16880
16881   procedure Initialize_886 is
16882   begin
16883      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16884       (Base + 886,
16885        AMF.Internals.Tables.UML_String_Data_07.MS_0747'Access);
16886      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 886, (Is_Empty => True));
16887   end Initialize_886;
16888
16889   --------------------
16890   -- Initialize_887 --
16891   --------------------
16892
16893   procedure Initialize_887 is
16894   begin
16895      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 887, True);
16896      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16897       (Base + 887,
16898        AMF.Internals.Tables.UML_String_Data_01.MS_013B'Access);
16899      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 887, (Is_Empty => True));
16900   end Initialize_887;
16901
16902   --------------------
16903   -- Initialize_888 --
16904   --------------------
16905
16906   procedure Initialize_888 is
16907   begin
16908      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16909       (Base + 888,
16910        AMF.Internals.Tables.UML_String_Data_03.MS_03C1'Access);
16911      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 888, (Is_Empty => True));
16912   end Initialize_888;
16913
16914   --------------------
16915   -- Initialize_889 --
16916   --------------------
16917
16918   procedure Initialize_889 is
16919   begin
16920      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16921       (Base + 889,
16922        AMF.Internals.Tables.UML_String_Data_0B.MS_0B49'Access);
16923      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 889, (Is_Empty => True));
16924   end Initialize_889;
16925
16926   --------------------
16927   -- Initialize_890 --
16928   --------------------
16929
16930   procedure Initialize_890 is
16931   begin
16932      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16933       (Base + 890,
16934        AMF.Internals.Tables.UML_String_Data_03.MS_036E'Access);
16935      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 890, (Is_Empty => True));
16936   end Initialize_890;
16937
16938   --------------------
16939   -- Initialize_891 --
16940   --------------------
16941
16942   procedure Initialize_891 is
16943   begin
16944      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16945       (Base + 891,
16946        AMF.Internals.Tables.UML_String_Data_06.MS_0649'Access);
16947      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 891, (Is_Empty => True));
16948   end Initialize_891;
16949
16950   --------------------
16951   -- Initialize_892 --
16952   --------------------
16953
16954   procedure Initialize_892 is
16955   begin
16956      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16957       (Base + 892,
16958        AMF.Internals.Tables.UML_String_Data_0B.MS_0B55'Access);
16959      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 892, (Is_Empty => True));
16960   end Initialize_892;
16961
16962   --------------------
16963   -- Initialize_893 --
16964   --------------------
16965
16966   procedure Initialize_893 is
16967   begin
16968      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16969       (Base + 893,
16970        AMF.Internals.Tables.UML_String_Data_09.MS_0961'Access);
16971      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 893, (Is_Empty => True));
16972   end Initialize_893;
16973
16974   --------------------
16975   -- Initialize_894 --
16976   --------------------
16977
16978   procedure Initialize_894 is
16979   begin
16980      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16981       (Base + 894,
16982        AMF.Internals.Tables.UML_String_Data_03.MS_03DD'Access);
16983      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 894, (Is_Empty => True));
16984   end Initialize_894;
16985
16986   --------------------
16987   -- Initialize_895 --
16988   --------------------
16989
16990   procedure Initialize_895 is
16991   begin
16992      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
16993       (Base + 895,
16994        AMF.Internals.Tables.UML_String_Data_08.MS_08B3'Access);
16995      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 895, (Is_Empty => True));
16996   end Initialize_895;
16997
16998   --------------------
16999   -- Initialize_896 --
17000   --------------------
17001
17002   procedure Initialize_896 is
17003   begin
17004      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17005       (Base + 896,
17006        AMF.Internals.Tables.UML_String_Data_07.MS_07EF'Access);
17007      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 896, (Is_Empty => True));
17008   end Initialize_896;
17009
17010   --------------------
17011   -- Initialize_897 --
17012   --------------------
17013
17014   procedure Initialize_897 is
17015   begin
17016      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17017       (Base + 897,
17018        AMF.Internals.Tables.UML_String_Data_03.MS_035A'Access);
17019      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 897, (Is_Empty => True));
17020   end Initialize_897;
17021
17022   --------------------
17023   -- Initialize_898 --
17024   --------------------
17025
17026   procedure Initialize_898 is
17027   begin
17028      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17029       (Base + 898,
17030        AMF.Internals.Tables.UML_String_Data_02.MS_02BD'Access);
17031      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 898, (Is_Empty => True));
17032   end Initialize_898;
17033
17034   --------------------
17035   -- Initialize_899 --
17036   --------------------
17037
17038   procedure Initialize_899 is
17039   begin
17040      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17041       (Base + 899,
17042        AMF.Internals.Tables.UML_String_Data_03.MS_03ED'Access);
17043      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 899, (Is_Empty => True));
17044   end Initialize_899;
17045
17046   --------------------
17047   -- Initialize_900 --
17048   --------------------
17049
17050   procedure Initialize_900 is
17051   begin
17052      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17053       (Base + 900,
17054        AMF.Internals.Tables.UML_String_Data_0A.MS_0AC0'Access);
17055      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 900, (Is_Empty => True));
17056   end Initialize_900;
17057
17058   --------------------
17059   -- Initialize_901 --
17060   --------------------
17061
17062   procedure Initialize_901 is
17063   begin
17064      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 901, True);
17065      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17066       (Base + 901,
17067        AMF.Internals.Tables.UML_String_Data_02.MS_021B'Access);
17068      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 901, (Is_Empty => True));
17069   end Initialize_901;
17070
17071   --------------------
17072   -- Initialize_902 --
17073   --------------------
17074
17075   procedure Initialize_902 is
17076   begin
17077      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17078       (Base + 902,
17079        AMF.Internals.Tables.UML_String_Data_04.MS_04B8'Access);
17080      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 902, (Is_Empty => True));
17081   end Initialize_902;
17082
17083   --------------------
17084   -- Initialize_903 --
17085   --------------------
17086
17087   procedure Initialize_903 is
17088   begin
17089      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17090       (Base + 903,
17091        AMF.Internals.Tables.UML_String_Data_0A.MS_0A70'Access);
17092      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 903, (Is_Empty => True));
17093   end Initialize_903;
17094
17095   --------------------
17096   -- Initialize_904 --
17097   --------------------
17098
17099   procedure Initialize_904 is
17100   begin
17101      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17102       (Base + 904,
17103        AMF.Internals.Tables.UML_String_Data_09.MS_09CF'Access);
17104      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 904, (Is_Empty => True));
17105   end Initialize_904;
17106
17107   --------------------
17108   -- Initialize_905 --
17109   --------------------
17110
17111   procedure Initialize_905 is
17112   begin
17113      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17114       (Base + 905,
17115        AMF.Internals.Tables.UML_String_Data_02.MS_02A0'Access);
17116      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 905, (Is_Empty => True));
17117   end Initialize_905;
17118
17119   --------------------
17120   -- Initialize_906 --
17121   --------------------
17122
17123   procedure Initialize_906 is
17124   begin
17125      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17126       (Base + 906,
17127        AMF.Internals.Tables.UML_String_Data_0B.MS_0BC1'Access);
17128      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 906, (Is_Empty => True));
17129   end Initialize_906;
17130
17131   --------------------
17132   -- Initialize_907 --
17133   --------------------
17134
17135   procedure Initialize_907 is
17136   begin
17137      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17138       (Base + 907,
17139        AMF.Internals.Tables.UML_String_Data_04.MS_0418'Access);
17140      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 907, (Is_Empty => True));
17141   end Initialize_907;
17142
17143   --------------------
17144   -- Initialize_908 --
17145   --------------------
17146
17147   procedure Initialize_908 is
17148   begin
17149      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17150       (Base + 908,
17151        AMF.Internals.Tables.UML_String_Data_07.MS_0727'Access);
17152      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 908, (Is_Empty => True));
17153   end Initialize_908;
17154
17155   --------------------
17156   -- Initialize_909 --
17157   --------------------
17158
17159   procedure Initialize_909 is
17160   begin
17161      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17162       (Base + 909,
17163        AMF.Internals.Tables.UML_String_Data_06.MS_06DE'Access);
17164      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 909, (Is_Empty => True));
17165   end Initialize_909;
17166
17167   --------------------
17168   -- Initialize_910 --
17169   --------------------
17170
17171   procedure Initialize_910 is
17172   begin
17173      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17174       (Base + 910,
17175        AMF.Internals.Tables.UML_String_Data_04.MS_046D'Access);
17176      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 910, (Is_Empty => True));
17177   end Initialize_910;
17178
17179   --------------------
17180   -- Initialize_911 --
17181   --------------------
17182
17183   procedure Initialize_911 is
17184   begin
17185      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17186       (Base + 911,
17187        AMF.Internals.Tables.UML_String_Data_0A.MS_0AFB'Access);
17188      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 911, (Is_Empty => True));
17189   end Initialize_911;
17190
17191   --------------------
17192   -- Initialize_912 --
17193   --------------------
17194
17195   procedure Initialize_912 is
17196   begin
17197      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17198       (Base + 912,
17199        AMF.Internals.Tables.UML_String_Data_06.MS_06EC'Access);
17200      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 912, (Is_Empty => True));
17201   end Initialize_912;
17202
17203   --------------------
17204   -- Initialize_913 --
17205   --------------------
17206
17207   procedure Initialize_913 is
17208   begin
17209      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17210       (Base + 913,
17211        AMF.Internals.Tables.UML_String_Data_07.MS_07D1'Access);
17212      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 913, (Is_Empty => True));
17213   end Initialize_913;
17214
17215   --------------------
17216   -- Initialize_914 --
17217   --------------------
17218
17219   procedure Initialize_914 is
17220   begin
17221      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17222       (Base + 914,
17223        AMF.Internals.Tables.UML_String_Data_03.MS_03A7'Access);
17224      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 914, (Is_Empty => True));
17225   end Initialize_914;
17226
17227   --------------------
17228   -- Initialize_915 --
17229   --------------------
17230
17231   procedure Initialize_915 is
17232   begin
17233      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17234       (Base + 915,
17235        AMF.Internals.Tables.UML_String_Data_0A.MS_0A34'Access);
17236      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 915, (Is_Empty => True));
17237   end Initialize_915;
17238
17239   --------------------
17240   -- Initialize_916 --
17241   --------------------
17242
17243   procedure Initialize_916 is
17244   begin
17245      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17246       (Base + 916,
17247        AMF.Internals.Tables.UML_String_Data_01.MS_01ED'Access);
17248      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 916, (Is_Empty => True));
17249   end Initialize_916;
17250
17251   --------------------
17252   -- Initialize_917 --
17253   --------------------
17254
17255   procedure Initialize_917 is
17256   begin
17257      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17258       (Base + 917,
17259        AMF.Internals.Tables.UML_String_Data_01.MS_0134'Access);
17260      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 917, (Is_Empty => True));
17261   end Initialize_917;
17262
17263   --------------------
17264   -- Initialize_918 --
17265   --------------------
17266
17267   procedure Initialize_918 is
17268   begin
17269      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17270       (Base + 918,
17271        AMF.Internals.Tables.UML_String_Data_08.MS_0855'Access);
17272      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 918, (Is_Empty => True));
17273   end Initialize_918;
17274
17275   --------------------
17276   -- Initialize_919 --
17277   --------------------
17278
17279   procedure Initialize_919 is
17280   begin
17281      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17282       (Base + 919,
17283        AMF.Internals.Tables.UML_String_Data_00.MS_004B'Access);
17284      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 919, (Is_Empty => True));
17285   end Initialize_919;
17286
17287   --------------------
17288   -- Initialize_920 --
17289   --------------------
17290
17291   procedure Initialize_920 is
17292   begin
17293      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17294       (Base + 920,
17295        AMF.Internals.Tables.UML_String_Data_02.MS_0218'Access);
17296      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 920, (Is_Empty => True));
17297   end Initialize_920;
17298
17299   --------------------
17300   -- Initialize_921 --
17301   --------------------
17302
17303   procedure Initialize_921 is
17304   begin
17305      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17306       (Base + 921,
17307        AMF.Internals.Tables.UML_String_Data_0B.MS_0B3B'Access);
17308      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 921, (Is_Empty => True));
17309   end Initialize_921;
17310
17311   --------------------
17312   -- Initialize_922 --
17313   --------------------
17314
17315   procedure Initialize_922 is
17316   begin
17317      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 922, True);
17318      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17319       (Base + 922,
17320        AMF.Internals.Tables.UML_String_Data_06.MS_062D'Access);
17321      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 922, (Is_Empty => True));
17322   end Initialize_922;
17323
17324   --------------------
17325   -- Initialize_923 --
17326   --------------------
17327
17328   procedure Initialize_923 is
17329   begin
17330      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 923, True);
17331      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17332       (Base + 923,
17333        AMF.Internals.Tables.UML_String_Data_05.MS_0562'Access);
17334      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 923, (Is_Empty => True));
17335   end Initialize_923;
17336
17337   --------------------
17338   -- Initialize_924 --
17339   --------------------
17340
17341   procedure Initialize_924 is
17342   begin
17343      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 924, True);
17344      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17345       (Base + 924,
17346        AMF.Internals.Tables.UML_String_Data_02.MS_02CE'Access);
17347      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 924, (Is_Empty => True));
17348   end Initialize_924;
17349
17350   --------------------
17351   -- Initialize_925 --
17352   --------------------
17353
17354   procedure Initialize_925 is
17355   begin
17356      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 925, True);
17357      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17358       (Base + 925,
17359        AMF.Internals.Tables.UML_String_Data_04.MS_0499'Access);
17360      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 925, (Is_Empty => True));
17361   end Initialize_925;
17362
17363   --------------------
17364   -- Initialize_926 --
17365   --------------------
17366
17367   procedure Initialize_926 is
17368   begin
17369      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17370       (Base + 926,
17371        AMF.Internals.Tables.UML_String_Data_06.MS_0656'Access);
17372      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 926, (Is_Empty => True));
17373   end Initialize_926;
17374
17375   --------------------
17376   -- Initialize_927 --
17377   --------------------
17378
17379   procedure Initialize_927 is
17380   begin
17381      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17382       (Base + 927,
17383        AMF.Internals.Tables.UML_String_Data_05.MS_05BD'Access);
17384      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 927, (Is_Empty => True));
17385   end Initialize_927;
17386
17387   --------------------
17388   -- Initialize_928 --
17389   --------------------
17390
17391   procedure Initialize_928 is
17392   begin
17393      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17394       (Base + 928,
17395        AMF.Internals.Tables.UML_String_Data_05.MS_053C'Access);
17396      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 928, (Is_Empty => True));
17397   end Initialize_928;
17398
17399   --------------------
17400   -- Initialize_929 --
17401   --------------------
17402
17403   procedure Initialize_929 is
17404   begin
17405      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17406       (Base + 929,
17407        AMF.Internals.Tables.UML_String_Data_06.MS_0643'Access);
17408      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 929, (Is_Empty => True));
17409   end Initialize_929;
17410
17411   --------------------
17412   -- Initialize_930 --
17413   --------------------
17414
17415   procedure Initialize_930 is
17416   begin
17417      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17418       (Base + 930,
17419        AMF.Internals.Tables.UML_String_Data_00.MS_006E'Access);
17420      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 930, (Is_Empty => True));
17421   end Initialize_930;
17422
17423   --------------------
17424   -- Initialize_931 --
17425   --------------------
17426
17427   procedure Initialize_931 is
17428   begin
17429      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17430       (Base + 931,
17431        AMF.Internals.Tables.UML_String_Data_03.MS_0355'Access);
17432      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 931, (Is_Empty => True));
17433   end Initialize_931;
17434
17435   --------------------
17436   -- Initialize_932 --
17437   --------------------
17438
17439   procedure Initialize_932 is
17440   begin
17441      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17442       (Base + 932,
17443        AMF.Internals.Tables.UML_String_Data_0A.MS_0A42'Access);
17444      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 932, (Is_Empty => True));
17445   end Initialize_932;
17446
17447   --------------------
17448   -- Initialize_933 --
17449   --------------------
17450
17451   procedure Initialize_933 is
17452   begin
17453      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17454       (Base + 933,
17455        AMF.Internals.Tables.UML_String_Data_06.MS_06ED'Access);
17456      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 933, (Is_Empty => True));
17457   end Initialize_933;
17458
17459   --------------------
17460   -- Initialize_934 --
17461   --------------------
17462
17463   procedure Initialize_934 is
17464   begin
17465      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17466       (Base + 934,
17467        AMF.Internals.Tables.UML_String_Data_06.MS_06FA'Access);
17468      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 934, (Is_Empty => True));
17469   end Initialize_934;
17470
17471   --------------------
17472   -- Initialize_935 --
17473   --------------------
17474
17475   procedure Initialize_935 is
17476   begin
17477      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17478       (Base + 935,
17479        AMF.Internals.Tables.UML_String_Data_00.MS_0021'Access);
17480      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 935, (Is_Empty => True));
17481   end Initialize_935;
17482
17483   --------------------
17484   -- Initialize_936 --
17485   --------------------
17486
17487   procedure Initialize_936 is
17488   begin
17489      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17490       (Base + 936,
17491        AMF.Internals.Tables.UML_String_Data_07.MS_0726'Access);
17492      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 936, (Is_Empty => True));
17493   end Initialize_936;
17494
17495   --------------------
17496   -- Initialize_937 --
17497   --------------------
17498
17499   procedure Initialize_937 is
17500   begin
17501      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17502       (Base + 937,
17503        AMF.Internals.Tables.UML_String_Data_0B.MS_0B42'Access);
17504      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 937, (Is_Empty => True));
17505   end Initialize_937;
17506
17507   --------------------
17508   -- Initialize_938 --
17509   --------------------
17510
17511   procedure Initialize_938 is
17512   begin
17513      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17514       (Base + 938,
17515        AMF.Internals.Tables.UML_String_Data_0A.MS_0AD0'Access);
17516      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 938, (Is_Empty => True));
17517   end Initialize_938;
17518
17519   --------------------
17520   -- Initialize_939 --
17521   --------------------
17522
17523   procedure Initialize_939 is
17524   begin
17525      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17526       (Base + 939,
17527        AMF.Internals.Tables.UML_String_Data_02.MS_0259'Access);
17528      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 939, (Is_Empty => True));
17529   end Initialize_939;
17530
17531   --------------------
17532   -- Initialize_940 --
17533   --------------------
17534
17535   procedure Initialize_940 is
17536   begin
17537      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17538       (Base + 940,
17539        AMF.Internals.Tables.UML_String_Data_08.MS_081F'Access);
17540      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 940, (Is_Empty => True));
17541   end Initialize_940;
17542
17543   --------------------
17544   -- Initialize_941 --
17545   --------------------
17546
17547   procedure Initialize_941 is
17548   begin
17549      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17550       (Base + 941,
17551        AMF.Internals.Tables.UML_String_Data_0C.MS_0C01'Access);
17552      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 941, (Is_Empty => True));
17553   end Initialize_941;
17554
17555   --------------------
17556   -- Initialize_942 --
17557   --------------------
17558
17559   procedure Initialize_942 is
17560   begin
17561      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 942, True);
17562      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17563       (Base + 942,
17564        AMF.Internals.Tables.UML_String_Data_02.MS_022C'Access);
17565      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 942, (Is_Empty => True));
17566   end Initialize_942;
17567
17568   --------------------
17569   -- Initialize_943 --
17570   --------------------
17571
17572   procedure Initialize_943 is
17573   begin
17574      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17575       (Base + 943,
17576        AMF.Internals.Tables.UML_String_Data_01.MS_0196'Access);
17577      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 943, (Is_Empty => True));
17578   end Initialize_943;
17579
17580   --------------------
17581   -- Initialize_944 --
17582   --------------------
17583
17584   procedure Initialize_944 is
17585   begin
17586      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17587       (Base + 944,
17588        AMF.Internals.Tables.UML_String_Data_02.MS_02DA'Access);
17589      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 944, (Is_Empty => True));
17590   end Initialize_944;
17591
17592   --------------------
17593   -- Initialize_945 --
17594   --------------------
17595
17596   procedure Initialize_945 is
17597   begin
17598      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 945, True);
17599      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17600       (Base + 945,
17601        AMF.Internals.Tables.UML_String_Data_0A.MS_0AD5'Access);
17602      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 945, (Is_Empty => True));
17603   end Initialize_945;
17604
17605   --------------------
17606   -- Initialize_946 --
17607   --------------------
17608
17609   procedure Initialize_946 is
17610   begin
17611      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17612       (Base + 946,
17613        AMF.Internals.Tables.UML_String_Data_08.MS_088B'Access);
17614      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 946, (Is_Empty => True));
17615   end Initialize_946;
17616
17617   --------------------
17618   -- Initialize_947 --
17619   --------------------
17620
17621   procedure Initialize_947 is
17622   begin
17623      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17624       (Base + 947,
17625        AMF.Internals.Tables.UML_String_Data_04.MS_04AB'Access);
17626      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 947, (Is_Empty => True));
17627   end Initialize_947;
17628
17629   --------------------
17630   -- Initialize_948 --
17631   --------------------
17632
17633   procedure Initialize_948 is
17634   begin
17635      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17636       (Base + 948,
17637        AMF.Internals.Tables.UML_String_Data_02.MS_02CD'Access);
17638      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 948, (Is_Empty => True));
17639   end Initialize_948;
17640
17641   --------------------
17642   -- Initialize_949 --
17643   --------------------
17644
17645   procedure Initialize_949 is
17646   begin
17647      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17648       (Base + 949,
17649        AMF.Internals.Tables.UML_String_Data_00.MS_00E0'Access);
17650      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 949, (Is_Empty => True));
17651   end Initialize_949;
17652
17653   --------------------
17654   -- Initialize_950 --
17655   --------------------
17656
17657   procedure Initialize_950 is
17658   begin
17659      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17660       (Base + 950,
17661        AMF.Internals.Tables.UML_String_Data_06.MS_06CE'Access);
17662      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 950, (Is_Empty => True));
17663   end Initialize_950;
17664
17665   --------------------
17666   -- Initialize_951 --
17667   --------------------
17668
17669   procedure Initialize_951 is
17670   begin
17671      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17672       (Base + 951,
17673        AMF.Internals.Tables.UML_String_Data_0A.MS_0A92'Access);
17674      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 951, (Is_Empty => True));
17675   end Initialize_951;
17676
17677   --------------------
17678   -- Initialize_952 --
17679   --------------------
17680
17681   procedure Initialize_952 is
17682   begin
17683      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17684       (Base + 952,
17685        AMF.Internals.Tables.UML_String_Data_00.MS_006C'Access);
17686      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 952, (Is_Empty => True));
17687   end Initialize_952;
17688
17689   --------------------
17690   -- Initialize_953 --
17691   --------------------
17692
17693   procedure Initialize_953 is
17694   begin
17695      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17696       (Base + 953,
17697        AMF.Internals.Tables.UML_String_Data_0C.MS_0C0F'Access);
17698      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 953, (Is_Empty => True));
17699   end Initialize_953;
17700
17701   --------------------
17702   -- Initialize_954 --
17703   --------------------
17704
17705   procedure Initialize_954 is
17706   begin
17707      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17708       (Base + 954,
17709        AMF.Internals.Tables.UML_String_Data_05.MS_05C8'Access);
17710      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 954, (Is_Empty => True));
17711   end Initialize_954;
17712
17713   --------------------
17714   -- Initialize_955 --
17715   --------------------
17716
17717   procedure Initialize_955 is
17718   begin
17719      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17720       (Base + 955,
17721        AMF.Internals.Tables.UML_String_Data_01.MS_019D'Access);
17722      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 955, (Is_Empty => True));
17723   end Initialize_955;
17724
17725   --------------------
17726   -- Initialize_956 --
17727   --------------------
17728
17729   procedure Initialize_956 is
17730   begin
17731      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17732       (Base + 956,
17733        AMF.Internals.Tables.UML_String_Data_08.MS_085B'Access);
17734      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 956, (Is_Empty => True));
17735   end Initialize_956;
17736
17737   --------------------
17738   -- Initialize_957 --
17739   --------------------
17740
17741   procedure Initialize_957 is
17742   begin
17743      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 957, True);
17744      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17745       (Base + 957,
17746        AMF.Internals.Tables.UML_String_Data_03.MS_03A5'Access);
17747      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 957, (Is_Empty => True));
17748   end Initialize_957;
17749
17750   --------------------
17751   -- Initialize_958 --
17752   --------------------
17753
17754   procedure Initialize_958 is
17755   begin
17756      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17757       (Base + 958,
17758        AMF.Internals.Tables.UML_String_Data_06.MS_06BD'Access);
17759      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 958, (Is_Empty => True));
17760   end Initialize_958;
17761
17762   --------------------
17763   -- Initialize_959 --
17764   --------------------
17765
17766   procedure Initialize_959 is
17767   begin
17768      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17769       (Base + 959,
17770        AMF.Internals.Tables.UML_String_Data_04.MS_04EC'Access);
17771      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 959, (Is_Empty => True));
17772   end Initialize_959;
17773
17774   --------------------
17775   -- Initialize_960 --
17776   --------------------
17777
17778   procedure Initialize_960 is
17779   begin
17780      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17781       (Base + 960,
17782        AMF.Internals.Tables.UML_String_Data_09.MS_09D8'Access);
17783      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 960, (Is_Empty => True));
17784   end Initialize_960;
17785
17786   --------------------
17787   -- Initialize_961 --
17788   --------------------
17789
17790   procedure Initialize_961 is
17791   begin
17792      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17793       (Base + 961,
17794        AMF.Internals.Tables.UML_String_Data_05.MS_0503'Access);
17795      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 961, (Is_Empty => True));
17796   end Initialize_961;
17797
17798   --------------------
17799   -- Initialize_962 --
17800   --------------------
17801
17802   procedure Initialize_962 is
17803   begin
17804      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17805       (Base + 962,
17806        AMF.Internals.Tables.UML_String_Data_02.MS_0205'Access);
17807      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 962, (Is_Empty => True));
17808   end Initialize_962;
17809
17810   --------------------
17811   -- Initialize_963 --
17812   --------------------
17813
17814   procedure Initialize_963 is
17815   begin
17816      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17817       (Base + 963,
17818        AMF.Internals.Tables.UML_String_Data_00.MS_0033'Access);
17819      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 963, (Is_Empty => True));
17820   end Initialize_963;
17821
17822   --------------------
17823   -- Initialize_964 --
17824   --------------------
17825
17826   procedure Initialize_964 is
17827   begin
17828      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17829       (Base + 964,
17830        AMF.Internals.Tables.UML_String_Data_03.MS_03A4'Access);
17831      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 964, (Is_Empty => True));
17832   end Initialize_964;
17833
17834   --------------------
17835   -- Initialize_965 --
17836   --------------------
17837
17838   procedure Initialize_965 is
17839   begin
17840      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17841       (Base + 965,
17842        AMF.Internals.Tables.UML_String_Data_08.MS_0809'Access);
17843      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 965, (Is_Empty => True));
17844   end Initialize_965;
17845
17846   --------------------
17847   -- Initialize_966 --
17848   --------------------
17849
17850   procedure Initialize_966 is
17851   begin
17852      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17853       (Base + 966,
17854        AMF.Internals.Tables.UML_String_Data_05.MS_05F4'Access);
17855      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 966, (Is_Empty => True));
17856   end Initialize_966;
17857
17858   --------------------
17859   -- Initialize_967 --
17860   --------------------
17861
17862   procedure Initialize_967 is
17863   begin
17864      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17865       (Base + 967,
17866        AMF.Internals.Tables.UML_String_Data_08.MS_08F3'Access);
17867      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 967, (Is_Empty => True));
17868   end Initialize_967;
17869
17870   --------------------
17871   -- Initialize_968 --
17872   --------------------
17873
17874   procedure Initialize_968 is
17875   begin
17876      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17877       (Base + 968,
17878        AMF.Internals.Tables.UML_String_Data_07.MS_0788'Access);
17879      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 968, (Is_Empty => True));
17880   end Initialize_968;
17881
17882   --------------------
17883   -- Initialize_969 --
17884   --------------------
17885
17886   procedure Initialize_969 is
17887   begin
17888      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17889       (Base + 969,
17890        AMF.Internals.Tables.UML_String_Data_08.MS_0818'Access);
17891      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 969, (Is_Empty => True));
17892   end Initialize_969;
17893
17894   --------------------
17895   -- Initialize_970 --
17896   --------------------
17897
17898   procedure Initialize_970 is
17899   begin
17900      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17901       (Base + 970,
17902        AMF.Internals.Tables.UML_String_Data_06.MS_065F'Access);
17903      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 970, (Is_Empty => True));
17904   end Initialize_970;
17905
17906   --------------------
17907   -- Initialize_971 --
17908   --------------------
17909
17910   procedure Initialize_971 is
17911   begin
17912      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17913       (Base + 971,
17914        AMF.Internals.Tables.UML_String_Data_0B.MS_0B22'Access);
17915      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 971, (Is_Empty => True));
17916   end Initialize_971;
17917
17918   --------------------
17919   -- Initialize_972 --
17920   --------------------
17921
17922   procedure Initialize_972 is
17923   begin
17924      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17925       (Base + 972,
17926        AMF.Internals.Tables.UML_String_Data_0A.MS_0A25'Access);
17927      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 972, (Is_Empty => True));
17928   end Initialize_972;
17929
17930   --------------------
17931   -- Initialize_973 --
17932   --------------------
17933
17934   procedure Initialize_973 is
17935   begin
17936      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17937       (Base + 973,
17938        AMF.Internals.Tables.UML_String_Data_04.MS_045E'Access);
17939      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 973, (Is_Empty => True));
17940   end Initialize_973;
17941
17942   --------------------
17943   -- Initialize_974 --
17944   --------------------
17945
17946   procedure Initialize_974 is
17947   begin
17948      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17949       (Base + 974,
17950        AMF.Internals.Tables.UML_String_Data_0B.MS_0B43'Access);
17951      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 974, (Is_Empty => True));
17952   end Initialize_974;
17953
17954   --------------------
17955   -- Initialize_975 --
17956   --------------------
17957
17958   procedure Initialize_975 is
17959   begin
17960      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17961       (Base + 975,
17962        AMF.Internals.Tables.UML_String_Data_0C.MS_0C97'Access);
17963      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 975, (Is_Empty => True));
17964   end Initialize_975;
17965
17966   --------------------
17967   -- Initialize_976 --
17968   --------------------
17969
17970   procedure Initialize_976 is
17971   begin
17972      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17973       (Base + 976,
17974        AMF.Internals.Tables.UML_String_Data_05.MS_0571'Access);
17975      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 976, (Is_Empty => True));
17976   end Initialize_976;
17977
17978   --------------------
17979   -- Initialize_977 --
17980   --------------------
17981
17982   procedure Initialize_977 is
17983   begin
17984      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17985       (Base + 977,
17986        AMF.Internals.Tables.UML_String_Data_06.MS_061E'Access);
17987      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 977, (Is_Empty => True));
17988   end Initialize_977;
17989
17990   --------------------
17991   -- Initialize_978 --
17992   --------------------
17993
17994   procedure Initialize_978 is
17995   begin
17996      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
17997       (Base + 978,
17998        AMF.Internals.Tables.UML_String_Data_0B.MS_0B35'Access);
17999      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 978, (Is_Empty => True));
18000   end Initialize_978;
18001
18002   --------------------
18003   -- Initialize_979 --
18004   --------------------
18005
18006   procedure Initialize_979 is
18007   begin
18008      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18009       (Base + 979,
18010        AMF.Internals.Tables.UML_String_Data_02.MS_02D0'Access);
18011      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 979, (Is_Empty => True));
18012   end Initialize_979;
18013
18014   --------------------
18015   -- Initialize_980 --
18016   --------------------
18017
18018   procedure Initialize_980 is
18019   begin
18020      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18021       (Base + 980,
18022        AMF.Internals.Tables.UML_String_Data_00.MS_007C'Access);
18023      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 980, (Is_Empty => True));
18024   end Initialize_980;
18025
18026   --------------------
18027   -- Initialize_981 --
18028   --------------------
18029
18030   procedure Initialize_981 is
18031   begin
18032      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18033       (Base + 981,
18034        AMF.Internals.Tables.UML_String_Data_01.MS_0171'Access);
18035      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 981, (Is_Empty => True));
18036   end Initialize_981;
18037
18038   --------------------
18039   -- Initialize_982 --
18040   --------------------
18041
18042   procedure Initialize_982 is
18043   begin
18044      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18045       (Base + 982,
18046        AMF.Internals.Tables.UML_String_Data_08.MS_08C5'Access);
18047      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 982, (Is_Empty => True));
18048   end Initialize_982;
18049
18050   --------------------
18051   -- Initialize_983 --
18052   --------------------
18053
18054   procedure Initialize_983 is
18055   begin
18056      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 983, True);
18057      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18058       (Base + 983,
18059        AMF.Internals.Tables.UML_String_Data_08.MS_0868'Access);
18060      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 983, (Is_Empty => True));
18061   end Initialize_983;
18062
18063   --------------------
18064   -- Initialize_984 --
18065   --------------------
18066
18067   procedure Initialize_984 is
18068   begin
18069      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 984, True);
18070      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18071       (Base + 984,
18072        AMF.Internals.Tables.UML_String_Data_09.MS_09C8'Access);
18073      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 984, (Is_Empty => True));
18074   end Initialize_984;
18075
18076   --------------------
18077   -- Initialize_985 --
18078   --------------------
18079
18080   procedure Initialize_985 is
18081   begin
18082      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18083       (Base + 985,
18084        AMF.Internals.Tables.UML_String_Data_03.MS_034A'Access);
18085      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 985, (Is_Empty => True));
18086   end Initialize_985;
18087
18088   --------------------
18089   -- Initialize_986 --
18090   --------------------
18091
18092   procedure Initialize_986 is
18093   begin
18094      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18095       (Base + 986,
18096        AMF.Internals.Tables.UML_String_Data_04.MS_0460'Access);
18097      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 986, (Is_Empty => True));
18098   end Initialize_986;
18099
18100   --------------------
18101   -- Initialize_987 --
18102   --------------------
18103
18104   procedure Initialize_987 is
18105   begin
18106      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18107       (Base + 987,
18108        AMF.Internals.Tables.UML_String_Data_01.MS_010C'Access);
18109      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 987, (Is_Empty => True));
18110   end Initialize_987;
18111
18112   --------------------
18113   -- Initialize_988 --
18114   --------------------
18115
18116   procedure Initialize_988 is
18117   begin
18118      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18119       (Base + 988,
18120        AMF.Internals.Tables.UML_String_Data_09.MS_09C3'Access);
18121      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 988, (Is_Empty => True));
18122   end Initialize_988;
18123
18124   --------------------
18125   -- Initialize_989 --
18126   --------------------
18127
18128   procedure Initialize_989 is
18129   begin
18130      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18131       (Base + 989,
18132        AMF.Internals.Tables.UML_String_Data_0C.MS_0C67'Access);
18133      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 989, (Is_Empty => True));
18134   end Initialize_989;
18135
18136   --------------------
18137   -- Initialize_990 --
18138   --------------------
18139
18140   procedure Initialize_990 is
18141   begin
18142      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18143       (Base + 990,
18144        AMF.Internals.Tables.UML_String_Data_07.MS_07BA'Access);
18145      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 990, (Is_Empty => True));
18146   end Initialize_990;
18147
18148   --------------------
18149   -- Initialize_991 --
18150   --------------------
18151
18152   procedure Initialize_991 is
18153   begin
18154      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18155       (Base + 991,
18156        AMF.Internals.Tables.UML_String_Data_01.MS_017C'Access);
18157      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 991, (Is_Empty => True));
18158   end Initialize_991;
18159
18160   --------------------
18161   -- Initialize_992 --
18162   --------------------
18163
18164   procedure Initialize_992 is
18165   begin
18166      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18167       (Base + 992,
18168        AMF.Internals.Tables.UML_String_Data_07.MS_0715'Access);
18169      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 992, (Is_Empty => True));
18170   end Initialize_992;
18171
18172   --------------------
18173   -- Initialize_993 --
18174   --------------------
18175
18176   procedure Initialize_993 is
18177   begin
18178      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18179       (Base + 993,
18180        AMF.Internals.Tables.UML_String_Data_02.MS_02C3'Access);
18181      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 993, (Is_Empty => True));
18182   end Initialize_993;
18183
18184   --------------------
18185   -- Initialize_994 --
18186   --------------------
18187
18188   procedure Initialize_994 is
18189   begin
18190      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 994, True);
18191      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18192       (Base + 994,
18193        AMF.Internals.Tables.UML_String_Data_09.MS_0989'Access);
18194      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 994, (Is_Empty => True));
18195   end Initialize_994;
18196
18197   --------------------
18198   -- Initialize_995 --
18199   --------------------
18200
18201   procedure Initialize_995 is
18202   begin
18203      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18204       (Base + 995,
18205        AMF.Internals.Tables.UML_String_Data_07.MS_07AB'Access);
18206      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 995, (Is_Empty => True));
18207   end Initialize_995;
18208
18209   --------------------
18210   -- Initialize_996 --
18211   --------------------
18212
18213   procedure Initialize_996 is
18214   begin
18215      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18216       (Base + 996,
18217        AMF.Internals.Tables.UML_String_Data_0A.MS_0A59'Access);
18218      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 996, (Is_Empty => True));
18219   end Initialize_996;
18220
18221   --------------------
18222   -- Initialize_997 --
18223   --------------------
18224
18225   procedure Initialize_997 is
18226   begin
18227      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18228       (Base + 997,
18229        AMF.Internals.Tables.UML_String_Data_0A.MS_0A8C'Access);
18230      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 997, (Is_Empty => True));
18231   end Initialize_997;
18232
18233   --------------------
18234   -- Initialize_998 --
18235   --------------------
18236
18237   procedure Initialize_998 is
18238   begin
18239      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18240       (Base + 998,
18241        AMF.Internals.Tables.UML_String_Data_03.MS_0317'Access);
18242      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 998, (Is_Empty => True));
18243   end Initialize_998;
18244
18245   --------------------
18246   -- Initialize_999 --
18247   --------------------
18248
18249   procedure Initialize_999 is
18250   begin
18251      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18252       (Base + 999,
18253        AMF.Internals.Tables.UML_String_Data_00.MS_00A8'Access);
18254      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 999, (Is_Empty => True));
18255   end Initialize_999;
18256
18257   ---------------------
18258   -- Initialize_1000 --
18259   ---------------------
18260
18261   procedure Initialize_1000 is
18262   begin
18263      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18264       (Base + 1000,
18265        AMF.Internals.Tables.UML_String_Data_08.MS_085C'Access);
18266      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1000, (Is_Empty => True));
18267   end Initialize_1000;
18268
18269   ---------------------
18270   -- Initialize_1001 --
18271   ---------------------
18272
18273   procedure Initialize_1001 is
18274   begin
18275      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18276       (Base + 1001,
18277        AMF.Internals.Tables.UML_String_Data_0A.MS_0A74'Access);
18278      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1001, (Is_Empty => True));
18279   end Initialize_1001;
18280
18281   ---------------------
18282   -- Initialize_1002 --
18283   ---------------------
18284
18285   procedure Initialize_1002 is
18286   begin
18287      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18288       (Base + 1002,
18289        AMF.Internals.Tables.UML_String_Data_01.MS_01C9'Access);
18290      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1002, (Is_Empty => True));
18291   end Initialize_1002;
18292
18293   ---------------------
18294   -- Initialize_1003 --
18295   ---------------------
18296
18297   procedure Initialize_1003 is
18298   begin
18299      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18300       (Base + 1003,
18301        AMF.Internals.Tables.UML_String_Data_04.MS_0458'Access);
18302      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1003, (Is_Empty => True));
18303   end Initialize_1003;
18304
18305   ---------------------
18306   -- Initialize_1004 --
18307   ---------------------
18308
18309   procedure Initialize_1004 is
18310   begin
18311      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18312       (Base + 1004,
18313        AMF.Internals.Tables.UML_String_Data_08.MS_0829'Access);
18314      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1004, (Is_Empty => True));
18315   end Initialize_1004;
18316
18317   ---------------------
18318   -- Initialize_1005 --
18319   ---------------------
18320
18321   procedure Initialize_1005 is
18322   begin
18323      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18324       (Base + 1005,
18325        AMF.Internals.Tables.UML_String_Data_0A.MS_0A03'Access);
18326      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1005, (Is_Empty => True));
18327   end Initialize_1005;
18328
18329   ---------------------
18330   -- Initialize_1006 --
18331   ---------------------
18332
18333   procedure Initialize_1006 is
18334   begin
18335      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 1006, True);
18336      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18337       (Base + 1006,
18338        AMF.Internals.Tables.UML_String_Data_0B.MS_0B82'Access);
18339      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1006, (Is_Empty => True));
18340   end Initialize_1006;
18341
18342   ---------------------
18343   -- Initialize_1007 --
18344   ---------------------
18345
18346   procedure Initialize_1007 is
18347   begin
18348      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18349       (Base + 1007,
18350        AMF.Internals.Tables.UML_String_Data_08.MS_08DA'Access);
18351      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1007, (Is_Empty => True));
18352   end Initialize_1007;
18353
18354   ---------------------
18355   -- Initialize_1008 --
18356   ---------------------
18357
18358   procedure Initialize_1008 is
18359   begin
18360      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18361       (Base + 1008,
18362        AMF.Internals.Tables.UML_String_Data_07.MS_078F'Access);
18363      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1008, (Is_Empty => True));
18364   end Initialize_1008;
18365
18366   ---------------------
18367   -- Initialize_1009 --
18368   ---------------------
18369
18370   procedure Initialize_1009 is
18371   begin
18372      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18373       (Base + 1009,
18374        AMF.Internals.Tables.UML_String_Data_0B.MS_0B02'Access);
18375      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1009, (Is_Empty => True));
18376   end Initialize_1009;
18377
18378   ---------------------
18379   -- Initialize_1010 --
18380   ---------------------
18381
18382   procedure Initialize_1010 is
18383   begin
18384      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18385       (Base + 1010,
18386        AMF.Internals.Tables.UML_String_Data_03.MS_0392'Access);
18387      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1010, (Is_Empty => True));
18388   end Initialize_1010;
18389
18390   ---------------------
18391   -- Initialize_1011 --
18392   ---------------------
18393
18394   procedure Initialize_1011 is
18395   begin
18396      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18397       (Base + 1011,
18398        AMF.Internals.Tables.UML_String_Data_0C.MS_0C76'Access);
18399      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1011, (Is_Empty => True));
18400   end Initialize_1011;
18401
18402   ---------------------
18403   -- Initialize_1012 --
18404   ---------------------
18405
18406   procedure Initialize_1012 is
18407   begin
18408      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18409       (Base + 1012,
18410        AMF.Internals.Tables.UML_String_Data_01.MS_01D4'Access);
18411      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1012, (Is_Empty => True));
18412   end Initialize_1012;
18413
18414   ---------------------
18415   -- Initialize_1013 --
18416   ---------------------
18417
18418   procedure Initialize_1013 is
18419   begin
18420      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18421       (Base + 1013,
18422        AMF.Internals.Tables.UML_String_Data_08.MS_08CB'Access);
18423      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1013, (Is_Empty => True));
18424   end Initialize_1013;
18425
18426   ---------------------
18427   -- Initialize_1014 --
18428   ---------------------
18429
18430   procedure Initialize_1014 is
18431   begin
18432      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18433       (Base + 1014,
18434        AMF.Internals.Tables.UML_String_Data_02.MS_02D5'Access);
18435      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1014, (Is_Empty => True));
18436   end Initialize_1014;
18437
18438   ---------------------
18439   -- Initialize_1015 --
18440   ---------------------
18441
18442   procedure Initialize_1015 is
18443   begin
18444      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18445       (Base + 1015,
18446        AMF.Internals.Tables.UML_String_Data_02.MS_025F'Access);
18447      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1015, (Is_Empty => True));
18448   end Initialize_1015;
18449
18450   ---------------------
18451   -- Initialize_1016 --
18452   ---------------------
18453
18454   procedure Initialize_1016 is
18455   begin
18456      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 1016, True);
18457      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18458       (Base + 1016,
18459        AMF.Internals.Tables.UML_String_Data_02.MS_0256'Access);
18460      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1016, (Is_Empty => True));
18461   end Initialize_1016;
18462
18463   ---------------------
18464   -- Initialize_1017 --
18465   ---------------------
18466
18467   procedure Initialize_1017 is
18468   begin
18469      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 1017, True);
18470      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18471       (Base + 1017,
18472        AMF.Internals.Tables.UML_String_Data_01.MS_0138'Access);
18473      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1017, (Is_Empty => True));
18474   end Initialize_1017;
18475
18476   ---------------------
18477   -- Initialize_1018 --
18478   ---------------------
18479
18480   procedure Initialize_1018 is
18481   begin
18482      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18483       (Base + 1018,
18484        AMF.Internals.Tables.UML_String_Data_09.MS_0955'Access);
18485      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1018, (Is_Empty => True));
18486   end Initialize_1018;
18487
18488   ---------------------
18489   -- Initialize_1019 --
18490   ---------------------
18491
18492   procedure Initialize_1019 is
18493   begin
18494      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18495       (Base + 1019,
18496        AMF.Internals.Tables.UML_String_Data_09.MS_09AF'Access);
18497      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1019, (Is_Empty => True));
18498   end Initialize_1019;
18499
18500   ---------------------
18501   -- Initialize_1020 --
18502   ---------------------
18503
18504   procedure Initialize_1020 is
18505   begin
18506      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18507       (Base + 1020,
18508        AMF.Internals.Tables.UML_String_Data_09.MS_093E'Access);
18509      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1020, (Is_Empty => True));
18510   end Initialize_1020;
18511
18512   ---------------------
18513   -- Initialize_1021 --
18514   ---------------------
18515
18516   procedure Initialize_1021 is
18517   begin
18518      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 1021, True);
18519      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18520       (Base + 1021,
18521        AMF.Internals.Tables.UML_String_Data_03.MS_03D8'Access);
18522      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1021, (Is_Empty => True));
18523   end Initialize_1021;
18524
18525   ---------------------
18526   -- Initialize_1022 --
18527   ---------------------
18528
18529   procedure Initialize_1022 is
18530   begin
18531      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18532       (Base + 1022,
18533        AMF.Internals.Tables.UML_String_Data_03.MS_03D3'Access);
18534      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1022, (Is_Empty => True));
18535   end Initialize_1022;
18536
18537   ---------------------
18538   -- Initialize_1023 --
18539   ---------------------
18540
18541   procedure Initialize_1023 is
18542   begin
18543      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18544       (Base + 1023,
18545        AMF.Internals.Tables.UML_String_Data_05.MS_0548'Access);
18546      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1023, (Is_Empty => True));
18547   end Initialize_1023;
18548
18549   ---------------------
18550   -- Initialize_1024 --
18551   ---------------------
18552
18553   procedure Initialize_1024 is
18554   begin
18555      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18556       (Base + 1024,
18557        AMF.Internals.Tables.UML_String_Data_0A.MS_0A87'Access);
18558      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1024, (Is_Empty => True));
18559   end Initialize_1024;
18560
18561   ---------------------
18562   -- Initialize_1025 --
18563   ---------------------
18564
18565   procedure Initialize_1025 is
18566   begin
18567      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18568       (Base + 1025,
18569        AMF.Internals.Tables.UML_String_Data_06.MS_0674'Access);
18570      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1025, (Is_Empty => True));
18571   end Initialize_1025;
18572
18573   ---------------------
18574   -- Initialize_1026 --
18575   ---------------------
18576
18577   procedure Initialize_1026 is
18578   begin
18579      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18580       (Base + 1026,
18581        AMF.Internals.Tables.UML_String_Data_05.MS_05ED'Access);
18582      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1026, (Is_Empty => True));
18583   end Initialize_1026;
18584
18585   ---------------------
18586   -- Initialize_1027 --
18587   ---------------------
18588
18589   procedure Initialize_1027 is
18590   begin
18591      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18592       (Base + 1027,
18593        AMF.Internals.Tables.UML_String_Data_0A.MS_0A54'Access);
18594      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1027, (Is_Empty => True));
18595   end Initialize_1027;
18596
18597   ---------------------
18598   -- Initialize_1028 --
18599   ---------------------
18600
18601   procedure Initialize_1028 is
18602   begin
18603      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18604       (Base + 1028,
18605        AMF.Internals.Tables.UML_String_Data_01.MS_01EC'Access);
18606      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1028, (Is_Empty => True));
18607   end Initialize_1028;
18608
18609   ---------------------
18610   -- Initialize_1029 --
18611   ---------------------
18612
18613   procedure Initialize_1029 is
18614   begin
18615      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18616       (Base + 1029,
18617        AMF.Internals.Tables.UML_String_Data_06.MS_069B'Access);
18618      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1029, (Is_Empty => True));
18619   end Initialize_1029;
18620
18621   ---------------------
18622   -- Initialize_1030 --
18623   ---------------------
18624
18625   procedure Initialize_1030 is
18626   begin
18627      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18628       (Base + 1030,
18629        AMF.Internals.Tables.UML_String_Data_00.MS_0094'Access);
18630      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1030, (Is_Empty => True));
18631   end Initialize_1030;
18632
18633   ---------------------
18634   -- Initialize_1031 --
18635   ---------------------
18636
18637   procedure Initialize_1031 is
18638   begin
18639      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18640       (Base + 1031,
18641        AMF.Internals.Tables.UML_String_Data_0B.MS_0B85'Access);
18642      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1031, (Is_Empty => True));
18643   end Initialize_1031;
18644
18645   ---------------------
18646   -- Initialize_1032 --
18647   ---------------------
18648
18649   procedure Initialize_1032 is
18650   begin
18651      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18652       (Base + 1032,
18653        AMF.Internals.Tables.UML_String_Data_04.MS_040F'Access);
18654      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1032, (Is_Empty => True));
18655   end Initialize_1032;
18656
18657   ---------------------
18658   -- Initialize_1033 --
18659   ---------------------
18660
18661   procedure Initialize_1033 is
18662   begin
18663      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18664       (Base + 1033,
18665        AMF.Internals.Tables.UML_String_Data_09.MS_0912'Access);
18666      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1033, (Is_Empty => True));
18667   end Initialize_1033;
18668
18669   ---------------------
18670   -- Initialize_1034 --
18671   ---------------------
18672
18673   procedure Initialize_1034 is
18674   begin
18675      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18676       (Base + 1034,
18677        AMF.Internals.Tables.UML_String_Data_07.MS_07F6'Access);
18678      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1034, (Is_Empty => True));
18679   end Initialize_1034;
18680
18681   ---------------------
18682   -- Initialize_1035 --
18683   ---------------------
18684
18685   procedure Initialize_1035 is
18686   begin
18687      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18688       (Base + 1035,
18689        AMF.Internals.Tables.UML_String_Data_04.MS_0493'Access);
18690      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1035, (Is_Empty => True));
18691   end Initialize_1035;
18692
18693   ---------------------
18694   -- Initialize_1036 --
18695   ---------------------
18696
18697   procedure Initialize_1036 is
18698   begin
18699      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18700       (Base + 1036,
18701        AMF.Internals.Tables.UML_String_Data_03.MS_03F4'Access);
18702      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1036, (Is_Empty => True));
18703   end Initialize_1036;
18704
18705   ---------------------
18706   -- Initialize_1037 --
18707   ---------------------
18708
18709   procedure Initialize_1037 is
18710   begin
18711      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18712       (Base + 1037,
18713        AMF.Internals.Tables.UML_String_Data_08.MS_08C9'Access);
18714      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1037, (Is_Empty => True));
18715   end Initialize_1037;
18716
18717   ---------------------
18718   -- Initialize_1038 --
18719   ---------------------
18720
18721   procedure Initialize_1038 is
18722   begin
18723      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18724       (Base + 1038,
18725        AMF.Internals.Tables.UML_String_Data_08.MS_08DE'Access);
18726      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1038, (Is_Empty => True));
18727   end Initialize_1038;
18728
18729   ---------------------
18730   -- Initialize_1039 --
18731   ---------------------
18732
18733   procedure Initialize_1039 is
18734   begin
18735      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18736       (Base + 1039,
18737        AMF.Internals.Tables.UML_String_Data_02.MS_0226'Access);
18738      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1039, (Is_Empty => True));
18739   end Initialize_1039;
18740
18741   ---------------------
18742   -- Initialize_1040 --
18743   ---------------------
18744
18745   procedure Initialize_1040 is
18746   begin
18747      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18748       (Base + 1040,
18749        AMF.Internals.Tables.UML_String_Data_09.MS_09F5'Access);
18750      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1040, (Is_Empty => True));
18751   end Initialize_1040;
18752
18753   ---------------------
18754   -- Initialize_1041 --
18755   ---------------------
18756
18757   procedure Initialize_1041 is
18758   begin
18759      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18760       (Base + 1041,
18761        AMF.Internals.Tables.UML_String_Data_05.MS_05D8'Access);
18762      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1041, (Is_Empty => True));
18763   end Initialize_1041;
18764
18765   ---------------------
18766   -- Initialize_1042 --
18767   ---------------------
18768
18769   procedure Initialize_1042 is
18770   begin
18771      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18772       (Base + 1042,
18773        AMF.Internals.Tables.UML_String_Data_04.MS_04E7'Access);
18774      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1042, (Is_Empty => True));
18775   end Initialize_1042;
18776
18777   ---------------------
18778   -- Initialize_1043 --
18779   ---------------------
18780
18781   procedure Initialize_1043 is
18782   begin
18783      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 1043, True);
18784      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18785       (Base + 1043,
18786        AMF.Internals.Tables.UML_String_Data_05.MS_059D'Access);
18787      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1043, (Is_Empty => True));
18788   end Initialize_1043;
18789
18790   ---------------------
18791   -- Initialize_1044 --
18792   ---------------------
18793
18794   procedure Initialize_1044 is
18795   begin
18796      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18797       (Base + 1044,
18798        AMF.Internals.Tables.UML_String_Data_01.MS_018F'Access);
18799      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1044, (Is_Empty => True));
18800   end Initialize_1044;
18801
18802   ---------------------
18803   -- Initialize_1045 --
18804   ---------------------
18805
18806   procedure Initialize_1045 is
18807   begin
18808      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18809       (Base + 1045,
18810        AMF.Internals.Tables.UML_String_Data_07.MS_072C'Access);
18811      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1045, (Is_Empty => True));
18812   end Initialize_1045;
18813
18814   ---------------------
18815   -- Initialize_1046 --
18816   ---------------------
18817
18818   procedure Initialize_1046 is
18819   begin
18820      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18821       (Base + 1046,
18822        AMF.Internals.Tables.UML_String_Data_0B.MS_0BC6'Access);
18823      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1046, (Is_Empty => True));
18824   end Initialize_1046;
18825
18826   ---------------------
18827   -- Initialize_1047 --
18828   ---------------------
18829
18830   procedure Initialize_1047 is
18831   begin
18832      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18833       (Base + 1047,
18834        AMF.Internals.Tables.UML_String_Data_06.MS_0668'Access);
18835      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1047, (Is_Empty => True));
18836   end Initialize_1047;
18837
18838   ---------------------
18839   -- Initialize_1048 --
18840   ---------------------
18841
18842   procedure Initialize_1048 is
18843   begin
18844      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18845       (Base + 1048,
18846        AMF.Internals.Tables.UML_String_Data_05.MS_0500'Access);
18847      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1048, (Is_Empty => True));
18848   end Initialize_1048;
18849
18850   ---------------------
18851   -- Initialize_1049 --
18852   ---------------------
18853
18854   procedure Initialize_1049 is
18855   begin
18856      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18857       (Base + 1049,
18858        AMF.Internals.Tables.UML_String_Data_09.MS_09F7'Access);
18859      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1049, (Is_Empty => True));
18860   end Initialize_1049;
18861
18862   ---------------------
18863   -- Initialize_1050 --
18864   ---------------------
18865
18866   procedure Initialize_1050 is
18867   begin
18868      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18869       (Base + 1050,
18870        AMF.Internals.Tables.UML_String_Data_0C.MS_0C81'Access);
18871      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1050, (Is_Empty => True));
18872   end Initialize_1050;
18873
18874   ---------------------
18875   -- Initialize_1051 --
18876   ---------------------
18877
18878   procedure Initialize_1051 is
18879   begin
18880      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18881       (Base + 1051,
18882        AMF.Internals.Tables.UML_String_Data_0A.MS_0A0B'Access);
18883      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1051, (Is_Empty => True));
18884   end Initialize_1051;
18885
18886   ---------------------
18887   -- Initialize_1052 --
18888   ---------------------
18889
18890   procedure Initialize_1052 is
18891   begin
18892      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18893       (Base + 1052,
18894        AMF.Internals.Tables.UML_String_Data_0B.MS_0BAE'Access);
18895      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1052, (Is_Empty => True));
18896   end Initialize_1052;
18897
18898   ---------------------
18899   -- Initialize_1053 --
18900   ---------------------
18901
18902   procedure Initialize_1053 is
18903   begin
18904      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18905       (Base + 1053,
18906        AMF.Internals.Tables.UML_String_Data_03.MS_038A'Access);
18907      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1053, (Is_Empty => True));
18908   end Initialize_1053;
18909
18910   ---------------------
18911   -- Initialize_1054 --
18912   ---------------------
18913
18914   procedure Initialize_1054 is
18915   begin
18916      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18917       (Base + 1054,
18918        AMF.Internals.Tables.UML_String_Data_08.MS_0886'Access);
18919      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1054, (Is_Empty => True));
18920   end Initialize_1054;
18921
18922   ---------------------
18923   -- Initialize_1055 --
18924   ---------------------
18925
18926   procedure Initialize_1055 is
18927   begin
18928      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18929       (Base + 1055,
18930        AMF.Internals.Tables.UML_String_Data_00.MS_008F'Access);
18931      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1055, (Is_Empty => True));
18932   end Initialize_1055;
18933
18934   ---------------------
18935   -- Initialize_1056 --
18936   ---------------------
18937
18938   procedure Initialize_1056 is
18939   begin
18940      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18941       (Base + 1056,
18942        AMF.Internals.Tables.UML_String_Data_00.MS_0035'Access);
18943      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1056, (Is_Empty => True));
18944   end Initialize_1056;
18945
18946   ---------------------
18947   -- Initialize_1057 --
18948   ---------------------
18949
18950   procedure Initialize_1057 is
18951   begin
18952      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18953       (Base + 1057,
18954        AMF.Internals.Tables.UML_String_Data_01.MS_0109'Access);
18955      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1057, (Is_Empty => True));
18956   end Initialize_1057;
18957
18958   ---------------------
18959   -- Initialize_1058 --
18960   ---------------------
18961
18962   procedure Initialize_1058 is
18963   begin
18964      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18965       (Base + 1058,
18966        AMF.Internals.Tables.UML_String_Data_00.MS_00DD'Access);
18967      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1058, (Is_Empty => True));
18968   end Initialize_1058;
18969
18970   ---------------------
18971   -- Initialize_1059 --
18972   ---------------------
18973
18974   procedure Initialize_1059 is
18975   begin
18976      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18977       (Base + 1059,
18978        AMF.Internals.Tables.UML_String_Data_04.MS_04E9'Access);
18979      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1059, (Is_Empty => True));
18980   end Initialize_1059;
18981
18982   ---------------------
18983   -- Initialize_1060 --
18984   ---------------------
18985
18986   procedure Initialize_1060 is
18987   begin
18988      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
18989       (Base + 1060,
18990        AMF.Internals.Tables.UML_String_Data_01.MS_018E'Access);
18991      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1060, (Is_Empty => True));
18992   end Initialize_1060;
18993
18994   ---------------------
18995   -- Initialize_1061 --
18996   ---------------------
18997
18998   procedure Initialize_1061 is
18999   begin
19000      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19001       (Base + 1061,
19002        AMF.Internals.Tables.UML_String_Data_05.MS_05AD'Access);
19003      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1061, (Is_Empty => True));
19004   end Initialize_1061;
19005
19006   ---------------------
19007   -- Initialize_1062 --
19008   ---------------------
19009
19010   procedure Initialize_1062 is
19011   begin
19012      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19013       (Base + 1062,
19014        AMF.Internals.Tables.UML_String_Data_09.MS_09AB'Access);
19015      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1062, (Is_Empty => True));
19016   end Initialize_1062;
19017
19018   ---------------------
19019   -- Initialize_1063 --
19020   ---------------------
19021
19022   procedure Initialize_1063 is
19023   begin
19024      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19025       (Base + 1063,
19026        AMF.Internals.Tables.UML_String_Data_02.MS_02FE'Access);
19027      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1063, (Is_Empty => True));
19028   end Initialize_1063;
19029
19030   ---------------------
19031   -- Initialize_1064 --
19032   ---------------------
19033
19034   procedure Initialize_1064 is
19035   begin
19036      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19037       (Base + 1064,
19038        AMF.Internals.Tables.UML_String_Data_00.MS_00DF'Access);
19039      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1064, (Is_Empty => True));
19040   end Initialize_1064;
19041
19042   ---------------------
19043   -- Initialize_1065 --
19044   ---------------------
19045
19046   procedure Initialize_1065 is
19047   begin
19048      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19049       (Base + 1065,
19050        AMF.Internals.Tables.UML_String_Data_08.MS_0887'Access);
19051      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1065, (Is_Empty => True));
19052   end Initialize_1065;
19053
19054   ---------------------
19055   -- Initialize_1066 --
19056   ---------------------
19057
19058   procedure Initialize_1066 is
19059   begin
19060      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19061       (Base + 1066,
19062        AMF.Internals.Tables.UML_String_Data_0C.MS_0C12'Access);
19063      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1066, (Is_Empty => True));
19064   end Initialize_1066;
19065
19066   ---------------------
19067   -- Initialize_1067 --
19068   ---------------------
19069
19070   procedure Initialize_1067 is
19071   begin
19072      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19073       (Base + 1067,
19074        AMF.Internals.Tables.UML_String_Data_09.MS_0996'Access);
19075      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1067, (Is_Empty => True));
19076   end Initialize_1067;
19077
19078   ---------------------
19079   -- Initialize_1068 --
19080   ---------------------
19081
19082   procedure Initialize_1068 is
19083   begin
19084      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19085       (Base + 1068,
19086        AMF.Internals.Tables.UML_String_Data_05.MS_0561'Access);
19087      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1068, (Is_Empty => True));
19088   end Initialize_1068;
19089
19090   ---------------------
19091   -- Initialize_1069 --
19092   ---------------------
19093
19094   procedure Initialize_1069 is
19095   begin
19096      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19097       (Base + 1069,
19098        AMF.Internals.Tables.UML_String_Data_08.MS_08E0'Access);
19099      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1069, (Is_Empty => True));
19100   end Initialize_1069;
19101
19102   ---------------------
19103   -- Initialize_1070 --
19104   ---------------------
19105
19106   procedure Initialize_1070 is
19107   begin
19108      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19109       (Base + 1070,
19110        AMF.Internals.Tables.UML_String_Data_05.MS_0510'Access);
19111      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1070, (Is_Empty => True));
19112   end Initialize_1070;
19113
19114   ---------------------
19115   -- Initialize_1071 --
19116   ---------------------
19117
19118   procedure Initialize_1071 is
19119   begin
19120      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19121       (Base + 1071,
19122        AMF.Internals.Tables.UML_String_Data_01.MS_01CB'Access);
19123      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1071, (Is_Empty => True));
19124   end Initialize_1071;
19125
19126   ---------------------
19127   -- Initialize_1072 --
19128   ---------------------
19129
19130   procedure Initialize_1072 is
19131   begin
19132      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19133       (Base + 1072,
19134        AMF.Internals.Tables.UML_String_Data_0B.MS_0BF7'Access);
19135      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1072, (Is_Empty => True));
19136   end Initialize_1072;
19137
19138   ---------------------
19139   -- Initialize_1073 --
19140   ---------------------
19141
19142   procedure Initialize_1073 is
19143   begin
19144      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19145       (Base + 1073,
19146        AMF.Internals.Tables.UML_String_Data_07.MS_0775'Access);
19147      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1073, (Is_Empty => True));
19148   end Initialize_1073;
19149
19150   ---------------------
19151   -- Initialize_1074 --
19152   ---------------------
19153
19154   procedure Initialize_1074 is
19155   begin
19156      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19157       (Base + 1074,
19158        AMF.Internals.Tables.UML_String_Data_0C.MS_0C04'Access);
19159      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1074, (Is_Empty => True));
19160   end Initialize_1074;
19161
19162   ---------------------
19163   -- Initialize_1075 --
19164   ---------------------
19165
19166   procedure Initialize_1075 is
19167   begin
19168      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19169       (Base + 1075,
19170        AMF.Internals.Tables.UML_String_Data_0B.MS_0BAC'Access);
19171      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1075, (Is_Empty => True));
19172   end Initialize_1075;
19173
19174   ---------------------
19175   -- Initialize_1076 --
19176   ---------------------
19177
19178   procedure Initialize_1076 is
19179   begin
19180      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19181       (Base + 1076,
19182        AMF.Internals.Tables.UML_String_Data_05.MS_050F'Access);
19183      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1076, (Is_Empty => True));
19184   end Initialize_1076;
19185
19186   ---------------------
19187   -- Initialize_1077 --
19188   ---------------------
19189
19190   procedure Initialize_1077 is
19191   begin
19192      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19193       (Base + 1077,
19194        AMF.Internals.Tables.UML_String_Data_00.MS_00CE'Access);
19195      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1077, (Is_Empty => True));
19196   end Initialize_1077;
19197
19198   ---------------------
19199   -- Initialize_1078 --
19200   ---------------------
19201
19202   procedure Initialize_1078 is
19203   begin
19204      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19205       (Base + 1078,
19206        AMF.Internals.Tables.UML_String_Data_05.MS_055C'Access);
19207      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1078, (Is_Empty => True));
19208   end Initialize_1078;
19209
19210   ---------------------
19211   -- Initialize_1079 --
19212   ---------------------
19213
19214   procedure Initialize_1079 is
19215   begin
19216      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19217       (Base + 1079,
19218        AMF.Internals.Tables.UML_String_Data_07.MS_070C'Access);
19219      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1079, (Is_Empty => True));
19220   end Initialize_1079;
19221
19222   ---------------------
19223   -- Initialize_1080 --
19224   ---------------------
19225
19226   procedure Initialize_1080 is
19227   begin
19228      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19229       (Base + 1080,
19230        AMF.Internals.Tables.UML_String_Data_09.MS_097D'Access);
19231      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1080, (Is_Empty => True));
19232   end Initialize_1080;
19233
19234   ---------------------
19235   -- Initialize_1081 --
19236   ---------------------
19237
19238   procedure Initialize_1081 is
19239   begin
19240      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19241       (Base + 1081,
19242        AMF.Internals.Tables.UML_String_Data_08.MS_082C'Access);
19243      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1081, (Is_Empty => True));
19244   end Initialize_1081;
19245
19246   ---------------------
19247   -- Initialize_1082 --
19248   ---------------------
19249
19250   procedure Initialize_1082 is
19251   begin
19252      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19253       (Base + 1082,
19254        AMF.Internals.Tables.UML_String_Data_00.MS_00CF'Access);
19255      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1082, (Is_Empty => True));
19256   end Initialize_1082;
19257
19258   ---------------------
19259   -- Initialize_1083 --
19260   ---------------------
19261
19262   procedure Initialize_1083 is
19263   begin
19264      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 1083, True);
19265      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19266       (Base + 1083,
19267        AMF.Internals.Tables.UML_String_Data_05.MS_050B'Access);
19268      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1083, (Is_Empty => True));
19269   end Initialize_1083;
19270
19271   ---------------------
19272   -- Initialize_1084 --
19273   ---------------------
19274
19275   procedure Initialize_1084 is
19276   begin
19277      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19278       (Base + 1084,
19279        AMF.Internals.Tables.UML_String_Data_04.MS_0481'Access);
19280      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1084, (Is_Empty => True));
19281   end Initialize_1084;
19282
19283   ---------------------
19284   -- Initialize_1085 --
19285   ---------------------
19286
19287   procedure Initialize_1085 is
19288   begin
19289      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19290       (Base + 1085,
19291        AMF.Internals.Tables.UML_String_Data_03.MS_037D'Access);
19292      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1085, (Is_Empty => True));
19293   end Initialize_1085;
19294
19295   ---------------------
19296   -- Initialize_1086 --
19297   ---------------------
19298
19299   procedure Initialize_1086 is
19300   begin
19301      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19302       (Base + 1086,
19303        AMF.Internals.Tables.UML_String_Data_06.MS_0684'Access);
19304      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1086, (Is_Empty => True));
19305   end Initialize_1086;
19306
19307   ---------------------
19308   -- Initialize_1087 --
19309   ---------------------
19310
19311   procedure Initialize_1087 is
19312   begin
19313      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19314       (Base + 1087,
19315        AMF.Internals.Tables.UML_String_Data_02.MS_02AE'Access);
19316      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1087, (Is_Empty => True));
19317   end Initialize_1087;
19318
19319   ---------------------
19320   -- Initialize_1088 --
19321   ---------------------
19322
19323   procedure Initialize_1088 is
19324   begin
19325      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 1088, True);
19326      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19327       (Base + 1088,
19328        AMF.Internals.Tables.UML_String_Data_06.MS_06D6'Access);
19329      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1088, (Is_Empty => True));
19330   end Initialize_1088;
19331
19332   ---------------------
19333   -- Initialize_1089 --
19334   ---------------------
19335
19336   procedure Initialize_1089 is
19337   begin
19338      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19339       (Base + 1089,
19340        AMF.Internals.Tables.UML_String_Data_00.MS_008E'Access);
19341      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1089, (Is_Empty => True));
19342   end Initialize_1089;
19343
19344   ---------------------
19345   -- Initialize_1090 --
19346   ---------------------
19347
19348   procedure Initialize_1090 is
19349   begin
19350      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19351       (Base + 1090,
19352        AMF.Internals.Tables.UML_String_Data_05.MS_0570'Access);
19353      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1090, (Is_Empty => True));
19354   end Initialize_1090;
19355
19356   ---------------------
19357   -- Initialize_1091 --
19358   ---------------------
19359
19360   procedure Initialize_1091 is
19361   begin
19362      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19363       (Base + 1091,
19364        AMF.Internals.Tables.UML_String_Data_08.MS_082D'Access);
19365      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1091, (Is_Empty => True));
19366   end Initialize_1091;
19367
19368   ---------------------
19369   -- Initialize_1092 --
19370   ---------------------
19371
19372   procedure Initialize_1092 is
19373   begin
19374      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19375       (Base + 1092,
19376        AMF.Internals.Tables.UML_String_Data_01.MS_0173'Access);
19377      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1092, (Is_Empty => True));
19378   end Initialize_1092;
19379
19380   ---------------------
19381   -- Initialize_1093 --
19382   ---------------------
19383
19384   procedure Initialize_1093 is
19385   begin
19386      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19387       (Base + 1093,
19388        AMF.Internals.Tables.UML_String_Data_07.MS_0731'Access);
19389      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1093, (Is_Empty => True));
19390   end Initialize_1093;
19391
19392   ---------------------
19393   -- Initialize_1094 --
19394   ---------------------
19395
19396   procedure Initialize_1094 is
19397   begin
19398      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19399       (Base + 1094,
19400        AMF.Internals.Tables.UML_String_Data_01.MS_0181'Access);
19401      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1094, (Is_Empty => True));
19402   end Initialize_1094;
19403
19404   ---------------------
19405   -- Initialize_1095 --
19406   ---------------------
19407
19408   procedure Initialize_1095 is
19409   begin
19410      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19411       (Base + 1095,
19412        AMF.Internals.Tables.UML_String_Data_0C.MS_0C11'Access);
19413      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1095, (Is_Empty => True));
19414   end Initialize_1095;
19415
19416   ---------------------
19417   -- Initialize_1096 --
19418   ---------------------
19419
19420   procedure Initialize_1096 is
19421   begin
19422      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19423       (Base + 1096,
19424        AMF.Internals.Tables.UML_String_Data_0B.MS_0B75'Access);
19425      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1096, (Is_Empty => True));
19426   end Initialize_1096;
19427
19428   ---------------------
19429   -- Initialize_1097 --
19430   ---------------------
19431
19432   procedure Initialize_1097 is
19433   begin
19434      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19435       (Base + 1097,
19436        AMF.Internals.Tables.UML_String_Data_00.MS_002B'Access);
19437      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1097, (Is_Empty => True));
19438   end Initialize_1097;
19439
19440   ---------------------
19441   -- Initialize_1098 --
19442   ---------------------
19443
19444   procedure Initialize_1098 is
19445   begin
19446      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19447       (Base + 1098,
19448        AMF.Internals.Tables.UML_String_Data_00.MS_0064'Access);
19449      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1098, (Is_Empty => True));
19450   end Initialize_1098;
19451
19452   ---------------------
19453   -- Initialize_1099 --
19454   ---------------------
19455
19456   procedure Initialize_1099 is
19457   begin
19458      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19459       (Base + 1099,
19460        AMF.Internals.Tables.UML_String_Data_08.MS_0872'Access);
19461      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1099, (Is_Empty => True));
19462   end Initialize_1099;
19463
19464   ---------------------
19465   -- Initialize_1100 --
19466   ---------------------
19467
19468   procedure Initialize_1100 is
19469   begin
19470      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 1100, True);
19471      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19472       (Base + 1100,
19473        AMF.Internals.Tables.UML_String_Data_03.MS_0342'Access);
19474      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1100, (Is_Empty => True));
19475   end Initialize_1100;
19476
19477   ---------------------
19478   -- Initialize_1101 --
19479   ---------------------
19480
19481   procedure Initialize_1101 is
19482   begin
19483      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19484       (Base + 1101,
19485        AMF.Internals.Tables.UML_String_Data_00.MS_0068'Access);
19486      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1101, (Is_Empty => True));
19487   end Initialize_1101;
19488
19489   ---------------------
19490   -- Initialize_1102 --
19491   ---------------------
19492
19493   procedure Initialize_1102 is
19494   begin
19495      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19496       (Base + 1102,
19497        AMF.Internals.Tables.UML_String_Data_00.MS_00D5'Access);
19498      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1102, (Is_Empty => True));
19499   end Initialize_1102;
19500
19501   ---------------------
19502   -- Initialize_1103 --
19503   ---------------------
19504
19505   procedure Initialize_1103 is
19506   begin
19507      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19508       (Base + 1103,
19509        AMF.Internals.Tables.UML_String_Data_00.MS_00F3'Access);
19510      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1103, (Is_Empty => True));
19511   end Initialize_1103;
19512
19513   ---------------------
19514   -- Initialize_1104 --
19515   ---------------------
19516
19517   procedure Initialize_1104 is
19518   begin
19519      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 1104, True);
19520      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19521       (Base + 1104,
19522        AMF.Internals.Tables.UML_String_Data_08.MS_08EF'Access);
19523      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1104, (Is_Empty => True));
19524   end Initialize_1104;
19525
19526   ---------------------
19527   -- Initialize_1105 --
19528   ---------------------
19529
19530   procedure Initialize_1105 is
19531   begin
19532      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19533       (Base + 1105,
19534        AMF.Internals.Tables.UML_String_Data_09.MS_0954'Access);
19535      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1105, (Is_Empty => True));
19536   end Initialize_1105;
19537
19538   ---------------------
19539   -- Initialize_1106 --
19540   ---------------------
19541
19542   procedure Initialize_1106 is
19543   begin
19544      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19545       (Base + 1106,
19546        AMF.Internals.Tables.UML_String_Data_07.MS_0796'Access);
19547      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1106, (Is_Empty => True));
19548   end Initialize_1106;
19549
19550   ---------------------
19551   -- Initialize_1107 --
19552   ---------------------
19553
19554   procedure Initialize_1107 is
19555   begin
19556      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19557       (Base + 1107,
19558        AMF.Internals.Tables.UML_String_Data_05.MS_0525'Access);
19559      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1107, (Is_Empty => True));
19560   end Initialize_1107;
19561
19562   ---------------------
19563   -- Initialize_1108 --
19564   ---------------------
19565
19566   procedure Initialize_1108 is
19567   begin
19568      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19569       (Base + 1108,
19570        AMF.Internals.Tables.UML_String_Data_01.MS_0167'Access);
19571      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1108, (Is_Empty => True));
19572   end Initialize_1108;
19573
19574   ---------------------
19575   -- Initialize_1109 --
19576   ---------------------
19577
19578   procedure Initialize_1109 is
19579   begin
19580      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19581       (Base + 1109,
19582        AMF.Internals.Tables.UML_String_Data_09.MS_090A'Access);
19583      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1109, (Is_Empty => True));
19584   end Initialize_1109;
19585
19586   ---------------------
19587   -- Initialize_1110 --
19588   ---------------------
19589
19590   procedure Initialize_1110 is
19591   begin
19592      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19593       (Base + 1110,
19594        AMF.Internals.Tables.UML_String_Data_01.MS_013A'Access);
19595      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1110, (Is_Empty => True));
19596   end Initialize_1110;
19597
19598   ---------------------
19599   -- Initialize_1111 --
19600   ---------------------
19601
19602   procedure Initialize_1111 is
19603   begin
19604      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19605       (Base + 1111,
19606        AMF.Internals.Tables.UML_String_Data_06.MS_06C5'Access);
19607      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1111, (Is_Empty => True));
19608   end Initialize_1111;
19609
19610   ---------------------
19611   -- Initialize_1112 --
19612   ---------------------
19613
19614   procedure Initialize_1112 is
19615   begin
19616      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19617       (Base + 1112,
19618        AMF.Internals.Tables.UML_String_Data_0B.MS_0B60'Access);
19619      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1112, (Is_Empty => True));
19620   end Initialize_1112;
19621
19622   ---------------------
19623   -- Initialize_1113 --
19624   ---------------------
19625
19626   procedure Initialize_1113 is
19627   begin
19628      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19629       (Base + 1113,
19630        AMF.Internals.Tables.UML_String_Data_00.MS_0050'Access);
19631      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1113, (Is_Empty => True));
19632   end Initialize_1113;
19633
19634   ---------------------
19635   -- Initialize_1114 --
19636   ---------------------
19637
19638   procedure Initialize_1114 is
19639   begin
19640      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19641       (Base + 1114,
19642        AMF.Internals.Tables.UML_String_Data_08.MS_0899'Access);
19643      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1114, (Is_Empty => True));
19644   end Initialize_1114;
19645
19646   ---------------------
19647   -- Initialize_1115 --
19648   ---------------------
19649
19650   procedure Initialize_1115 is
19651   begin
19652      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19653       (Base + 1115,
19654        AMF.Internals.Tables.UML_String_Data_04.MS_0497'Access);
19655      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1115, (Is_Empty => True));
19656   end Initialize_1115;
19657
19658   ---------------------
19659   -- Initialize_1116 --
19660   ---------------------
19661
19662   procedure Initialize_1116 is
19663   begin
19664      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 1116, True);
19665      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19666       (Base + 1116,
19667        AMF.Internals.Tables.UML_String_Data_08.MS_0862'Access);
19668      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1116, (Is_Empty => True));
19669   end Initialize_1116;
19670
19671   ---------------------
19672   -- Initialize_1117 --
19673   ---------------------
19674
19675   procedure Initialize_1117 is
19676   begin
19677      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19678       (Base + 1117,
19679        AMF.Internals.Tables.UML_String_Data_0C.MS_0C23'Access);
19680      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1117, (Is_Empty => True));
19681   end Initialize_1117;
19682
19683   ---------------------
19684   -- Initialize_1118 --
19685   ---------------------
19686
19687   procedure Initialize_1118 is
19688   begin
19689      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19690       (Base + 1118,
19691        AMF.Internals.Tables.UML_String_Data_01.MS_016A'Access);
19692      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1118, (Is_Empty => True));
19693   end Initialize_1118;
19694
19695   ---------------------
19696   -- Initialize_1119 --
19697   ---------------------
19698
19699   procedure Initialize_1119 is
19700   begin
19701      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19702       (Base + 1119,
19703        AMF.Internals.Tables.UML_String_Data_06.MS_0619'Access);
19704      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1119, (Is_Empty => True));
19705   end Initialize_1119;
19706
19707   ---------------------
19708   -- Initialize_1120 --
19709   ---------------------
19710
19711   procedure Initialize_1120 is
19712   begin
19713      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 1120, True);
19714      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19715       (Base + 1120,
19716        AMF.Internals.Tables.UML_String_Data_0B.MS_0B6B'Access);
19717      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1120, (Is_Empty => True));
19718   end Initialize_1120;
19719
19720   ---------------------
19721   -- Initialize_1121 --
19722   ---------------------
19723
19724   procedure Initialize_1121 is
19725   begin
19726      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19727       (Base + 1121,
19728        AMF.Internals.Tables.UML_String_Data_00.MS_0014'Access);
19729      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1121, (Is_Empty => True));
19730   end Initialize_1121;
19731
19732   ---------------------
19733   -- Initialize_1122 --
19734   ---------------------
19735
19736   procedure Initialize_1122 is
19737   begin
19738      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19739       (Base + 1122,
19740        AMF.Internals.Tables.UML_String_Data_08.MS_08B5'Access);
19741      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1122, (Is_Empty => True));
19742   end Initialize_1122;
19743
19744   ---------------------
19745   -- Initialize_1123 --
19746   ---------------------
19747
19748   procedure Initialize_1123 is
19749   begin
19750      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19751       (Base + 1123,
19752        AMF.Internals.Tables.UML_String_Data_02.MS_0262'Access);
19753      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1123, (Is_Empty => True));
19754   end Initialize_1123;
19755
19756   ---------------------
19757   -- Initialize_1124 --
19758   ---------------------
19759
19760   procedure Initialize_1124 is
19761   begin
19762      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19763       (Base + 1124,
19764        AMF.Internals.Tables.UML_String_Data_0A.MS_0A7A'Access);
19765      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1124, (Is_Empty => True));
19766   end Initialize_1124;
19767
19768   ---------------------
19769   -- Initialize_1125 --
19770   ---------------------
19771
19772   procedure Initialize_1125 is
19773   begin
19774      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19775       (Base + 1125,
19776        AMF.Internals.Tables.UML_String_Data_01.MS_01FD'Access);
19777      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1125, (Is_Empty => True));
19778   end Initialize_1125;
19779
19780   ---------------------
19781   -- Initialize_1126 --
19782   ---------------------
19783
19784   procedure Initialize_1126 is
19785   begin
19786      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19787       (Base + 1126,
19788        AMF.Internals.Tables.UML_String_Data_02.MS_024D'Access);
19789      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1126, (Is_Empty => True));
19790   end Initialize_1126;
19791
19792   ---------------------
19793   -- Initialize_1127 --
19794   ---------------------
19795
19796   procedure Initialize_1127 is
19797   begin
19798      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19799       (Base + 1127,
19800        AMF.Internals.Tables.UML_String_Data_0A.MS_0AC9'Access);
19801      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1127, (Is_Empty => True));
19802   end Initialize_1127;
19803
19804   ---------------------
19805   -- Initialize_1128 --
19806   ---------------------
19807
19808   procedure Initialize_1128 is
19809   begin
19810      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19811       (Base + 1128,
19812        AMF.Internals.Tables.UML_String_Data_06.MS_06CA'Access);
19813      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1128, (Is_Empty => True));
19814   end Initialize_1128;
19815
19816   ---------------------
19817   -- Initialize_1129 --
19818   ---------------------
19819
19820   procedure Initialize_1129 is
19821   begin
19822      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19823       (Base + 1129,
19824        AMF.Internals.Tables.UML_String_Data_0B.MS_0BB0'Access);
19825      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1129, (Is_Empty => True));
19826   end Initialize_1129;
19827
19828   ---------------------
19829   -- Initialize_1130 --
19830   ---------------------
19831
19832   procedure Initialize_1130 is
19833   begin
19834      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19835       (Base + 1130,
19836        AMF.Internals.Tables.UML_String_Data_00.MS_00F8'Access);
19837      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1130, (Is_Empty => True));
19838   end Initialize_1130;
19839
19840   ---------------------
19841   -- Initialize_1131 --
19842   ---------------------
19843
19844   procedure Initialize_1131 is
19845   begin
19846      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19847       (Base + 1131,
19848        AMF.Internals.Tables.UML_String_Data_09.MS_0964'Access);
19849      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1131, (Is_Empty => True));
19850   end Initialize_1131;
19851
19852   ---------------------
19853   -- Initialize_1132 --
19854   ---------------------
19855
19856   procedure Initialize_1132 is
19857   begin
19858      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19859       (Base + 1132,
19860        AMF.Internals.Tables.UML_String_Data_09.MS_09C4'Access);
19861      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1132, (Is_Empty => True));
19862   end Initialize_1132;
19863
19864   ---------------------
19865   -- Initialize_1133 --
19866   ---------------------
19867
19868   procedure Initialize_1133 is
19869   begin
19870      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19871       (Base + 1133,
19872        AMF.Internals.Tables.UML_String_Data_0A.MS_0A1B'Access);
19873      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1133, (Is_Empty => True));
19874   end Initialize_1133;
19875
19876   ---------------------
19877   -- Initialize_1134 --
19878   ---------------------
19879
19880   procedure Initialize_1134 is
19881   begin
19882      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19883       (Base + 1134,
19884        AMF.Internals.Tables.UML_String_Data_04.MS_04E6'Access);
19885      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1134, (Is_Empty => True));
19886   end Initialize_1134;
19887
19888   ---------------------
19889   -- Initialize_1135 --
19890   ---------------------
19891
19892   procedure Initialize_1135 is
19893   begin
19894      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 1135, True);
19895      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19896       (Base + 1135,
19897        AMF.Internals.Tables.UML_String_Data_03.MS_03F3'Access);
19898      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1135, (Is_Empty => True));
19899   end Initialize_1135;
19900
19901   ---------------------
19902   -- Initialize_1136 --
19903   ---------------------
19904
19905   procedure Initialize_1136 is
19906   begin
19907      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19908       (Base + 1136,
19909        AMF.Internals.Tables.UML_String_Data_09.MS_09D9'Access);
19910      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1136, (Is_Empty => True));
19911   end Initialize_1136;
19912
19913   ---------------------
19914   -- Initialize_1137 --
19915   ---------------------
19916
19917   procedure Initialize_1137 is
19918   begin
19919      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19920       (Base + 1137,
19921        AMF.Internals.Tables.UML_String_Data_06.MS_060D'Access);
19922      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1137, (Is_Empty => True));
19923   end Initialize_1137;
19924
19925   ---------------------
19926   -- Initialize_1138 --
19927   ---------------------
19928
19929   procedure Initialize_1138 is
19930   begin
19931      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19932       (Base + 1138,
19933        AMF.Internals.Tables.UML_String_Data_08.MS_08E1'Access);
19934      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1138, (Is_Empty => True));
19935   end Initialize_1138;
19936
19937   ---------------------
19938   -- Initialize_1139 --
19939   ---------------------
19940
19941   procedure Initialize_1139 is
19942   begin
19943      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19944       (Base + 1139,
19945        AMF.Internals.Tables.UML_String_Data_0B.MS_0B87'Access);
19946      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1139, (Is_Empty => True));
19947   end Initialize_1139;
19948
19949   ---------------------
19950   -- Initialize_1140 --
19951   ---------------------
19952
19953   procedure Initialize_1140 is
19954   begin
19955      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19956       (Base + 1140,
19957        AMF.Internals.Tables.UML_String_Data_0B.MS_0B54'Access);
19958      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1140, (Is_Empty => True));
19959   end Initialize_1140;
19960
19961   ---------------------
19962   -- Initialize_1141 --
19963   ---------------------
19964
19965   procedure Initialize_1141 is
19966   begin
19967      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19968       (Base + 1141,
19969        AMF.Internals.Tables.UML_String_Data_06.MS_06FE'Access);
19970      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1141, (Is_Empty => True));
19971   end Initialize_1141;
19972
19973   ---------------------
19974   -- Initialize_1142 --
19975   ---------------------
19976
19977   procedure Initialize_1142 is
19978   begin
19979      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19980       (Base + 1142,
19981        AMF.Internals.Tables.UML_String_Data_08.MS_0801'Access);
19982      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1142, (Is_Empty => True));
19983   end Initialize_1142;
19984
19985   ---------------------
19986   -- Initialize_1143 --
19987   ---------------------
19988
19989   procedure Initialize_1143 is
19990   begin
19991      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
19992       (Base + 1143,
19993        AMF.Internals.Tables.UML_String_Data_07.MS_07B1'Access);
19994      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1143, (Is_Empty => True));
19995   end Initialize_1143;
19996
19997   ---------------------
19998   -- Initialize_1144 --
19999   ---------------------
20000
20001   procedure Initialize_1144 is
20002   begin
20003      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20004       (Base + 1144,
20005        AMF.Internals.Tables.UML_String_Data_0C.MS_0C84'Access);
20006      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1144, (Is_Empty => True));
20007   end Initialize_1144;
20008
20009   ---------------------
20010   -- Initialize_1145 --
20011   ---------------------
20012
20013   procedure Initialize_1145 is
20014   begin
20015      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20016       (Base + 1145,
20017        AMF.Internals.Tables.UML_String_Data_05.MS_05E6'Access);
20018      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1145, (Is_Empty => True));
20019   end Initialize_1145;
20020
20021   ---------------------
20022   -- Initialize_1146 --
20023   ---------------------
20024
20025   procedure Initialize_1146 is
20026   begin
20027      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20028       (Base + 1146,
20029        AMF.Internals.Tables.UML_String_Data_0A.MS_0AEE'Access);
20030      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1146, (Is_Empty => True));
20031   end Initialize_1146;
20032
20033   ---------------------
20034   -- Initialize_1147 --
20035   ---------------------
20036
20037   procedure Initialize_1147 is
20038   begin
20039      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 1147, True);
20040      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20041       (Base + 1147,
20042        AMF.Internals.Tables.UML_String_Data_03.MS_03B5'Access);
20043      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1147, (Is_Empty => True));
20044   end Initialize_1147;
20045
20046   ---------------------
20047   -- Initialize_1148 --
20048   ---------------------
20049
20050   procedure Initialize_1148 is
20051   begin
20052      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20053       (Base + 1148,
20054        AMF.Internals.Tables.UML_String_Data_06.MS_06B1'Access);
20055      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1148, (Is_Empty => True));
20056   end Initialize_1148;
20057
20058   ---------------------
20059   -- Initialize_1149 --
20060   ---------------------
20061
20062   procedure Initialize_1149 is
20063   begin
20064      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20065       (Base + 1149,
20066        AMF.Internals.Tables.UML_String_Data_0C.MS_0C29'Access);
20067      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1149, (Is_Empty => True));
20068   end Initialize_1149;
20069
20070   ---------------------
20071   -- Initialize_1150 --
20072   ---------------------
20073
20074   procedure Initialize_1150 is
20075   begin
20076      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 1150, True);
20077      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20078       (Base + 1150,
20079        AMF.Internals.Tables.UML_String_Data_0C.MS_0C57'Access);
20080      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1150, (Is_Empty => True));
20081   end Initialize_1150;
20082
20083   ---------------------
20084   -- Initialize_1151 --
20085   ---------------------
20086
20087   procedure Initialize_1151 is
20088   begin
20089      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 1151, True);
20090      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20091       (Base + 1151,
20092        AMF.Internals.Tables.UML_String_Data_0C.MS_0C40'Access);
20093      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1151, (Is_Empty => True));
20094   end Initialize_1151;
20095
20096   ---------------------
20097   -- Initialize_1152 --
20098   ---------------------
20099
20100   procedure Initialize_1152 is
20101   begin
20102      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20103       (Base + 1152,
20104        AMF.Internals.Tables.UML_String_Data_0C.MS_0C13'Access);
20105      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1152, (Is_Empty => True));
20106   end Initialize_1152;
20107
20108   ---------------------
20109   -- Initialize_1153 --
20110   ---------------------
20111
20112   procedure Initialize_1153 is
20113   begin
20114      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20115       (Base + 1153,
20116        AMF.Internals.Tables.UML_String_Data_0A.MS_0A3E'Access);
20117      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1153, (Is_Empty => True));
20118   end Initialize_1153;
20119
20120   ---------------------
20121   -- Initialize_1154 --
20122   ---------------------
20123
20124   procedure Initialize_1154 is
20125   begin
20126      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20127       (Base + 1154,
20128        AMF.Internals.Tables.UML_String_Data_08.MS_0807'Access);
20129      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1154, (Is_Empty => True));
20130   end Initialize_1154;
20131
20132   ---------------------
20133   -- Initialize_1155 --
20134   ---------------------
20135
20136   procedure Initialize_1155 is
20137   begin
20138      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20139       (Base + 1155,
20140        AMF.Internals.Tables.UML_String_Data_00.MS_00A5'Access);
20141      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1155, (Is_Empty => True));
20142   end Initialize_1155;
20143
20144   ---------------------
20145   -- Initialize_1156 --
20146   ---------------------
20147
20148   procedure Initialize_1156 is
20149   begin
20150      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20151       (Base + 1156,
20152        AMF.Internals.Tables.UML_String_Data_05.MS_050D'Access);
20153      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1156, (Is_Empty => True));
20154   end Initialize_1156;
20155
20156   ---------------------
20157   -- Initialize_1157 --
20158   ---------------------
20159
20160   procedure Initialize_1157 is
20161   begin
20162      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20163       (Base + 1157,
20164        AMF.Internals.Tables.UML_String_Data_0A.MS_0A01'Access);
20165      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1157, (Is_Empty => True));
20166   end Initialize_1157;
20167
20168   ---------------------
20169   -- Initialize_1158 --
20170   ---------------------
20171
20172   procedure Initialize_1158 is
20173   begin
20174      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20175       (Base + 1158,
20176        AMF.Internals.Tables.UML_String_Data_05.MS_05C2'Access);
20177      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1158, (Is_Empty => True));
20178   end Initialize_1158;
20179
20180   ---------------------
20181   -- Initialize_1159 --
20182   ---------------------
20183
20184   procedure Initialize_1159 is
20185   begin
20186      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20187       (Base + 1159,
20188        AMF.Internals.Tables.UML_String_Data_07.MS_07A2'Access);
20189      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1159, (Is_Empty => True));
20190   end Initialize_1159;
20191
20192   ---------------------
20193   -- Initialize_1160 --
20194   ---------------------
20195
20196   procedure Initialize_1160 is
20197   begin
20198      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20199       (Base + 1160,
20200        AMF.Internals.Tables.UML_String_Data_05.MS_05B2'Access);
20201      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1160, (Is_Empty => True));
20202   end Initialize_1160;
20203
20204   ---------------------
20205   -- Initialize_1161 --
20206   ---------------------
20207
20208   procedure Initialize_1161 is
20209   begin
20210      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20211       (Base + 1161,
20212        AMF.Internals.Tables.UML_String_Data_0C.MS_0C10'Access);
20213      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1161, (Is_Empty => True));
20214   end Initialize_1161;
20215
20216   ---------------------
20217   -- Initialize_1162 --
20218   ---------------------
20219
20220   procedure Initialize_1162 is
20221   begin
20222      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20223       (Base + 1162,
20224        AMF.Internals.Tables.UML_String_Data_0B.MS_0B9F'Access);
20225      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1162, (Is_Empty => True));
20226   end Initialize_1162;
20227
20228   ---------------------
20229   -- Initialize_1163 --
20230   ---------------------
20231
20232   procedure Initialize_1163 is
20233   begin
20234      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20235       (Base + 1163,
20236        AMF.Internals.Tables.UML_String_Data_03.MS_0339'Access);
20237      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1163, (Is_Empty => True));
20238   end Initialize_1163;
20239
20240   ---------------------
20241   -- Initialize_1164 --
20242   ---------------------
20243
20244   procedure Initialize_1164 is
20245   begin
20246      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20247       (Base + 1164,
20248        AMF.Internals.Tables.UML_String_Data_02.MS_0293'Access);
20249      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1164, (Is_Empty => True));
20250   end Initialize_1164;
20251
20252   ---------------------
20253   -- Initialize_1165 --
20254   ---------------------
20255
20256   procedure Initialize_1165 is
20257   begin
20258      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20259       (Base + 1165,
20260        AMF.Internals.Tables.UML_String_Data_06.MS_06AF'Access);
20261      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1165, (Is_Empty => True));
20262   end Initialize_1165;
20263
20264   ---------------------
20265   -- Initialize_1166 --
20266   ---------------------
20267
20268   procedure Initialize_1166 is
20269   begin
20270      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20271       (Base + 1166,
20272        AMF.Internals.Tables.UML_String_Data_03.MS_03C2'Access);
20273      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1166, (Is_Empty => True));
20274   end Initialize_1166;
20275
20276   ---------------------
20277   -- Initialize_1167 --
20278   ---------------------
20279
20280   procedure Initialize_1167 is
20281   begin
20282      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20283       (Base + 1167,
20284        AMF.Internals.Tables.UML_String_Data_00.MS_0083'Access);
20285      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1167, (Is_Empty => True));
20286   end Initialize_1167;
20287
20288   ---------------------
20289   -- Initialize_1168 --
20290   ---------------------
20291
20292   procedure Initialize_1168 is
20293   begin
20294      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20295       (Base + 1168,
20296        AMF.Internals.Tables.UML_String_Data_0B.MS_0BA1'Access);
20297      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1168, (Is_Empty => True));
20298   end Initialize_1168;
20299
20300   ---------------------
20301   -- Initialize_1169 --
20302   ---------------------
20303
20304   procedure Initialize_1169 is
20305   begin
20306      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 1169, True);
20307      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20308       (Base + 1169,
20309        AMF.Internals.Tables.UML_String_Data_08.MS_0851'Access);
20310      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1169, (Is_Empty => True));
20311   end Initialize_1169;
20312
20313   ---------------------
20314   -- Initialize_1170 --
20315   ---------------------
20316
20317   procedure Initialize_1170 is
20318   begin
20319      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20320       (Base + 1170,
20321        AMF.Internals.Tables.UML_String_Data_01.MS_01FE'Access);
20322      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1170, (Is_Empty => True));
20323   end Initialize_1170;
20324
20325   ---------------------
20326   -- Initialize_1171 --
20327   ---------------------
20328
20329   procedure Initialize_1171 is
20330   begin
20331      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20332       (Base + 1171,
20333        AMF.Internals.Tables.UML_String_Data_01.MS_0120'Access);
20334      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1171, (Is_Empty => True));
20335   end Initialize_1171;
20336
20337   ---------------------
20338   -- Initialize_1172 --
20339   ---------------------
20340
20341   procedure Initialize_1172 is
20342   begin
20343      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20344       (Base + 1172,
20345        AMF.Internals.Tables.UML_String_Data_06.MS_0694'Access);
20346      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1172, (Is_Empty => True));
20347   end Initialize_1172;
20348
20349   ---------------------
20350   -- Initialize_1173 --
20351   ---------------------
20352
20353   procedure Initialize_1173 is
20354   begin
20355      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20356       (Base + 1173,
20357        AMF.Internals.Tables.UML_String_Data_01.MS_01D8'Access);
20358      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1173, (Is_Empty => True));
20359   end Initialize_1173;
20360
20361   ---------------------
20362   -- Initialize_1174 --
20363   ---------------------
20364
20365   procedure Initialize_1174 is
20366   begin
20367      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20368       (Base + 1174,
20369        AMF.Internals.Tables.UML_String_Data_00.MS_00C0'Access);
20370      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1174, (Is_Empty => True));
20371   end Initialize_1174;
20372
20373   ---------------------
20374   -- Initialize_1175 --
20375   ---------------------
20376
20377   procedure Initialize_1175 is
20378   begin
20379      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20380       (Base + 1175,
20381        AMF.Internals.Tables.UML_String_Data_0A.MS_0AD3'Access);
20382      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1175, (Is_Empty => True));
20383   end Initialize_1175;
20384
20385   ---------------------
20386   -- Initialize_1176 --
20387   ---------------------
20388
20389   procedure Initialize_1176 is
20390   begin
20391      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20392       (Base + 1176,
20393        AMF.Internals.Tables.UML_String_Data_0A.MS_0AA5'Access);
20394      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1176, (Is_Empty => True));
20395   end Initialize_1176;
20396
20397   ---------------------
20398   -- Initialize_1177 --
20399   ---------------------
20400
20401   procedure Initialize_1177 is
20402   begin
20403      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 1177, True);
20404      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20405       (Base + 1177,
20406        AMF.Internals.Tables.UML_String_Data_03.MS_0377'Access);
20407      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1177, (Is_Empty => True));
20408   end Initialize_1177;
20409
20410   ---------------------
20411   -- Initialize_1178 --
20412   ---------------------
20413
20414   procedure Initialize_1178 is
20415   begin
20416      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 1178, True);
20417      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20418       (Base + 1178,
20419        AMF.Internals.Tables.UML_String_Data_08.MS_08B6'Access);
20420      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1178, (Is_Empty => True));
20421   end Initialize_1178;
20422
20423   ---------------------
20424   -- Initialize_1179 --
20425   ---------------------
20426
20427   procedure Initialize_1179 is
20428   begin
20429      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 1179, True);
20430      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20431       (Base + 1179,
20432        AMF.Internals.Tables.UML_String_Data_0B.MS_0B88'Access);
20433      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1179, (Is_Empty => True));
20434   end Initialize_1179;
20435
20436   ---------------------
20437   -- Initialize_1180 --
20438   ---------------------
20439
20440   procedure Initialize_1180 is
20441   begin
20442      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 1180, True);
20443      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20444       (Base + 1180,
20445        AMF.Internals.Tables.UML_String_Data_07.MS_073D'Access);
20446      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1180, (Is_Empty => True));
20447   end Initialize_1180;
20448
20449   ---------------------
20450   -- Initialize_1181 --
20451   ---------------------
20452
20453   procedure Initialize_1181 is
20454   begin
20455      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20456       (Base + 1181,
20457        AMF.Internals.Tables.UML_String_Data_00.MS_00DC'Access);
20458      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1181, (Is_Empty => True));
20459   end Initialize_1181;
20460
20461   ---------------------
20462   -- Initialize_1182 --
20463   ---------------------
20464
20465   procedure Initialize_1182 is
20466   begin
20467      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 1182, True);
20468      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20469       (Base + 1182,
20470        AMF.Internals.Tables.UML_String_Data_08.MS_08CF'Access);
20471      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1182, (Is_Empty => True));
20472   end Initialize_1182;
20473
20474   ---------------------
20475   -- Initialize_1183 --
20476   ---------------------
20477
20478   procedure Initialize_1183 is
20479   begin
20480      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20481       (Base + 1183,
20482        AMF.Internals.Tables.UML_String_Data_09.MS_0933'Access);
20483      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1183, (Is_Empty => True));
20484   end Initialize_1183;
20485
20486   ---------------------
20487   -- Initialize_1184 --
20488   ---------------------
20489
20490   procedure Initialize_1184 is
20491   begin
20492      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20493       (Base + 1184,
20494        AMF.Internals.Tables.UML_String_Data_0B.MS_0B59'Access);
20495      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1184, (Is_Empty => True));
20496   end Initialize_1184;
20497
20498   ---------------------
20499   -- Initialize_1185 --
20500   ---------------------
20501
20502   procedure Initialize_1185 is
20503   begin
20504      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20505       (Base + 1185,
20506        AMF.Internals.Tables.UML_String_Data_08.MS_08F5'Access);
20507      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1185, (Is_Empty => True));
20508   end Initialize_1185;
20509
20510   ---------------------
20511   -- Initialize_1186 --
20512   ---------------------
20513
20514   procedure Initialize_1186 is
20515   begin
20516      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 1186, True);
20517      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20518       (Base + 1186,
20519        AMF.Internals.Tables.UML_String_Data_09.MS_09F6'Access);
20520      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1186, (Is_Empty => True));
20521   end Initialize_1186;
20522
20523   ---------------------
20524   -- Initialize_1187 --
20525   ---------------------
20526
20527   procedure Initialize_1187 is
20528   begin
20529      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20530       (Base + 1187,
20531        AMF.Internals.Tables.UML_String_Data_04.MS_042A'Access);
20532      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1187, (Is_Empty => True));
20533   end Initialize_1187;
20534
20535   ---------------------
20536   -- Initialize_1188 --
20537   ---------------------
20538
20539   procedure Initialize_1188 is
20540   begin
20541      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20542       (Base + 1188,
20543        AMF.Internals.Tables.UML_String_Data_0A.MS_0A73'Access);
20544      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1188, (Is_Empty => True));
20545   end Initialize_1188;
20546
20547   ---------------------
20548   -- Initialize_1189 --
20549   ---------------------
20550
20551   procedure Initialize_1189 is
20552   begin
20553      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20554       (Base + 1189,
20555        AMF.Internals.Tables.UML_String_Data_0A.MS_0A71'Access);
20556      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1189, (Is_Empty => True));
20557   end Initialize_1189;
20558
20559   ---------------------
20560   -- Initialize_1190 --
20561   ---------------------
20562
20563   procedure Initialize_1190 is
20564   begin
20565      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20566       (Base + 1190,
20567        AMF.Internals.Tables.UML_String_Data_09.MS_093D'Access);
20568      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1190, (Is_Empty => True));
20569   end Initialize_1190;
20570
20571   ---------------------
20572   -- Initialize_1191 --
20573   ---------------------
20574
20575   procedure Initialize_1191 is
20576   begin
20577      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20578       (Base + 1191,
20579        AMF.Internals.Tables.UML_String_Data_06.MS_068B'Access);
20580      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1191, (Is_Empty => True));
20581   end Initialize_1191;
20582
20583   ---------------------
20584   -- Initialize_1192 --
20585   ---------------------
20586
20587   procedure Initialize_1192 is
20588   begin
20589      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20590       (Base + 1192,
20591        AMF.Internals.Tables.UML_String_Data_04.MS_0411'Access);
20592      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1192, (Is_Empty => True));
20593   end Initialize_1192;
20594
20595   ---------------------
20596   -- Initialize_1193 --
20597   ---------------------
20598
20599   procedure Initialize_1193 is
20600   begin
20601      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20602       (Base + 1193,
20603        AMF.Internals.Tables.UML_String_Data_09.MS_0972'Access);
20604      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1193, (Is_Empty => True));
20605   end Initialize_1193;
20606
20607   ---------------------
20608   -- Initialize_1194 --
20609   ---------------------
20610
20611   procedure Initialize_1194 is
20612   begin
20613      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20614       (Base + 1194,
20615        AMF.Internals.Tables.UML_String_Data_0C.MS_0C3B'Access);
20616      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1194, (Is_Empty => True));
20617   end Initialize_1194;
20618
20619   ---------------------
20620   -- Initialize_1195 --
20621   ---------------------
20622
20623   procedure Initialize_1195 is
20624   begin
20625      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20626       (Base + 1195,
20627        AMF.Internals.Tables.UML_String_Data_0A.MS_0A15'Access);
20628      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1195, (Is_Empty => True));
20629   end Initialize_1195;
20630
20631   ---------------------
20632   -- Initialize_1196 --
20633   ---------------------
20634
20635   procedure Initialize_1196 is
20636   begin
20637      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 1196, True);
20638      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20639       (Base + 1196,
20640        AMF.Internals.Tables.UML_String_Data_0A.MS_0AC5'Access);
20641      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1196, (Is_Empty => True));
20642   end Initialize_1196;
20643
20644   ---------------------
20645   -- Initialize_1197 --
20646   ---------------------
20647
20648   procedure Initialize_1197 is
20649   begin
20650      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 1197, True);
20651      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20652       (Base + 1197,
20653        AMF.Internals.Tables.UML_String_Data_09.MS_0940'Access);
20654      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1197, (Is_Empty => True));
20655   end Initialize_1197;
20656
20657   ---------------------
20658   -- Initialize_1198 --
20659   ---------------------
20660
20661   procedure Initialize_1198 is
20662   begin
20663      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20664       (Base + 1198,
20665        AMF.Internals.Tables.UML_String_Data_07.MS_07BD'Access);
20666      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1198, (Is_Empty => True));
20667   end Initialize_1198;
20668
20669   ---------------------
20670   -- Initialize_1199 --
20671   ---------------------
20672
20673   procedure Initialize_1199 is
20674   begin
20675      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20676       (Base + 1199,
20677        AMF.Internals.Tables.UML_String_Data_09.MS_0922'Access);
20678      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1199, (Is_Empty => True));
20679   end Initialize_1199;
20680
20681   ---------------------
20682   -- Initialize_1200 --
20683   ---------------------
20684
20685   procedure Initialize_1200 is
20686   begin
20687      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20688       (Base + 1200,
20689        AMF.Internals.Tables.UML_String_Data_04.MS_04FE'Access);
20690      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1200, (Is_Empty => True));
20691   end Initialize_1200;
20692
20693   ---------------------
20694   -- Initialize_1201 --
20695   ---------------------
20696
20697   procedure Initialize_1201 is
20698   begin
20699      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20700       (Base + 1201,
20701        AMF.Internals.Tables.UML_String_Data_07.MS_07FD'Access);
20702      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1201, (Is_Empty => True));
20703   end Initialize_1201;
20704
20705   ---------------------
20706   -- Initialize_1202 --
20707   ---------------------
20708
20709   procedure Initialize_1202 is
20710   begin
20711      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20712       (Base + 1202,
20713        AMF.Internals.Tables.UML_String_Data_08.MS_08F1'Access);
20714      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1202, (Is_Empty => True));
20715   end Initialize_1202;
20716
20717   ---------------------
20718   -- Initialize_1203 --
20719   ---------------------
20720
20721   procedure Initialize_1203 is
20722   begin
20723      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20724       (Base + 1203,
20725        AMF.Internals.Tables.UML_String_Data_06.MS_066A'Access);
20726      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1203, (Is_Empty => True));
20727   end Initialize_1203;
20728
20729   ---------------------
20730   -- Initialize_1204 --
20731   ---------------------
20732
20733   procedure Initialize_1204 is
20734   begin
20735      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20736       (Base + 1204,
20737        AMF.Internals.Tables.UML_String_Data_02.MS_024C'Access);
20738      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1204, (Is_Empty => True));
20739   end Initialize_1204;
20740
20741   ---------------------
20742   -- Initialize_1205 --
20743   ---------------------
20744
20745   procedure Initialize_1205 is
20746   begin
20747      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 1205, True);
20748      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20749       (Base + 1205,
20750        AMF.Internals.Tables.UML_String_Data_07.MS_07F7'Access);
20751      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1205, (Is_Empty => True));
20752   end Initialize_1205;
20753
20754   ---------------------
20755   -- Initialize_1206 --
20756   ---------------------
20757
20758   procedure Initialize_1206 is
20759   begin
20760      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20761       (Base + 1206,
20762        AMF.Internals.Tables.UML_String_Data_0B.MS_0B67'Access);
20763      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1206, (Is_Empty => True));
20764   end Initialize_1206;
20765
20766   ---------------------
20767   -- Initialize_1207 --
20768   ---------------------
20769
20770   procedure Initialize_1207 is
20771   begin
20772      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20773       (Base + 1207,
20774        AMF.Internals.Tables.UML_String_Data_0B.MS_0B50'Access);
20775      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1207, (Is_Empty => True));
20776   end Initialize_1207;
20777
20778   ---------------------
20779   -- Initialize_1208 --
20780   ---------------------
20781
20782   procedure Initialize_1208 is
20783   begin
20784      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20785       (Base + 1208,
20786        AMF.Internals.Tables.UML_String_Data_0A.MS_0A5D'Access);
20787      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1208, (Is_Empty => True));
20788   end Initialize_1208;
20789
20790   ---------------------
20791   -- Initialize_1209 --
20792   ---------------------
20793
20794   procedure Initialize_1209 is
20795   begin
20796      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20797       (Base + 1209,
20798        AMF.Internals.Tables.UML_String_Data_06.MS_0608'Access);
20799      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1209, (Is_Empty => True));
20800   end Initialize_1209;
20801
20802   ---------------------
20803   -- Initialize_1210 --
20804   ---------------------
20805
20806   procedure Initialize_1210 is
20807   begin
20808      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20809       (Base + 1210,
20810        AMF.Internals.Tables.UML_String_Data_0B.MS_0BE7'Access);
20811      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1210, (Is_Empty => True));
20812   end Initialize_1210;
20813
20814   ---------------------
20815   -- Initialize_1211 --
20816   ---------------------
20817
20818   procedure Initialize_1211 is
20819   begin
20820      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20821       (Base + 1211,
20822        AMF.Internals.Tables.UML_String_Data_05.MS_052A'Access);
20823      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1211, (Is_Empty => True));
20824   end Initialize_1211;
20825
20826   ---------------------
20827   -- Initialize_1212 --
20828   ---------------------
20829
20830   procedure Initialize_1212 is
20831   begin
20832      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20833       (Base + 1212,
20834        AMF.Internals.Tables.UML_String_Data_01.MS_013F'Access);
20835      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1212, (Is_Empty => True));
20836   end Initialize_1212;
20837
20838   ---------------------
20839   -- Initialize_1213 --
20840   ---------------------
20841
20842   procedure Initialize_1213 is
20843   begin
20844      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20845       (Base + 1213,
20846        AMF.Internals.Tables.UML_String_Data_02.MS_02C4'Access);
20847      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1213, (Is_Empty => True));
20848   end Initialize_1213;
20849
20850   ---------------------
20851   -- Initialize_1214 --
20852   ---------------------
20853
20854   procedure Initialize_1214 is
20855   begin
20856      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20857       (Base + 1214,
20858        AMF.Internals.Tables.UML_String_Data_01.MS_0154'Access);
20859      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1214, (Is_Empty => True));
20860   end Initialize_1214;
20861
20862   ---------------------
20863   -- Initialize_1215 --
20864   ---------------------
20865
20866   procedure Initialize_1215 is
20867   begin
20868      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20869       (Base + 1215,
20870        AMF.Internals.Tables.UML_String_Data_07.MS_077C'Access);
20871      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1215, (Is_Empty => True));
20872   end Initialize_1215;
20873
20874   ---------------------
20875   -- Initialize_1216 --
20876   ---------------------
20877
20878   procedure Initialize_1216 is
20879   begin
20880      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20881       (Base + 1216,
20882        AMF.Internals.Tables.UML_String_Data_03.MS_0374'Access);
20883      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1216, (Is_Empty => True));
20884   end Initialize_1216;
20885
20886   ---------------------
20887   -- Initialize_1217 --
20888   ---------------------
20889
20890   procedure Initialize_1217 is
20891   begin
20892      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20893       (Base + 1217,
20894        AMF.Internals.Tables.UML_String_Data_06.MS_06B9'Access);
20895      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1217, (Is_Empty => True));
20896   end Initialize_1217;
20897
20898   ---------------------
20899   -- Initialize_1218 --
20900   ---------------------
20901
20902   procedure Initialize_1218 is
20903   begin
20904      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20905       (Base + 1218,
20906        AMF.Internals.Tables.UML_String_Data_09.MS_09AA'Access);
20907      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1218, (Is_Empty => True));
20908   end Initialize_1218;
20909
20910   ---------------------
20911   -- Initialize_1219 --
20912   ---------------------
20913
20914   procedure Initialize_1219 is
20915   begin
20916      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20917       (Base + 1219,
20918        AMF.Internals.Tables.UML_String_Data_06.MS_0689'Access);
20919      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1219, (Is_Empty => True));
20920   end Initialize_1219;
20921
20922   ---------------------
20923   -- Initialize_1220 --
20924   ---------------------
20925
20926   procedure Initialize_1220 is
20927   begin
20928      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20929       (Base + 1220,
20930        AMF.Internals.Tables.UML_String_Data_08.MS_0890'Access);
20931      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1220, (Is_Empty => True));
20932   end Initialize_1220;
20933
20934   ---------------------
20935   -- Initialize_1221 --
20936   ---------------------
20937
20938   procedure Initialize_1221 is
20939   begin
20940      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20941       (Base + 1221,
20942        AMF.Internals.Tables.UML_String_Data_02.MS_0295'Access);
20943      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1221, (Is_Empty => True));
20944   end Initialize_1221;
20945
20946   ---------------------
20947   -- Initialize_1222 --
20948   ---------------------
20949
20950   procedure Initialize_1222 is
20951   begin
20952      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20953       (Base + 1222,
20954        AMF.Internals.Tables.UML_String_Data_08.MS_08E2'Access);
20955      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1222, (Is_Empty => True));
20956   end Initialize_1222;
20957
20958   ---------------------
20959   -- Initialize_1223 --
20960   ---------------------
20961
20962   procedure Initialize_1223 is
20963   begin
20964      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20965       (Base + 1223,
20966        AMF.Internals.Tables.UML_String_Data_04.MS_04BE'Access);
20967      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1223, (Is_Empty => True));
20968   end Initialize_1223;
20969
20970   ---------------------
20971   -- Initialize_1224 --
20972   ---------------------
20973
20974   procedure Initialize_1224 is
20975   begin
20976      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 1224, True);
20977      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20978       (Base + 1224,
20979        AMF.Internals.Tables.UML_String_Data_02.MS_0201'Access);
20980      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1224, (Is_Empty => True));
20981   end Initialize_1224;
20982
20983   ---------------------
20984   -- Initialize_1225 --
20985   ---------------------
20986
20987   procedure Initialize_1225 is
20988   begin
20989      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
20990       (Base + 1225,
20991        AMF.Internals.Tables.UML_String_Data_05.MS_0515'Access);
20992      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1225, (Is_Empty => True));
20993   end Initialize_1225;
20994
20995   ---------------------
20996   -- Initialize_1226 --
20997   ---------------------
20998
20999   procedure Initialize_1226 is
21000   begin
21001      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21002       (Base + 1226,
21003        AMF.Internals.Tables.UML_String_Data_08.MS_0810'Access);
21004      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1226, (Is_Empty => True));
21005   end Initialize_1226;
21006
21007   ---------------------
21008   -- Initialize_1227 --
21009   ---------------------
21010
21011   procedure Initialize_1227 is
21012   begin
21013      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21014       (Base + 1227,
21015        AMF.Internals.Tables.UML_String_Data_03.MS_035C'Access);
21016      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1227, (Is_Empty => True));
21017   end Initialize_1227;
21018
21019   ---------------------
21020   -- Initialize_1228 --
21021   ---------------------
21022
21023   procedure Initialize_1228 is
21024   begin
21025      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21026       (Base + 1228,
21027        AMF.Internals.Tables.UML_String_Data_0A.MS_0A07'Access);
21028      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1228, (Is_Empty => True));
21029   end Initialize_1228;
21030
21031   ---------------------
21032   -- Initialize_1229 --
21033   ---------------------
21034
21035   procedure Initialize_1229 is
21036   begin
21037      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21038       (Base + 1229,
21039        AMF.Internals.Tables.UML_String_Data_01.MS_0101'Access);
21040      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1229, (Is_Empty => True));
21041   end Initialize_1229;
21042
21043   ---------------------
21044   -- Initialize_1230 --
21045   ---------------------
21046
21047   procedure Initialize_1230 is
21048   begin
21049      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21050       (Base + 1230,
21051        AMF.Internals.Tables.UML_String_Data_04.MS_04F0'Access);
21052      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1230, (Is_Empty => True));
21053   end Initialize_1230;
21054
21055   ---------------------
21056   -- Initialize_1231 --
21057   ---------------------
21058
21059   procedure Initialize_1231 is
21060   begin
21061      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21062       (Base + 1231,
21063        AMF.Internals.Tables.UML_String_Data_09.MS_0902'Access);
21064      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1231, (Is_Empty => True));
21065   end Initialize_1231;
21066
21067   ---------------------
21068   -- Initialize_1232 --
21069   ---------------------
21070
21071   procedure Initialize_1232 is
21072   begin
21073      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21074       (Base + 1232,
21075        AMF.Internals.Tables.UML_String_Data_0C.MS_0C4B'Access);
21076      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1232, (Is_Empty => True));
21077   end Initialize_1232;
21078
21079   ---------------------
21080   -- Initialize_1233 --
21081   ---------------------
21082
21083   procedure Initialize_1233 is
21084   begin
21085      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21086       (Base + 1233,
21087        AMF.Internals.Tables.UML_String_Data_00.MS_0079'Access);
21088      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1233, (Is_Empty => True));
21089   end Initialize_1233;
21090
21091   ---------------------
21092   -- Initialize_1234 --
21093   ---------------------
21094
21095   procedure Initialize_1234 is
21096   begin
21097      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21098       (Base + 1234,
21099        AMF.Internals.Tables.UML_String_Data_07.MS_07AF'Access);
21100      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1234, (Is_Empty => True));
21101   end Initialize_1234;
21102
21103   ---------------------
21104   -- Initialize_1235 --
21105   ---------------------
21106
21107   procedure Initialize_1235 is
21108   begin
21109      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21110       (Base + 1235,
21111        AMF.Internals.Tables.UML_String_Data_07.MS_0714'Access);
21112      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1235, (Is_Empty => True));
21113   end Initialize_1235;
21114
21115   ---------------------
21116   -- Initialize_1236 --
21117   ---------------------
21118
21119   procedure Initialize_1236 is
21120   begin
21121      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21122       (Base + 1236,
21123        AMF.Internals.Tables.UML_String_Data_0C.MS_0C8A'Access);
21124      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1236, (Is_Empty => True));
21125   end Initialize_1236;
21126
21127   ---------------------
21128   -- Initialize_1237 --
21129   ---------------------
21130
21131   procedure Initialize_1237 is
21132   begin
21133      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21134       (Base + 1237,
21135        AMF.Internals.Tables.UML_String_Data_03.MS_0389'Access);
21136      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1237, (Is_Empty => True));
21137   end Initialize_1237;
21138
21139   ---------------------
21140   -- Initialize_1238 --
21141   ---------------------
21142
21143   procedure Initialize_1238 is
21144   begin
21145      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 1238, True);
21146      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21147       (Base + 1238,
21148        AMF.Internals.Tables.UML_String_Data_09.MS_09C5'Access);
21149      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1238, (Is_Empty => True));
21150   end Initialize_1238;
21151
21152   ---------------------
21153   -- Initialize_1239 --
21154   ---------------------
21155
21156   procedure Initialize_1239 is
21157   begin
21158      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21159       (Base + 1239,
21160        AMF.Internals.Tables.UML_String_Data_00.MS_0040'Access);
21161      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1239, (Is_Empty => True));
21162   end Initialize_1239;
21163
21164   ---------------------
21165   -- Initialize_1240 --
21166   ---------------------
21167
21168   procedure Initialize_1240 is
21169   begin
21170      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21171       (Base + 1240,
21172        AMF.Internals.Tables.UML_String_Data_0A.MS_0AFC'Access);
21173      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1240, (Is_Empty => True));
21174   end Initialize_1240;
21175
21176   ---------------------
21177   -- Initialize_1241 --
21178   ---------------------
21179
21180   procedure Initialize_1241 is
21181   begin
21182      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21183       (Base + 1241,
21184        AMF.Internals.Tables.UML_String_Data_0A.MS_0AB4'Access);
21185      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1241, (Is_Empty => True));
21186   end Initialize_1241;
21187
21188   ---------------------
21189   -- Initialize_1242 --
21190   ---------------------
21191
21192   procedure Initialize_1242 is
21193   begin
21194      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21195       (Base + 1242,
21196        AMF.Internals.Tables.UML_String_Data_0C.MS_0C24'Access);
21197      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1242, (Is_Empty => True));
21198   end Initialize_1242;
21199
21200   ---------------------
21201   -- Initialize_1243 --
21202   ---------------------
21203
21204   procedure Initialize_1243 is
21205   begin
21206      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21207       (Base + 1243,
21208        AMF.Internals.Tables.UML_String_Data_00.MS_00D7'Access);
21209      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1243, (Is_Empty => True));
21210   end Initialize_1243;
21211
21212   ---------------------
21213   -- Initialize_1244 --
21214   ---------------------
21215
21216   procedure Initialize_1244 is
21217   begin
21218      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21219       (Base + 1244,
21220        AMF.Internals.Tables.UML_String_Data_0B.MS_0B90'Access);
21221      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1244, (Is_Empty => True));
21222   end Initialize_1244;
21223
21224   ---------------------
21225   -- Initialize_1245 --
21226   ---------------------
21227
21228   procedure Initialize_1245 is
21229   begin
21230      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21231       (Base + 1245,
21232        AMF.Internals.Tables.UML_String_Data_09.MS_0929'Access);
21233      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1245, (Is_Empty => True));
21234   end Initialize_1245;
21235
21236   ---------------------
21237   -- Initialize_1246 --
21238   ---------------------
21239
21240   procedure Initialize_1246 is
21241   begin
21242      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21243       (Base + 1246,
21244        AMF.Internals.Tables.UML_String_Data_01.MS_01DB'Access);
21245      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1246, (Is_Empty => True));
21246   end Initialize_1246;
21247
21248   ---------------------
21249   -- Initialize_1247 --
21250   ---------------------
21251
21252   procedure Initialize_1247 is
21253   begin
21254      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21255       (Base + 1247,
21256        AMF.Internals.Tables.UML_String_Data_00.MS_00D4'Access);
21257      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1247, (Is_Empty => True));
21258   end Initialize_1247;
21259
21260   ---------------------
21261   -- Initialize_1248 --
21262   ---------------------
21263
21264   procedure Initialize_1248 is
21265   begin
21266      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21267       (Base + 1248,
21268        AMF.Internals.Tables.UML_String_Data_00.MS_008B'Access);
21269      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1248, (Is_Empty => True));
21270   end Initialize_1248;
21271
21272   ---------------------
21273   -- Initialize_1249 --
21274   ---------------------
21275
21276   procedure Initialize_1249 is
21277   begin
21278      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21279       (Base + 1249,
21280        AMF.Internals.Tables.UML_String_Data_08.MS_087C'Access);
21281      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1249, (Is_Empty => True));
21282   end Initialize_1249;
21283
21284   ---------------------
21285   -- Initialize_1250 --
21286   ---------------------
21287
21288   procedure Initialize_1250 is
21289   begin
21290      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21291       (Base + 1250,
21292        AMF.Internals.Tables.UML_String_Data_02.MS_0267'Access);
21293      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1250, (Is_Empty => True));
21294   end Initialize_1250;
21295
21296   ---------------------
21297   -- Initialize_1251 --
21298   ---------------------
21299
21300   procedure Initialize_1251 is
21301   begin
21302      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 1251, True);
21303      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21304       (Base + 1251,
21305        AMF.Internals.Tables.UML_String_Data_0A.MS_0A31'Access);
21306      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1251, (Is_Empty => True));
21307   end Initialize_1251;
21308
21309   ---------------------
21310   -- Initialize_1252 --
21311   ---------------------
21312
21313   procedure Initialize_1252 is
21314   begin
21315      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21316       (Base + 1252,
21317        AMF.Internals.Tables.UML_String_Data_01.MS_018A'Access);
21318      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1252, (Is_Empty => True));
21319   end Initialize_1252;
21320
21321   ---------------------
21322   -- Initialize_1253 --
21323   ---------------------
21324
21325   procedure Initialize_1253 is
21326   begin
21327      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21328       (Base + 1253,
21329        AMF.Internals.Tables.UML_String_Data_04.MS_0445'Access);
21330      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1253, (Is_Empty => True));
21331   end Initialize_1253;
21332
21333   ---------------------
21334   -- Initialize_1254 --
21335   ---------------------
21336
21337   procedure Initialize_1254 is
21338   begin
21339      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21340       (Base + 1254,
21341        AMF.Internals.Tables.UML_String_Data_09.MS_09A2'Access);
21342      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1254, (Is_Empty => True));
21343   end Initialize_1254;
21344
21345   ---------------------
21346   -- Initialize_1255 --
21347   ---------------------
21348
21349   procedure Initialize_1255 is
21350   begin
21351      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21352       (Base + 1255,
21353        AMF.Internals.Tables.UML_String_Data_09.MS_0918'Access);
21354      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1255, (Is_Empty => True));
21355   end Initialize_1255;
21356
21357   ---------------------
21358   -- Initialize_1256 --
21359   ---------------------
21360
21361   procedure Initialize_1256 is
21362   begin
21363      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21364       (Base + 1256,
21365        AMF.Internals.Tables.UML_String_Data_01.MS_01C6'Access);
21366      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1256, (Is_Empty => True));
21367   end Initialize_1256;
21368
21369   ---------------------
21370   -- Initialize_1257 --
21371   ---------------------
21372
21373   procedure Initialize_1257 is
21374   begin
21375      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21376       (Base + 1257,
21377        AMF.Internals.Tables.UML_String_Data_01.MS_019A'Access);
21378      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1257, (Is_Empty => True));
21379   end Initialize_1257;
21380
21381   ---------------------
21382   -- Initialize_1258 --
21383   ---------------------
21384
21385   procedure Initialize_1258 is
21386   begin
21387      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 1258, True);
21388      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21389       (Base + 1258,
21390        AMF.Internals.Tables.UML_String_Data_00.MS_00B8'Access);
21391      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1258, (Is_Empty => True));
21392   end Initialize_1258;
21393
21394   ---------------------
21395   -- Initialize_1259 --
21396   ---------------------
21397
21398   procedure Initialize_1259 is
21399   begin
21400      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21401       (Base + 1259,
21402        AMF.Internals.Tables.UML_String_Data_00.MS_0004'Access);
21403      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1259, (Is_Empty => True));
21404   end Initialize_1259;
21405
21406   ---------------------
21407   -- Initialize_1260 --
21408   ---------------------
21409
21410   procedure Initialize_1260 is
21411   begin
21412      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21413       (Base + 1260,
21414        AMF.Internals.Tables.UML_String_Data_04.MS_04CC'Access);
21415      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1260, (Is_Empty => True));
21416   end Initialize_1260;
21417
21418   ---------------------
21419   -- Initialize_1261 --
21420   ---------------------
21421
21422   procedure Initialize_1261 is
21423   begin
21424      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21425       (Base + 1261,
21426        AMF.Internals.Tables.UML_String_Data_07.MS_0744'Access);
21427      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1261, (Is_Empty => True));
21428   end Initialize_1261;
21429
21430   ---------------------
21431   -- Initialize_1262 --
21432   ---------------------
21433
21434   procedure Initialize_1262 is
21435   begin
21436      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 1262, True);
21437      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21438       (Base + 1262,
21439        AMF.Internals.Tables.UML_String_Data_01.MS_01B3'Access);
21440      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1262, (Is_Empty => True));
21441   end Initialize_1262;
21442
21443   ---------------------
21444   -- Initialize_1263 --
21445   ---------------------
21446
21447   procedure Initialize_1263 is
21448   begin
21449      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21450       (Base + 1263,
21451        AMF.Internals.Tables.UML_String_Data_01.MS_01CD'Access);
21452      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1263, (Is_Empty => True));
21453   end Initialize_1263;
21454
21455   ---------------------
21456   -- Initialize_1264 --
21457   ---------------------
21458
21459   procedure Initialize_1264 is
21460   begin
21461      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21462       (Base + 1264,
21463        AMF.Internals.Tables.UML_String_Data_00.MS_00B6'Access);
21464      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1264, (Is_Empty => True));
21465   end Initialize_1264;
21466
21467   ---------------------
21468   -- Initialize_1265 --
21469   ---------------------
21470
21471   procedure Initialize_1265 is
21472   begin
21473      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21474       (Base + 1265,
21475        AMF.Internals.Tables.UML_String_Data_02.MS_0233'Access);
21476      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1265, (Is_Empty => True));
21477   end Initialize_1265;
21478
21479   ---------------------
21480   -- Initialize_1266 --
21481   ---------------------
21482
21483   procedure Initialize_1266 is
21484   begin
21485      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21486       (Base + 1266,
21487        AMF.Internals.Tables.UML_String_Data_01.MS_012E'Access);
21488      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1266, (Is_Empty => True));
21489   end Initialize_1266;
21490
21491   ---------------------
21492   -- Initialize_1267 --
21493   ---------------------
21494
21495   procedure Initialize_1267 is
21496   begin
21497      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21498       (Base + 1267,
21499        AMF.Internals.Tables.UML_String_Data_09.MS_09F8'Access);
21500      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1267, (Is_Empty => True));
21501   end Initialize_1267;
21502
21503   ---------------------
21504   -- Initialize_1268 --
21505   ---------------------
21506
21507   procedure Initialize_1268 is
21508   begin
21509      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21510       (Base + 1268,
21511        AMF.Internals.Tables.UML_String_Data_05.MS_0524'Access);
21512      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1268, (Is_Empty => True));
21513   end Initialize_1268;
21514
21515   ---------------------
21516   -- Initialize_1269 --
21517   ---------------------
21518
21519   procedure Initialize_1269 is
21520   begin
21521      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21522       (Base + 1269,
21523        AMF.Internals.Tables.UML_String_Data_07.MS_070D'Access);
21524      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1269, (Is_Empty => True));
21525   end Initialize_1269;
21526
21527   ---------------------
21528   -- Initialize_1270 --
21529   ---------------------
21530
21531   procedure Initialize_1270 is
21532   begin
21533      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21534       (Base + 1270,
21535        AMF.Internals.Tables.UML_String_Data_0B.MS_0B2D'Access);
21536      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1270, (Is_Empty => True));
21537   end Initialize_1270;
21538
21539   ---------------------
21540   -- Initialize_1271 --
21541   ---------------------
21542
21543   procedure Initialize_1271 is
21544   begin
21545      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21546       (Base + 1271,
21547        AMF.Internals.Tables.UML_String_Data_03.MS_0367'Access);
21548      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1271, (Is_Empty => True));
21549   end Initialize_1271;
21550
21551   ---------------------
21552   -- Initialize_1272 --
21553   ---------------------
21554
21555   procedure Initialize_1272 is
21556   begin
21557      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21558       (Base + 1272,
21559        AMF.Internals.Tables.UML_String_Data_00.MS_002A'Access);
21560      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1272, (Is_Empty => True));
21561   end Initialize_1272;
21562
21563   ---------------------
21564   -- Initialize_1273 --
21565   ---------------------
21566
21567   procedure Initialize_1273 is
21568   begin
21569      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21570       (Base + 1273,
21571        AMF.Internals.Tables.UML_String_Data_08.MS_0867'Access);
21572      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1273, (Is_Empty => True));
21573   end Initialize_1273;
21574
21575   ---------------------
21576   -- Initialize_1274 --
21577   ---------------------
21578
21579   procedure Initialize_1274 is
21580   begin
21581      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21582       (Base + 1274,
21583        AMF.Internals.Tables.UML_String_Data_06.MS_06E2'Access);
21584      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1274, (Is_Empty => True));
21585   end Initialize_1274;
21586
21587   ---------------------
21588   -- Initialize_1275 --
21589   ---------------------
21590
21591   procedure Initialize_1275 is
21592   begin
21593      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21594       (Base + 1275,
21595        AMF.Internals.Tables.UML_String_Data_01.MS_01E1'Access);
21596      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1275, (Is_Empty => True));
21597   end Initialize_1275;
21598
21599   ---------------------
21600   -- Initialize_1276 --
21601   ---------------------
21602
21603   procedure Initialize_1276 is
21604   begin
21605      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Derived (Base + 1276, True);
21606      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21607       (Base + 1276,
21608        AMF.Internals.Tables.UML_String_Data_0A.MS_0A6B'Access);
21609      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1276, (Is_Empty => True));
21610   end Initialize_1276;
21611
21612   ---------------------
21613   -- Initialize_1277 --
21614   ---------------------
21615
21616   procedure Initialize_1277 is
21617   begin
21618      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21619       (Base + 1277,
21620        AMF.Internals.Tables.UML_String_Data_05.MS_0542'Access);
21621      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1277, (Is_Empty => True));
21622   end Initialize_1277;
21623
21624   ---------------------
21625   -- Initialize_1278 --
21626   ---------------------
21627
21628   procedure Initialize_1278 is
21629   begin
21630      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21631       (Base + 1278,
21632        AMF.Internals.Tables.UML_String_Data_06.MS_06D5'Access);
21633      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1278, (Is_Empty => True));
21634   end Initialize_1278;
21635
21636   ---------------------
21637   -- Initialize_1279 --
21638   ---------------------
21639
21640   procedure Initialize_1279 is
21641   begin
21642      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21643       (Base + 1279,
21644        AMF.Internals.Tables.UML_String_Data_01.MS_01E2'Access);
21645      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1279, (Is_Empty => True));
21646   end Initialize_1279;
21647
21648   ---------------------
21649   -- Initialize_1280 --
21650   ---------------------
21651
21652   procedure Initialize_1280 is
21653   begin
21654      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21655       (Base + 1280,
21656        AMF.Internals.Tables.UML_String_Data_0A.MS_0A46'Access);
21657      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1280, (Is_Empty => True));
21658   end Initialize_1280;
21659
21660   ---------------------
21661   -- Initialize_1281 --
21662   ---------------------
21663
21664   procedure Initialize_1281 is
21665   begin
21666      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21667       (Base + 1281,
21668        AMF.Internals.Tables.UML_String_Data_0B.MS_0B89'Access);
21669      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1281, (Is_Empty => True));
21670   end Initialize_1281;
21671
21672   ---------------------
21673   -- Initialize_1282 --
21674   ---------------------
21675
21676   procedure Initialize_1282 is
21677   begin
21678      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21679       (Base + 1282,
21680        AMF.Internals.Tables.UML_String_Data_0A.MS_0ADD'Access);
21681      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1282, (Is_Empty => True));
21682   end Initialize_1282;
21683
21684   ---------------------
21685   -- Initialize_1283 --
21686   ---------------------
21687
21688   procedure Initialize_1283 is
21689   begin
21690      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21691       (Base + 1283,
21692        AMF.Internals.Tables.UML_String_Data_02.MS_028A'Access);
21693      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1283, (Is_Empty => True));
21694   end Initialize_1283;
21695
21696   ---------------------
21697   -- Initialize_1284 --
21698   ---------------------
21699
21700   procedure Initialize_1284 is
21701   begin
21702      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21703       (Base + 1284,
21704        AMF.Internals.Tables.UML_String_Data_08.MS_08E8'Access);
21705      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1284, (Is_Empty => True));
21706   end Initialize_1284;
21707
21708   ---------------------
21709   -- Initialize_1285 --
21710   ---------------------
21711
21712   procedure Initialize_1285 is
21713   begin
21714      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21715       (Base + 1285,
21716        AMF.Internals.Tables.UML_String_Data_05.MS_0538'Access);
21717      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Uri
21718       (Base + 1285,
21719        AMF.Internals.Tables.UML_String_Data_0B.MS_0B51'Access);
21720      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1285, (Is_Empty => True));
21721   end Initialize_1285;
21722
21723   ---------------------
21724   -- Initialize_1286 --
21725   ---------------------
21726
21727   procedure Initialize_1286 is
21728   begin
21729      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1286, AMF.CMOF.Public_Visibility);
21730   end Initialize_1286;
21731
21732   ---------------------
21733   -- Initialize_1287 --
21734   ---------------------
21735
21736   procedure Initialize_1287 is
21737   begin
21738      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1287, (False, 0));
21739      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21740       (Base + 1287,
21741        AMF.Internals.Tables.UML_String_Data_05.MS_0552'Access);
21742      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1287, (False, (Unlimited => True)));
21743      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1287, (False, AMF.CMOF.Public_Visibility));
21744   end Initialize_1287;
21745
21746   ---------------------
21747   -- Initialize_1288 --
21748   ---------------------
21749
21750   procedure Initialize_1288 is
21751   begin
21752      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1288, (False, 0));
21753      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21754       (Base + 1288,
21755        AMF.Internals.Tables.UML_String_Data_08.MS_0854'Access);
21756      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1288, (False, AMF.CMOF.Public_Visibility));
21757   end Initialize_1288;
21758
21759   ---------------------
21760   -- Initialize_1289 --
21761   ---------------------
21762
21763   procedure Initialize_1289 is
21764   begin
21765      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1289, (False, 0));
21766      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21767       (Base + 1289,
21768        AMF.Internals.Tables.UML_String_Data_06.MS_0630'Access);
21769      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1289, (False, AMF.CMOF.Public_Visibility));
21770   end Initialize_1289;
21771
21772   ---------------------
21773   -- Initialize_1290 --
21774   ---------------------
21775
21776   procedure Initialize_1290 is
21777   begin
21778      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1290, (False, 0));
21779      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21780       (Base + 1290,
21781        AMF.Internals.Tables.UML_String_Data_09.MS_0938'Access);
21782      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1290, (False, (Unlimited => True)));
21783      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1290, (False, AMF.CMOF.Public_Visibility));
21784   end Initialize_1290;
21785
21786   ---------------------
21787   -- Initialize_1291 --
21788   ---------------------
21789
21790   procedure Initialize_1291 is
21791   begin
21792      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1291, (False, 0));
21793      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21794       (Base + 1291,
21795        AMF.Internals.Tables.UML_String_Data_0A.MS_0A4E'Access);
21796      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1291, (False, (Unlimited => True)));
21797      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1291, (False, AMF.CMOF.Public_Visibility));
21798   end Initialize_1291;
21799
21800   ---------------------
21801   -- Initialize_1292 --
21802   ---------------------
21803
21804   procedure Initialize_1292 is
21805   begin
21806      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1292, (False, 0));
21807      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21808       (Base + 1292,
21809        AMF.Internals.Tables.UML_String_Data_04.MS_04B5'Access);
21810      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1292, (False, (Unlimited => True)));
21811      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1292, (False, AMF.CMOF.Public_Visibility));
21812   end Initialize_1292;
21813
21814   ---------------------
21815   -- Initialize_1293 --
21816   ---------------------
21817
21818   procedure Initialize_1293 is
21819   begin
21820      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1293, (False, 0));
21821      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21822       (Base + 1293,
21823        AMF.Internals.Tables.UML_String_Data_07.MS_0716'Access);
21824      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1293, (False, (Unlimited => True)));
21825      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1293, (False, AMF.CMOF.Public_Visibility));
21826   end Initialize_1293;
21827
21828   ---------------------
21829   -- Initialize_1294 --
21830   ---------------------
21831
21832   procedure Initialize_1294 is
21833   begin
21834      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1294, (False, 0));
21835      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21836       (Base + 1294,
21837        AMF.Internals.Tables.UML_String_Data_06.MS_0630'Access);
21838      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1294, (False, AMF.CMOF.Public_Visibility));
21839   end Initialize_1294;
21840
21841   ---------------------
21842   -- Initialize_1295 --
21843   ---------------------
21844
21845   procedure Initialize_1295 is
21846   begin
21847      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1295, (False, 0));
21848      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21849       (Base + 1295,
21850        AMF.Internals.Tables.UML_String_Data_09.MS_09A3'Access);
21851      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1295, (False, AMF.CMOF.Public_Visibility));
21852   end Initialize_1295;
21853
21854   ---------------------
21855   -- Initialize_1296 --
21856   ---------------------
21857
21858   procedure Initialize_1296 is
21859   begin
21860      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1296, (False, 0));
21861      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21862       (Base + 1296,
21863        AMF.Internals.Tables.UML_String_Data_07.MS_0736'Access);
21864      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1296, (False, AMF.CMOF.Public_Visibility));
21865   end Initialize_1296;
21866
21867   ---------------------
21868   -- Initialize_1297 --
21869   ---------------------
21870
21871   procedure Initialize_1297 is
21872   begin
21873      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1297, (False, 0));
21874      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21875       (Base + 1297,
21876        AMF.Internals.Tables.UML_String_Data_05.MS_0596'Access);
21877      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1297, (False, AMF.CMOF.Public_Visibility));
21878   end Initialize_1297;
21879
21880   ---------------------
21881   -- Initialize_1298 --
21882   ---------------------
21883
21884   procedure Initialize_1298 is
21885   begin
21886      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1298, (False, 0));
21887      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21888       (Base + 1298,
21889        AMF.Internals.Tables.UML_String_Data_03.MS_0321'Access);
21890      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1298, (False, AMF.CMOF.Public_Visibility));
21891   end Initialize_1298;
21892
21893   ---------------------
21894   -- Initialize_1299 --
21895   ---------------------
21896
21897   procedure Initialize_1299 is
21898   begin
21899      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1299, (False, 0));
21900      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21901       (Base + 1299,
21902        AMF.Internals.Tables.UML_String_Data_01.MS_01F7'Access);
21903      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1299, (False, (Unlimited => True)));
21904      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1299, (False, AMF.CMOF.Public_Visibility));
21905   end Initialize_1299;
21906
21907   ---------------------
21908   -- Initialize_1300 --
21909   ---------------------
21910
21911   procedure Initialize_1300 is
21912   begin
21913      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1300, (False, 0));
21914      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21915       (Base + 1300,
21916        AMF.Internals.Tables.UML_String_Data_04.MS_04E2'Access);
21917      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1300, (False, (Unlimited => True)));
21918      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1300, (False, AMF.CMOF.Public_Visibility));
21919   end Initialize_1300;
21920
21921   ---------------------
21922   -- Initialize_1301 --
21923   ---------------------
21924
21925   procedure Initialize_1301 is
21926   begin
21927      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1301, (False, 0));
21928      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21929       (Base + 1301,
21930        AMF.Internals.Tables.UML_String_Data_00.MS_005A'Access);
21931      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1301, (False, (Unlimited => True)));
21932      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1301, (False, AMF.CMOF.Public_Visibility));
21933   end Initialize_1301;
21934
21935   ---------------------
21936   -- Initialize_1302 --
21937   ---------------------
21938
21939   procedure Initialize_1302 is
21940   begin
21941      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1302, (False, 0));
21942      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21943       (Base + 1302,
21944        AMF.Internals.Tables.UML_String_Data_08.MS_089A'Access);
21945      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1302, (False, AMF.CMOF.Public_Visibility));
21946   end Initialize_1302;
21947
21948   ---------------------
21949   -- Initialize_1303 --
21950   ---------------------
21951
21952   procedure Initialize_1303 is
21953   begin
21954      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1303, (False, 0));
21955      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21956       (Base + 1303,
21957        AMF.Internals.Tables.UML_String_Data_03.MS_0359'Access);
21958      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1303, (False, (Unlimited => True)));
21959      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1303, (False, AMF.CMOF.Public_Visibility));
21960   end Initialize_1303;
21961
21962   ---------------------
21963   -- Initialize_1304 --
21964   ---------------------
21965
21966   procedure Initialize_1304 is
21967   begin
21968      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1304, (False, 0));
21969      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21970       (Base + 1304,
21971        AMF.Internals.Tables.UML_String_Data_05.MS_05E9'Access);
21972      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1304, (False, (Unlimited => True)));
21973      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1304, (False, AMF.CMOF.Public_Visibility));
21974   end Initialize_1304;
21975
21976   ---------------------
21977   -- Initialize_1305 --
21978   ---------------------
21979
21980   procedure Initialize_1305 is
21981   begin
21982      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1305, (False, 0));
21983      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21984       (Base + 1305,
21985        AMF.Internals.Tables.UML_String_Data_05.MS_05E9'Access);
21986      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1305, (False, AMF.CMOF.Public_Visibility));
21987   end Initialize_1305;
21988
21989   ---------------------
21990   -- Initialize_1306 --
21991   ---------------------
21992
21993   procedure Initialize_1306 is
21994   begin
21995      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1306, (False, 0));
21996      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
21997       (Base + 1306,
21998        AMF.Internals.Tables.UML_String_Data_03.MS_0359'Access);
21999      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1306, (False, AMF.CMOF.Public_Visibility));
22000   end Initialize_1306;
22001
22002   ---------------------
22003   -- Initialize_1307 --
22004   ---------------------
22005
22006   procedure Initialize_1307 is
22007   begin
22008      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1307, (False, 0));
22009      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22010       (Base + 1307,
22011        AMF.Internals.Tables.UML_String_Data_0A.MS_0AC7'Access);
22012      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1307, (False, AMF.CMOF.Public_Visibility));
22013   end Initialize_1307;
22014
22015   ---------------------
22016   -- Initialize_1308 --
22017   ---------------------
22018
22019   procedure Initialize_1308 is
22020   begin
22021      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1308, (False, 0));
22022      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22023       (Base + 1308,
22024        AMF.Internals.Tables.UML_String_Data_01.MS_01A8'Access);
22025      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1308, (False, AMF.CMOF.Public_Visibility));
22026   end Initialize_1308;
22027
22028   ---------------------
22029   -- Initialize_1309 --
22030   ---------------------
22031
22032   procedure Initialize_1309 is
22033   begin
22034      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1309, (False, 0));
22035      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22036       (Base + 1309,
22037        AMF.Internals.Tables.UML_String_Data_0C.MS_0C75'Access);
22038      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1309, (False, AMF.CMOF.Public_Visibility));
22039   end Initialize_1309;
22040
22041   ---------------------
22042   -- Initialize_1310 --
22043   ---------------------
22044
22045   procedure Initialize_1310 is
22046   begin
22047      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1310, (False, 0));
22048      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22049       (Base + 1310,
22050        AMF.Internals.Tables.UML_String_Data_0B.MS_0B37'Access);
22051      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1310, (False, (Unlimited => True)));
22052      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1310, (False, AMF.CMOF.Public_Visibility));
22053   end Initialize_1310;
22054
22055   ---------------------
22056   -- Initialize_1311 --
22057   ---------------------
22058
22059   procedure Initialize_1311 is
22060   begin
22061      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1311, (False, 0));
22062      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22063       (Base + 1311,
22064        AMF.Internals.Tables.UML_String_Data_08.MS_082E'Access);
22065      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1311, (False, (Unlimited => True)));
22066      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1311, (False, AMF.CMOF.Public_Visibility));
22067   end Initialize_1311;
22068
22069   ---------------------
22070   -- Initialize_1312 --
22071   ---------------------
22072
22073   procedure Initialize_1312 is
22074   begin
22075      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1312, (False, 0));
22076      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22077       (Base + 1312,
22078        AMF.Internals.Tables.UML_String_Data_0B.MS_0BDE'Access);
22079      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1312, (False, (Unlimited => True)));
22080      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1312, (False, AMF.CMOF.Public_Visibility));
22081   end Initialize_1312;
22082
22083   ---------------------
22084   -- Initialize_1313 --
22085   ---------------------
22086
22087   procedure Initialize_1313 is
22088   begin
22089      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1313, (False, 0));
22090      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22091       (Base + 1313,
22092        AMF.Internals.Tables.UML_String_Data_01.MS_01EA'Access);
22093      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1313, (False, AMF.CMOF.Public_Visibility));
22094   end Initialize_1313;
22095
22096   ---------------------
22097   -- Initialize_1314 --
22098   ---------------------
22099
22100   procedure Initialize_1314 is
22101   begin
22102      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1314, (False, 0));
22103      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22104       (Base + 1314,
22105        AMF.Internals.Tables.UML_String_Data_07.MS_07DD'Access);
22106      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1314, (False, (Unlimited => True)));
22107      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1314, (False, AMF.CMOF.Public_Visibility));
22108   end Initialize_1314;
22109
22110   ---------------------
22111   -- Initialize_1315 --
22112   ---------------------
22113
22114   procedure Initialize_1315 is
22115   begin
22116      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22117       (Base + 1315,
22118        AMF.Internals.Tables.UML_String_Data_05.MS_0511'Access);
22119      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1315, (False, AMF.CMOF.Public_Visibility));
22120   end Initialize_1315;
22121
22122   ---------------------
22123   -- Initialize_1316 --
22124   ---------------------
22125
22126   procedure Initialize_1316 is
22127   begin
22128      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1316, (False, 0));
22129      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22130       (Base + 1316,
22131        AMF.Internals.Tables.UML_String_Data_09.MS_0984'Access);
22132      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1316, (False, (Unlimited => True)));
22133      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1316, (False, AMF.CMOF.Public_Visibility));
22134   end Initialize_1316;
22135
22136   ---------------------
22137   -- Initialize_1317 --
22138   ---------------------
22139
22140   procedure Initialize_1317 is
22141   begin
22142      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1317, (False, 0));
22143      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22144       (Base + 1317,
22145        AMF.Internals.Tables.UML_String_Data_03.MS_0321'Access);
22146      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1317, (False, AMF.CMOF.Public_Visibility));
22147   end Initialize_1317;
22148
22149   ---------------------
22150   -- Initialize_1318 --
22151   ---------------------
22152
22153   procedure Initialize_1318 is
22154   begin
22155      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1318, (False, 0));
22156      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22157       (Base + 1318,
22158        AMF.Internals.Tables.UML_String_Data_03.MS_0376'Access);
22159      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1318, (False, AMF.CMOF.Public_Visibility));
22160   end Initialize_1318;
22161
22162   ---------------------
22163   -- Initialize_1319 --
22164   ---------------------
22165
22166   procedure Initialize_1319 is
22167   begin
22168      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1319, (False, 0));
22169      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22170       (Base + 1319,
22171        AMF.Internals.Tables.UML_String_Data_04.MS_0426'Access);
22172      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1319, (False, AMF.CMOF.Public_Visibility));
22173   end Initialize_1319;
22174
22175   ---------------------
22176   -- Initialize_1320 --
22177   ---------------------
22178
22179   procedure Initialize_1320 is
22180   begin
22181      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1320, (False, 0));
22182      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22183       (Base + 1320,
22184        AMF.Internals.Tables.UML_String_Data_07.MS_077A'Access);
22185      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1320, (False, AMF.CMOF.Public_Visibility));
22186   end Initialize_1320;
22187
22188   ---------------------
22189   -- Initialize_1321 --
22190   ---------------------
22191
22192   procedure Initialize_1321 is
22193   begin
22194      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1321, (False, 0));
22195      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22196       (Base + 1321,
22197        AMF.Internals.Tables.UML_String_Data_07.MS_0736'Access);
22198      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1321, (False, (Unlimited => True)));
22199      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1321, (False, AMF.CMOF.Public_Visibility));
22200   end Initialize_1321;
22201
22202   ---------------------
22203   -- Initialize_1322 --
22204   ---------------------
22205
22206   procedure Initialize_1322 is
22207   begin
22208      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1322, (False, 0));
22209      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22210       (Base + 1322,
22211        AMF.Internals.Tables.UML_String_Data_02.MS_026C'Access);
22212      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1322, (False, (Unlimited => True)));
22213      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1322, (False, AMF.CMOF.Public_Visibility));
22214   end Initialize_1322;
22215
22216   ---------------------
22217   -- Initialize_1323 --
22218   ---------------------
22219
22220   procedure Initialize_1323 is
22221   begin
22222      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1323, (False, 0));
22223      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22224       (Base + 1323,
22225        AMF.Internals.Tables.UML_String_Data_06.MS_06D2'Access);
22226      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1323, (False, (Unlimited => True)));
22227      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1323, (False, AMF.CMOF.Public_Visibility));
22228   end Initialize_1323;
22229
22230   ---------------------
22231   -- Initialize_1324 --
22232   ---------------------
22233
22234   procedure Initialize_1324 is
22235   begin
22236      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1324, (False, 0));
22237      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22238       (Base + 1324,
22239        AMF.Internals.Tables.UML_String_Data_07.MS_07C7'Access);
22240      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1324, (False, (Unlimited => True)));
22241      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1324, (False, AMF.CMOF.Public_Visibility));
22242   end Initialize_1324;
22243
22244   ---------------------
22245   -- Initialize_1325 --
22246   ---------------------
22247
22248   procedure Initialize_1325 is
22249   begin
22250      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1325, (False, 0));
22251      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22252       (Base + 1325,
22253        AMF.Internals.Tables.UML_String_Data_02.MS_029D'Access);
22254      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1325, (False, (Unlimited => True)));
22255      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1325, (False, AMF.CMOF.Public_Visibility));
22256   end Initialize_1325;
22257
22258   ---------------------
22259   -- Initialize_1326 --
22260   ---------------------
22261
22262   procedure Initialize_1326 is
22263   begin
22264      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1326, (False, 0));
22265      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22266       (Base + 1326,
22267        AMF.Internals.Tables.UML_String_Data_07.MS_07F2'Access);
22268      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1326, (False, (Unlimited => True)));
22269      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1326, (False, AMF.CMOF.Public_Visibility));
22270   end Initialize_1326;
22271
22272   ---------------------
22273   -- Initialize_1327 --
22274   ---------------------
22275
22276   procedure Initialize_1327 is
22277   begin
22278      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1327, (False, 0));
22279      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22280       (Base + 1327,
22281        AMF.Internals.Tables.UML_String_Data_0C.MS_0C46'Access);
22282      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1327, (False, (Unlimited => True)));
22283      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1327, (False, AMF.CMOF.Public_Visibility));
22284   end Initialize_1327;
22285
22286   ---------------------
22287   -- Initialize_1328 --
22288   ---------------------
22289
22290   procedure Initialize_1328 is
22291   begin
22292      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1328, (False, 0));
22293      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22294       (Base + 1328,
22295        AMF.Internals.Tables.UML_String_Data_0B.MS_0B29'Access);
22296      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1328, (False, (Unlimited => True)));
22297      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1328, (False, AMF.CMOF.Public_Visibility));
22298   end Initialize_1328;
22299
22300   ---------------------
22301   -- Initialize_1329 --
22302   ---------------------
22303
22304   procedure Initialize_1329 is
22305   begin
22306      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1329, (False, 0));
22307      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22308       (Base + 1329,
22309        AMF.Internals.Tables.UML_String_Data_08.MS_08BE'Access);
22310      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1329, (False, (Unlimited => True)));
22311      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1329, (False, AMF.CMOF.Public_Visibility));
22312   end Initialize_1329;
22313
22314   ---------------------
22315   -- Initialize_1330 --
22316   ---------------------
22317
22318   procedure Initialize_1330 is
22319   begin
22320      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
22321       (Base + 1330,
22322        AMF.Internals.Tables.UML_String_Data_0B.MS_0BCD'Access);
22323   end Initialize_1330;
22324
22325   ---------------------
22326   -- Initialize_1331 --
22327   ---------------------
22328
22329   procedure Initialize_1331 is
22330   begin
22331      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 1331, True);
22332      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1331, (False, 0));
22333      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22334       (Base + 1331,
22335        AMF.Internals.Tables.UML_String_Data_00.MS_009B'Access);
22336      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1331, (False, (Unlimited => True)));
22337      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1331, (False, AMF.CMOF.Public_Visibility));
22338   end Initialize_1331;
22339
22340   ---------------------
22341   -- Initialize_1332 --
22342   ---------------------
22343
22344   procedure Initialize_1332 is
22345   begin
22346      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1332, (False, 0));
22347      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22348       (Base + 1332,
22349        AMF.Internals.Tables.UML_String_Data_06.MS_06E3'Access);
22350      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1332, (False, (Unlimited => True)));
22351      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1332, (False, AMF.CMOF.Public_Visibility));
22352   end Initialize_1332;
22353
22354   ---------------------
22355   -- Initialize_1333 --
22356   ---------------------
22357
22358   procedure Initialize_1333 is
22359   begin
22360      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1333, (False, 0));
22361      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22362       (Base + 1333,
22363        AMF.Internals.Tables.UML_String_Data_03.MS_0359'Access);
22364      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1333, (False, AMF.CMOF.Public_Visibility));
22365   end Initialize_1333;
22366
22367   ---------------------
22368   -- Initialize_1334 --
22369   ---------------------
22370
22371   procedure Initialize_1334 is
22372   begin
22373      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1334, (False, 0));
22374      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22375       (Base + 1334,
22376        AMF.Internals.Tables.UML_String_Data_05.MS_05E9'Access);
22377      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1334, (False, AMF.CMOF.Public_Visibility));
22378   end Initialize_1334;
22379
22380   ---------------------
22381   -- Initialize_1335 --
22382   ---------------------
22383
22384   procedure Initialize_1335 is
22385   begin
22386      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1335, (False, 0));
22387      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22388       (Base + 1335,
22389        AMF.Internals.Tables.UML_String_Data_08.MS_0836'Access);
22390      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1335, (False, AMF.CMOF.Public_Visibility));
22391   end Initialize_1335;
22392
22393   ---------------------
22394   -- Initialize_1336 --
22395   ---------------------
22396
22397   procedure Initialize_1336 is
22398   begin
22399      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1336, (False, 0));
22400      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22401       (Base + 1336,
22402        AMF.Internals.Tables.UML_String_Data_08.MS_0836'Access);
22403      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1336, (False, (Unlimited => True)));
22404      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1336, (False, AMF.CMOF.Public_Visibility));
22405   end Initialize_1336;
22406
22407   ---------------------
22408   -- Initialize_1337 --
22409   ---------------------
22410
22411   procedure Initialize_1337 is
22412   begin
22413      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22414       (Base + 1337,
22415        AMF.Internals.Tables.UML_String_Data_05.MS_057B'Access);
22416      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1337, (False, AMF.CMOF.Public_Visibility));
22417   end Initialize_1337;
22418
22419   ---------------------
22420   -- Initialize_1338 --
22421   ---------------------
22422
22423   procedure Initialize_1338 is
22424   begin
22425      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1338, (False, 0));
22426      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22427       (Base + 1338,
22428        AMF.Internals.Tables.UML_String_Data_03.MS_032B'Access);
22429      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1338, (False, AMF.CMOF.Public_Visibility));
22430   end Initialize_1338;
22431
22432   ---------------------
22433   -- Initialize_1339 --
22434   ---------------------
22435
22436   procedure Initialize_1339 is
22437   begin
22438      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1339, (False, 0));
22439      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22440       (Base + 1339,
22441        AMF.Internals.Tables.UML_String_Data_0B.MS_0BA5'Access);
22442      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1339, (False, AMF.CMOF.Public_Visibility));
22443   end Initialize_1339;
22444
22445   ---------------------
22446   -- Initialize_1340 --
22447   ---------------------
22448
22449   procedure Initialize_1340 is
22450   begin
22451      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1340, (False, 0));
22452      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22453       (Base + 1340,
22454        AMF.Internals.Tables.UML_String_Data_01.MS_01BF'Access);
22455      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1340, (False, (Unlimited => True)));
22456      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1340, (False, AMF.CMOF.Public_Visibility));
22457   end Initialize_1340;
22458
22459   ---------------------
22460   -- Initialize_1341 --
22461   ---------------------
22462
22463   procedure Initialize_1341 is
22464   begin
22465      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1341, (False, 0));
22466      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22467       (Base + 1341,
22468        AMF.Internals.Tables.UML_String_Data_02.MS_0273'Access);
22469      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1341, (False, AMF.CMOF.Public_Visibility));
22470   end Initialize_1341;
22471
22472   ---------------------
22473   -- Initialize_1342 --
22474   ---------------------
22475
22476   procedure Initialize_1342 is
22477   begin
22478      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1342, (False, 0));
22479      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22480       (Base + 1342,
22481        AMF.Internals.Tables.UML_String_Data_06.MS_06BA'Access);
22482      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1342, (False, (Unlimited => True)));
22483      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1342, (False, AMF.CMOF.Public_Visibility));
22484   end Initialize_1342;
22485
22486   ---------------------
22487   -- Initialize_1343 --
22488   ---------------------
22489
22490   procedure Initialize_1343 is
22491   begin
22492      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1343, (False, 0));
22493      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22494       (Base + 1343,
22495        AMF.Internals.Tables.UML_String_Data_05.MS_052F'Access);
22496      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1343, (False, (Unlimited => True)));
22497      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1343, (False, AMF.CMOF.Public_Visibility));
22498   end Initialize_1343;
22499
22500   ---------------------
22501   -- Initialize_1344 --
22502   ---------------------
22503
22504   procedure Initialize_1344 is
22505   begin
22506      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1344, (False, 0));
22507      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22508       (Base + 1344,
22509        AMF.Internals.Tables.UML_String_Data_03.MS_03AD'Access);
22510      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1344, (False, (Unlimited => True)));
22511      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1344, (False, AMF.CMOF.Public_Visibility));
22512   end Initialize_1344;
22513
22514   ---------------------
22515   -- Initialize_1345 --
22516   ---------------------
22517
22518   procedure Initialize_1345 is
22519   begin
22520      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1345, (False, 0));
22521      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22522       (Base + 1345,
22523        AMF.Internals.Tables.UML_String_Data_02.MS_02A1'Access);
22524      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1345, (False, (Unlimited => True)));
22525      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1345, (False, AMF.CMOF.Public_Visibility));
22526   end Initialize_1345;
22527
22528   ---------------------
22529   -- Initialize_1346 --
22530   ---------------------
22531
22532   procedure Initialize_1346 is
22533   begin
22534      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1346, (False, 0));
22535      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22536       (Base + 1346,
22537        AMF.Internals.Tables.UML_String_Data_03.MS_03EE'Access);
22538      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1346, (False, AMF.CMOF.Public_Visibility));
22539   end Initialize_1346;
22540
22541   ---------------------
22542   -- Initialize_1347 --
22543   ---------------------
22544
22545   procedure Initialize_1347 is
22546   begin
22547      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1347, (False, 0));
22548      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22549       (Base + 1347,
22550        AMF.Internals.Tables.UML_String_Data_02.MS_0273'Access);
22551      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1347, (False, AMF.CMOF.Public_Visibility));
22552   end Initialize_1347;
22553
22554   ---------------------
22555   -- Initialize_1348 --
22556   ---------------------
22557
22558   procedure Initialize_1348 is
22559   begin
22560      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1348, (False, 0));
22561      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22562       (Base + 1348,
22563        AMF.Internals.Tables.UML_String_Data_09.MS_09B7'Access);
22564      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1348, (False, AMF.CMOF.Public_Visibility));
22565   end Initialize_1348;
22566
22567   ---------------------
22568   -- Initialize_1349 --
22569   ---------------------
22570
22571   procedure Initialize_1349 is
22572   begin
22573      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22574       (Base + 1349,
22575        AMF.Internals.Tables.UML_String_Data_0B.MS_0B2B'Access);
22576      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1349, (False, AMF.CMOF.Public_Visibility));
22577   end Initialize_1349;
22578
22579   ---------------------
22580   -- Initialize_1350 --
22581   ---------------------
22582
22583   procedure Initialize_1350 is
22584   begin
22585      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22586       (Base + 1350,
22587        AMF.Internals.Tables.UML_String_Data_08.MS_08AA'Access);
22588      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1350, (False, AMF.CMOF.Public_Visibility));
22589   end Initialize_1350;
22590
22591   ---------------------
22592   -- Initialize_1351 --
22593   ---------------------
22594
22595   procedure Initialize_1351 is
22596   begin
22597      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22598       (Base + 1351,
22599        AMF.Internals.Tables.UML_String_Data_04.MS_0464'Access);
22600      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1351, (False, AMF.CMOF.Public_Visibility));
22601   end Initialize_1351;
22602
22603   ---------------------
22604   -- Initialize_1352 --
22605   ---------------------
22606
22607   procedure Initialize_1352 is
22608   begin
22609      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1352, (False, 0));
22610      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22611       (Base + 1352,
22612        AMF.Internals.Tables.UML_String_Data_0A.MS_0A43'Access);
22613      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1352, (False, (Unlimited => True)));
22614      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1352, (False, AMF.CMOF.Public_Visibility));
22615   end Initialize_1352;
22616
22617   ---------------------
22618   -- Initialize_1353 --
22619   ---------------------
22620
22621   procedure Initialize_1353 is
22622   begin
22623      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22624       (Base + 1353,
22625        AMF.Internals.Tables.UML_String_Data_07.MS_07F2'Access);
22626      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1353, (False, AMF.CMOF.Public_Visibility));
22627   end Initialize_1353;
22628
22629   ---------------------
22630   -- Initialize_1354 --
22631   ---------------------
22632
22633   procedure Initialize_1354 is
22634   begin
22635      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1354, (False, 0));
22636      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22637       (Base + 1354,
22638        AMF.Internals.Tables.UML_String_Data_04.MS_0453'Access);
22639      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1354, (False, (Unlimited => True)));
22640      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1354, (False, AMF.CMOF.Public_Visibility));
22641   end Initialize_1354;
22642
22643   ---------------------
22644   -- Initialize_1355 --
22645   ---------------------
22646
22647   procedure Initialize_1355 is
22648   begin
22649      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1355, (False, 0));
22650      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22651       (Base + 1355,
22652        AMF.Internals.Tables.UML_String_Data_0A.MS_0A9D'Access);
22653      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1355, (False, AMF.CMOF.Public_Visibility));
22654   end Initialize_1355;
22655
22656   ---------------------
22657   -- Initialize_1356 --
22658   ---------------------
22659
22660   procedure Initialize_1356 is
22661   begin
22662      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1356, (False, 0));
22663      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22664       (Base + 1356,
22665        AMF.Internals.Tables.UML_String_Data_0C.MS_0C3C'Access);
22666      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1356, (False, AMF.CMOF.Public_Visibility));
22667   end Initialize_1356;
22668
22669   ---------------------
22670   -- Initialize_1357 --
22671   ---------------------
22672
22673   procedure Initialize_1357 is
22674   begin
22675      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1357, (False, 0));
22676      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22677       (Base + 1357,
22678        AMF.Internals.Tables.UML_String_Data_02.MS_0273'Access);
22679      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1357, (False, AMF.CMOF.Public_Visibility));
22680   end Initialize_1357;
22681
22682   ---------------------
22683   -- Initialize_1358 --
22684   ---------------------
22685
22686   procedure Initialize_1358 is
22687   begin
22688      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1358, (False, 0));
22689      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22690       (Base + 1358,
22691        AMF.Internals.Tables.UML_String_Data_0C.MS_0C1B'Access);
22692      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1358, (False, (Unlimited => True)));
22693      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1358, (False, AMF.CMOF.Public_Visibility));
22694   end Initialize_1358;
22695
22696   ---------------------
22697   -- Initialize_1359 --
22698   ---------------------
22699
22700   procedure Initialize_1359 is
22701   begin
22702      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1359, (False, 0));
22703      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22704       (Base + 1359,
22705        AMF.Internals.Tables.UML_String_Data_06.MS_0663'Access);
22706      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1359, (False, (Unlimited => True)));
22707      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1359, (False, AMF.CMOF.Public_Visibility));
22708   end Initialize_1359;
22709
22710   ---------------------
22711   -- Initialize_1360 --
22712   ---------------------
22713
22714   procedure Initialize_1360 is
22715   begin
22716      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1360, (False, 0));
22717      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22718       (Base + 1360,
22719        AMF.Internals.Tables.UML_String_Data_07.MS_073C'Access);
22720      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1360, (False, (Unlimited => True)));
22721      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1360, (False, AMF.CMOF.Public_Visibility));
22722   end Initialize_1360;
22723
22724   ---------------------
22725   -- Initialize_1361 --
22726   ---------------------
22727
22728   procedure Initialize_1361 is
22729   begin
22730      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1361, (False, 0));
22731      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22732       (Base + 1361,
22733        AMF.Internals.Tables.UML_String_Data_01.MS_016F'Access);
22734      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1361, (False, (Unlimited => True)));
22735      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1361, (False, AMF.CMOF.Public_Visibility));
22736   end Initialize_1361;
22737
22738   ---------------------
22739   -- Initialize_1362 --
22740   ---------------------
22741
22742   procedure Initialize_1362 is
22743   begin
22744      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1362, (False, 0));
22745      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22746       (Base + 1362,
22747        AMF.Internals.Tables.UML_String_Data_01.MS_016F'Access);
22748      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1362, (False, (Unlimited => True)));
22749      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1362, (False, AMF.CMOF.Public_Visibility));
22750   end Initialize_1362;
22751
22752   ---------------------
22753   -- Initialize_1363 --
22754   ---------------------
22755
22756   procedure Initialize_1363 is
22757   begin
22758      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1363, (False, 0));
22759      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22760       (Base + 1363,
22761        AMF.Internals.Tables.UML_String_Data_08.MS_084A'Access);
22762      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1363, (False, AMF.CMOF.Public_Visibility));
22763   end Initialize_1363;
22764
22765   ---------------------
22766   -- Initialize_1364 --
22767   ---------------------
22768
22769   procedure Initialize_1364 is
22770   begin
22771      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1364, (False, 0));
22772      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22773       (Base + 1364,
22774        AMF.Internals.Tables.UML_String_Data_08.MS_0865'Access);
22775      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1364, (False, AMF.CMOF.Public_Visibility));
22776   end Initialize_1364;
22777
22778   ---------------------
22779   -- Initialize_1365 --
22780   ---------------------
22781
22782   procedure Initialize_1365 is
22783   begin
22784      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1365, (False, 0));
22785      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22786       (Base + 1365,
22787        AMF.Internals.Tables.UML_String_Data_0C.MS_0C51'Access);
22788      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1365, (False, (False, 2)));
22789      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1365, (False, AMF.CMOF.Public_Visibility));
22790   end Initialize_1365;
22791
22792   ---------------------
22793   -- Initialize_1366 --
22794   ---------------------
22795
22796   procedure Initialize_1366 is
22797   begin
22798      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1366, (False, 0));
22799      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22800       (Base + 1366,
22801        AMF.Internals.Tables.UML_String_Data_0C.MS_0C3C'Access);
22802      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1366, (False, AMF.CMOF.Public_Visibility));
22803   end Initialize_1366;
22804
22805   ---------------------
22806   -- Initialize_1367 --
22807   ---------------------
22808
22809   procedure Initialize_1367 is
22810   begin
22811      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1367, (False, 0));
22812      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22813       (Base + 1367,
22814        AMF.Internals.Tables.UML_String_Data_02.MS_0273'Access);
22815      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1367, (False, AMF.CMOF.Public_Visibility));
22816   end Initialize_1367;
22817
22818   ---------------------
22819   -- Initialize_1368 --
22820   ---------------------
22821
22822   procedure Initialize_1368 is
22823   begin
22824      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1368, (False, 0));
22825      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22826       (Base + 1368,
22827        AMF.Internals.Tables.UML_String_Data_04.MS_0421'Access);
22828      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1368, (False, AMF.CMOF.Public_Visibility));
22829   end Initialize_1368;
22830
22831   ---------------------
22832   -- Initialize_1369 --
22833   ---------------------
22834
22835   procedure Initialize_1369 is
22836   begin
22837      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1369, (False, 0));
22838      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22839       (Base + 1369,
22840        AMF.Internals.Tables.UML_String_Data_01.MS_0160'Access);
22841      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1369, (False, AMF.CMOF.Public_Visibility));
22842   end Initialize_1369;
22843
22844   ---------------------
22845   -- Initialize_1370 --
22846   ---------------------
22847
22848   procedure Initialize_1370 is
22849   begin
22850      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1370, (False, 0));
22851      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22852       (Base + 1370,
22853        AMF.Internals.Tables.UML_String_Data_04.MS_0426'Access);
22854      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1370, (False, (Unlimited => True)));
22855      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1370, (False, AMF.CMOF.Public_Visibility));
22856   end Initialize_1370;
22857
22858   ---------------------
22859   -- Initialize_1371 --
22860   ---------------------
22861
22862   procedure Initialize_1371 is
22863   begin
22864      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1371, (False, 0));
22865      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22866       (Base + 1371,
22867        AMF.Internals.Tables.UML_String_Data_05.MS_051A'Access);
22868      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1371, (False, AMF.CMOF.Public_Visibility));
22869   end Initialize_1371;
22870
22871   ---------------------
22872   -- Initialize_1372 --
22873   ---------------------
22874
22875   procedure Initialize_1372 is
22876   begin
22877      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1372, (False, 0));
22878      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22879       (Base + 1372,
22880        AMF.Internals.Tables.UML_String_Data_04.MS_04B7'Access);
22881      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1372, (False, (Unlimited => True)));
22882      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1372, (False, AMF.CMOF.Public_Visibility));
22883   end Initialize_1372;
22884
22885   ---------------------
22886   -- Initialize_1373 --
22887   ---------------------
22888
22889   procedure Initialize_1373 is
22890   begin
22891      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1373, (False, 0));
22892      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22893       (Base + 1373,
22894        AMF.Internals.Tables.UML_String_Data_0B.MS_0B7D'Access);
22895      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1373, (False, AMF.CMOF.Public_Visibility));
22896   end Initialize_1373;
22897
22898   ---------------------
22899   -- Initialize_1374 --
22900   ---------------------
22901
22902   procedure Initialize_1374 is
22903   begin
22904      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1374, (False, 0));
22905      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22906       (Base + 1374,
22907        AMF.Internals.Tables.UML_String_Data_02.MS_0202'Access);
22908      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1374, (False, (Unlimited => True)));
22909      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1374, (False, AMF.CMOF.Public_Visibility));
22910   end Initialize_1374;
22911
22912   ---------------------
22913   -- Initialize_1375 --
22914   ---------------------
22915
22916   procedure Initialize_1375 is
22917   begin
22918      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
22919       (Base + 1375,
22920        AMF.Internals.Tables.UML_String_Data_0A.MS_0A0F'Access);
22921   end Initialize_1375;
22922
22923   ---------------------
22924   -- Initialize_1376 --
22925   ---------------------
22926
22927   procedure Initialize_1376 is
22928   begin
22929      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1376, (False, 0));
22930      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22931       (Base + 1376,
22932        AMF.Internals.Tables.UML_String_Data_01.MS_01F9'Access);
22933      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1376, (False, (Unlimited => True)));
22934      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1376, (False, AMF.CMOF.Public_Visibility));
22935   end Initialize_1376;
22936
22937   ---------------------
22938   -- Initialize_1377 --
22939   ---------------------
22940
22941   procedure Initialize_1377 is
22942   begin
22943      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1377, (False, 0));
22944      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22945       (Base + 1377,
22946        AMF.Internals.Tables.UML_String_Data_09.MS_0963'Access);
22947      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1377, (False, AMF.CMOF.Public_Visibility));
22948   end Initialize_1377;
22949
22950   ---------------------
22951   -- Initialize_1378 --
22952   ---------------------
22953
22954   procedure Initialize_1378 is
22955   begin
22956      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1378, (False, 0));
22957      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22958       (Base + 1378,
22959        AMF.Internals.Tables.UML_String_Data_08.MS_0854'Access);
22960      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1378, (False, AMF.CMOF.Public_Visibility));
22961   end Initialize_1378;
22962
22963   ---------------------
22964   -- Initialize_1379 --
22965   ---------------------
22966
22967   procedure Initialize_1379 is
22968   begin
22969      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1379, (False, 0));
22970      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22971       (Base + 1379,
22972        AMF.Internals.Tables.UML_String_Data_09.MS_0938'Access);
22973      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1379, (False, (Unlimited => True)));
22974      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1379, (False, AMF.CMOF.Public_Visibility));
22975   end Initialize_1379;
22976
22977   ---------------------
22978   -- Initialize_1380 --
22979   ---------------------
22980
22981   procedure Initialize_1380 is
22982   begin
22983      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1380, (False, 0));
22984      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22985       (Base + 1380,
22986        AMF.Internals.Tables.UML_String_Data_0C.MS_0C1C'Access);
22987      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1380, (False, AMF.CMOF.Public_Visibility));
22988   end Initialize_1380;
22989
22990   ---------------------
22991   -- Initialize_1381 --
22992   ---------------------
22993
22994   procedure Initialize_1381 is
22995   begin
22996      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1381, (False, 0));
22997      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
22998       (Base + 1381,
22999        AMF.Internals.Tables.UML_String_Data_05.MS_0507'Access);
23000      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1381, (False, (Unlimited => True)));
23001      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1381, (False, AMF.CMOF.Public_Visibility));
23002   end Initialize_1381;
23003
23004   ---------------------
23005   -- Initialize_1382 --
23006   ---------------------
23007
23008   procedure Initialize_1382 is
23009   begin
23010      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1382, (False, 0));
23011      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23012       (Base + 1382,
23013        AMF.Internals.Tables.UML_String_Data_07.MS_0779'Access);
23014      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1382, (False, AMF.CMOF.Public_Visibility));
23015   end Initialize_1382;
23016
23017   ---------------------
23018   -- Initialize_1383 --
23019   ---------------------
23020
23021   procedure Initialize_1383 is
23022   begin
23023      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1383, (False, 0));
23024      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23025       (Base + 1383,
23026        AMF.Internals.Tables.UML_String_Data_03.MS_0321'Access);
23027      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1383, (False, (Unlimited => True)));
23028      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1383, (False, AMF.CMOF.Public_Visibility));
23029   end Initialize_1383;
23030
23031   ---------------------
23032   -- Initialize_1384 --
23033   ---------------------
23034
23035   procedure Initialize_1384 is
23036   begin
23037      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1384, (False, 0));
23038      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23039       (Base + 1384,
23040        AMF.Internals.Tables.UML_String_Data_0C.MS_0C4E'Access);
23041      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1384, (False, (Unlimited => True)));
23042      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1384, (False, AMF.CMOF.Public_Visibility));
23043   end Initialize_1384;
23044
23045   ---------------------
23046   -- Initialize_1385 --
23047   ---------------------
23048
23049   procedure Initialize_1385 is
23050   begin
23051      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1385, (False, 0));
23052      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23053       (Base + 1385,
23054        AMF.Internals.Tables.UML_String_Data_04.MS_04EE'Access);
23055      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1385, (False, AMF.CMOF.Public_Visibility));
23056   end Initialize_1385;
23057
23058   ---------------------
23059   -- Initialize_1386 --
23060   ---------------------
23061
23062   procedure Initialize_1386 is
23063   begin
23064      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23065       (Base + 1386,
23066        AMF.Internals.Tables.UML_String_Data_05.MS_05B4'Access);
23067      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1386, (False, AMF.CMOF.Public_Visibility));
23068   end Initialize_1386;
23069
23070   ---------------------
23071   -- Initialize_1387 --
23072   ---------------------
23073
23074   procedure Initialize_1387 is
23075   begin
23076      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1387, (False, 0));
23077      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23078       (Base + 1387,
23079        AMF.Internals.Tables.UML_String_Data_09.MS_09B7'Access);
23080      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1387, (False, AMF.CMOF.Public_Visibility));
23081   end Initialize_1387;
23082
23083   ---------------------
23084   -- Initialize_1388 --
23085   ---------------------
23086
23087   procedure Initialize_1388 is
23088   begin
23089      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1388, (False, 0));
23090      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23091       (Base + 1388,
23092        AMF.Internals.Tables.UML_String_Data_01.MS_016F'Access);
23093      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1388, (False, (Unlimited => True)));
23094      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1388, (False, AMF.CMOF.Public_Visibility));
23095   end Initialize_1388;
23096
23097   ---------------------
23098   -- Initialize_1389 --
23099   ---------------------
23100
23101   procedure Initialize_1389 is
23102   begin
23103      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1389, (False, 0));
23104      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23105       (Base + 1389,
23106        AMF.Internals.Tables.UML_String_Data_0A.MS_0AE4'Access);
23107      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1389, (False, AMF.CMOF.Public_Visibility));
23108   end Initialize_1389;
23109
23110   ---------------------
23111   -- Initialize_1390 --
23112   ---------------------
23113
23114   procedure Initialize_1390 is
23115   begin
23116      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1390, (False, 0));
23117      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23118       (Base + 1390,
23119        AMF.Internals.Tables.UML_String_Data_0A.MS_0AA3'Access);
23120      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1390, (False, (Unlimited => True)));
23121      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1390, (False, AMF.CMOF.Public_Visibility));
23122   end Initialize_1390;
23123
23124   ---------------------
23125   -- Initialize_1391 --
23126   ---------------------
23127
23128   procedure Initialize_1391 is
23129   begin
23130      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1391, (False, 0));
23131      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23132       (Base + 1391,
23133        AMF.Internals.Tables.UML_String_Data_05.MS_05FF'Access);
23134      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1391, (False, (Unlimited => True)));
23135      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1391, (False, AMF.CMOF.Public_Visibility));
23136   end Initialize_1391;
23137
23138   ---------------------
23139   -- Initialize_1392 --
23140   ---------------------
23141
23142   procedure Initialize_1392 is
23143   begin
23144      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1392, (False, 0));
23145      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23146       (Base + 1392,
23147        AMF.Internals.Tables.UML_String_Data_0B.MS_0BE0'Access);
23148      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1392, (False, (Unlimited => True)));
23149      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1392, (False, AMF.CMOF.Public_Visibility));
23150   end Initialize_1392;
23151
23152   ---------------------
23153   -- Initialize_1393 --
23154   ---------------------
23155
23156   procedure Initialize_1393 is
23157   begin
23158      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1393, (False, 0));
23159      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23160       (Base + 1393,
23161        AMF.Internals.Tables.UML_String_Data_01.MS_01F4'Access);
23162      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1393, (False, (Unlimited => True)));
23163      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1393, (False, AMF.CMOF.Public_Visibility));
23164   end Initialize_1393;
23165
23166   ---------------------
23167   -- Initialize_1394 --
23168   ---------------------
23169
23170   procedure Initialize_1394 is
23171   begin
23172      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1394, (False, 0));
23173      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23174       (Base + 1394,
23175        AMF.Internals.Tables.UML_String_Data_08.MS_08BE'Access);
23176      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1394, (False, (Unlimited => True)));
23177      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1394, (False, AMF.CMOF.Public_Visibility));
23178   end Initialize_1394;
23179
23180   ---------------------
23181   -- Initialize_1395 --
23182   ---------------------
23183
23184   procedure Initialize_1395 is
23185   begin
23186      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1395, (False, 0));
23187      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23188       (Base + 1395,
23189        AMF.Internals.Tables.UML_String_Data_08.MS_08BE'Access);
23190      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1395, (False, (Unlimited => True)));
23191      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1395, (False, AMF.CMOF.Public_Visibility));
23192   end Initialize_1395;
23193
23194   ---------------------
23195   -- Initialize_1396 --
23196   ---------------------
23197
23198   procedure Initialize_1396 is
23199   begin
23200      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1396, (False, 0));
23201      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23202       (Base + 1396,
23203        AMF.Internals.Tables.UML_String_Data_03.MS_0321'Access);
23204      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1396, (False, (Unlimited => True)));
23205      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1396, (False, AMF.CMOF.Public_Visibility));
23206   end Initialize_1396;
23207
23208   ---------------------
23209   -- Initialize_1397 --
23210   ---------------------
23211
23212   procedure Initialize_1397 is
23213   begin
23214      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1397, (False, 0));
23215      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23216       (Base + 1397,
23217        AMF.Internals.Tables.UML_String_Data_04.MS_04B7'Access);
23218      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1397, (False, (Unlimited => True)));
23219      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1397, (False, AMF.CMOF.Public_Visibility));
23220   end Initialize_1397;
23221
23222   ---------------------
23223   -- Initialize_1398 --
23224   ---------------------
23225
23226   procedure Initialize_1398 is
23227   begin
23228      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1398, (False, 0));
23229      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23230       (Base + 1398,
23231        AMF.Internals.Tables.UML_String_Data_04.MS_0464'Access);
23232      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1398, (False, AMF.CMOF.Public_Visibility));
23233   end Initialize_1398;
23234
23235   ---------------------
23236   -- Initialize_1399 --
23237   ---------------------
23238
23239   procedure Initialize_1399 is
23240   begin
23241      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1399, (False, 0));
23242      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23243       (Base + 1399,
23244        AMF.Internals.Tables.UML_String_Data_09.MS_0943'Access);
23245      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1399, (False, AMF.CMOF.Public_Visibility));
23246   end Initialize_1399;
23247
23248   ---------------------
23249   -- Initialize_1400 --
23250   ---------------------
23251
23252   procedure Initialize_1400 is
23253   begin
23254      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1400, (False, 0));
23255      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23256       (Base + 1400,
23257        AMF.Internals.Tables.UML_String_Data_07.MS_07C7'Access);
23258      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1400, (False, AMF.CMOF.Public_Visibility));
23259   end Initialize_1400;
23260
23261   ---------------------
23262   -- Initialize_1401 --
23263   ---------------------
23264
23265   procedure Initialize_1401 is
23266   begin
23267      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1401, (False, 0));
23268      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23269       (Base + 1401,
23270        AMF.Internals.Tables.UML_String_Data_09.MS_0973'Access);
23271      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1401, (False, AMF.CMOF.Public_Visibility));
23272   end Initialize_1401;
23273
23274   ---------------------
23275   -- Initialize_1402 --
23276   ---------------------
23277
23278   procedure Initialize_1402 is
23279   begin
23280      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1402, (False, 0));
23281      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23282       (Base + 1402,
23283        AMF.Internals.Tables.UML_String_Data_00.MS_000B'Access);
23284      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1402, (False, AMF.CMOF.Public_Visibility));
23285   end Initialize_1402;
23286
23287   ---------------------
23288   -- Initialize_1403 --
23289   ---------------------
23290
23291   procedure Initialize_1403 is
23292   begin
23293      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1403, (False, 0));
23294      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23295       (Base + 1403,
23296        AMF.Internals.Tables.UML_String_Data_06.MS_066D'Access);
23297      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1403, (False, AMF.CMOF.Public_Visibility));
23298   end Initialize_1403;
23299
23300   ---------------------
23301   -- Initialize_1404 --
23302   ---------------------
23303
23304   procedure Initialize_1404 is
23305   begin
23306      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1404, (False, 0));
23307      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23308       (Base + 1404,
23309        AMF.Internals.Tables.UML_String_Data_0A.MS_0A6C'Access);
23310      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1404, (False, (Unlimited => True)));
23311      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1404, (False, AMF.CMOF.Public_Visibility));
23312   end Initialize_1404;
23313
23314   ---------------------
23315   -- Initialize_1405 --
23316   ---------------------
23317
23318   procedure Initialize_1405 is
23319   begin
23320      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1405, (False, 0));
23321      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23322       (Base + 1405,
23323        AMF.Internals.Tables.UML_String_Data_06.MS_06E3'Access);
23324      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1405, (False, AMF.CMOF.Public_Visibility));
23325   end Initialize_1405;
23326
23327   ---------------------
23328   -- Initialize_1406 --
23329   ---------------------
23330
23331   procedure Initialize_1406 is
23332   begin
23333      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1406, (False, 0));
23334      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23335       (Base + 1406,
23336        AMF.Internals.Tables.UML_String_Data_01.MS_012F'Access);
23337      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1406, (False, AMF.CMOF.Public_Visibility));
23338   end Initialize_1406;
23339
23340   ---------------------
23341   -- Initialize_1407 --
23342   ---------------------
23343
23344   procedure Initialize_1407 is
23345   begin
23346      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1407, (False, 0));
23347      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23348       (Base + 1407,
23349        AMF.Internals.Tables.UML_String_Data_07.MS_07C7'Access);
23350      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1407, (False, AMF.CMOF.Public_Visibility));
23351   end Initialize_1407;
23352
23353   ---------------------
23354   -- Initialize_1408 --
23355   ---------------------
23356
23357   procedure Initialize_1408 is
23358   begin
23359      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1408, (False, 0));
23360      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23361       (Base + 1408,
23362        AMF.Internals.Tables.UML_String_Data_07.MS_07C7'Access);
23363      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1408, (False, AMF.CMOF.Public_Visibility));
23364   end Initialize_1408;
23365
23366   ---------------------
23367   -- Initialize_1409 --
23368   ---------------------
23369
23370   procedure Initialize_1409 is
23371   begin
23372      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1409, (False, 0));
23373      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23374       (Base + 1409,
23375        AMF.Internals.Tables.UML_String_Data_05.MS_05E9'Access);
23376      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1409, (False, AMF.CMOF.Public_Visibility));
23377   end Initialize_1409;
23378
23379   ---------------------
23380   -- Initialize_1410 --
23381   ---------------------
23382
23383   procedure Initialize_1410 is
23384   begin
23385      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1410, (False, 0));
23386      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23387       (Base + 1410,
23388        AMF.Internals.Tables.UML_String_Data_05.MS_05E9'Access);
23389      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1410, (False, AMF.CMOF.Public_Visibility));
23390   end Initialize_1410;
23391
23392   ---------------------
23393   -- Initialize_1411 --
23394   ---------------------
23395
23396   procedure Initialize_1411 is
23397   begin
23398      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1411, (False, 0));
23399      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23400       (Base + 1411,
23401        AMF.Internals.Tables.UML_String_Data_06.MS_06F5'Access);
23402      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1411, (False, AMF.CMOF.Public_Visibility));
23403   end Initialize_1411;
23404
23405   ---------------------
23406   -- Initialize_1412 --
23407   ---------------------
23408
23409   procedure Initialize_1412 is
23410   begin
23411      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23412       (Base + 1412,
23413        AMF.Internals.Tables.UML_String_Data_01.MS_0190'Access);
23414      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1412, (False, AMF.CMOF.Public_Visibility));
23415   end Initialize_1412;
23416
23417   ---------------------
23418   -- Initialize_1413 --
23419   ---------------------
23420
23421   procedure Initialize_1413 is
23422   begin
23423      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1413, (False, 0));
23424      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23425       (Base + 1413,
23426        AMF.Internals.Tables.UML_String_Data_0A.MS_0ADA'Access);
23427      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1413, (False, AMF.CMOF.Public_Visibility));
23428   end Initialize_1413;
23429
23430   ---------------------
23431   -- Initialize_1414 --
23432   ---------------------
23433
23434   procedure Initialize_1414 is
23435   begin
23436      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1414, (False, 0));
23437      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23438       (Base + 1414,
23439        AMF.Internals.Tables.UML_String_Data_00.MS_00C8'Access);
23440      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1414, (False, (Unlimited => True)));
23441      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1414, (False, AMF.CMOF.Public_Visibility));
23442   end Initialize_1414;
23443
23444   ---------------------
23445   -- Initialize_1415 --
23446   ---------------------
23447
23448   procedure Initialize_1415 is
23449   begin
23450      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1415, (False, 0));
23451      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23452       (Base + 1415,
23453        AMF.Internals.Tables.UML_String_Data_0A.MS_0A62'Access);
23454      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1415, (False, (Unlimited => True)));
23455      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1415, (False, AMF.CMOF.Public_Visibility));
23456   end Initialize_1415;
23457
23458   ---------------------
23459   -- Initialize_1416 --
23460   ---------------------
23461
23462   procedure Initialize_1416 is
23463   begin
23464      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1416, (False, 0));
23465      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23466       (Base + 1416,
23467        AMF.Internals.Tables.UML_String_Data_03.MS_0393'Access);
23468      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1416, (False, (Unlimited => True)));
23469      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1416, (False, AMF.CMOF.Public_Visibility));
23470   end Initialize_1416;
23471
23472   ---------------------
23473   -- Initialize_1417 --
23474   ---------------------
23475
23476   procedure Initialize_1417 is
23477   begin
23478      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1417, (False, 0));
23479      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23480       (Base + 1417,
23481        AMF.Internals.Tables.UML_String_Data_0B.MS_0B9D'Access);
23482      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1417, (False, AMF.CMOF.Public_Visibility));
23483   end Initialize_1417;
23484
23485   ---------------------
23486   -- Initialize_1418 --
23487   ---------------------
23488
23489   procedure Initialize_1418 is
23490   begin
23491      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1418, (False, 0));
23492      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23493       (Base + 1418,
23494        AMF.Internals.Tables.UML_String_Data_06.MS_061A'Access);
23495      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1418, (False, (Unlimited => True)));
23496      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1418, (False, AMF.CMOF.Public_Visibility));
23497   end Initialize_1418;
23498
23499   ---------------------
23500   -- Initialize_1419 --
23501   ---------------------
23502
23503   procedure Initialize_1419 is
23504   begin
23505      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1419, (False, 0));
23506      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23507       (Base + 1419,
23508        AMF.Internals.Tables.UML_String_Data_04.MS_0466'Access);
23509      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1419, (False, (Unlimited => True)));
23510      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1419, (False, AMF.CMOF.Public_Visibility));
23511   end Initialize_1419;
23512
23513   ---------------------
23514   -- Initialize_1420 --
23515   ---------------------
23516
23517   procedure Initialize_1420 is
23518   begin
23519      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1420, (False, 0));
23520      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23521       (Base + 1420,
23522        AMF.Internals.Tables.UML_String_Data_02.MS_027A'Access);
23523      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1420, (False, (Unlimited => True)));
23524      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1420, (False, AMF.CMOF.Public_Visibility));
23525   end Initialize_1420;
23526
23527   ---------------------
23528   -- Initialize_1421 --
23529   ---------------------
23530
23531   procedure Initialize_1421 is
23532   begin
23533      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1421, (False, 0));
23534      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23535       (Base + 1421,
23536        AMF.Internals.Tables.UML_String_Data_02.MS_02E6'Access);
23537      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1421, (False, (False, 2)));
23538      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1421, (False, AMF.CMOF.Public_Visibility));
23539   end Initialize_1421;
23540
23541   ---------------------
23542   -- Initialize_1422 --
23543   ---------------------
23544
23545   procedure Initialize_1422 is
23546   begin
23547      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1422, (False, 0));
23548      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23549       (Base + 1422,
23550        AMF.Internals.Tables.UML_String_Data_0B.MS_0BB8'Access);
23551      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1422, (False, AMF.CMOF.Public_Visibility));
23552   end Initialize_1422;
23553
23554   ---------------------
23555   -- Initialize_1423 --
23556   ---------------------
23557
23558   procedure Initialize_1423 is
23559   begin
23560      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1423, (False, 0));
23561      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23562       (Base + 1423,
23563        AMF.Internals.Tables.UML_String_Data_0B.MS_0BB8'Access);
23564      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1423, (False, AMF.CMOF.Public_Visibility));
23565   end Initialize_1423;
23566
23567   ---------------------
23568   -- Initialize_1424 --
23569   ---------------------
23570
23571   procedure Initialize_1424 is
23572   begin
23573      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1424, (False, 0));
23574      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23575       (Base + 1424,
23576        AMF.Internals.Tables.UML_String_Data_00.MS_00C8'Access);
23577      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1424, (False, (Unlimited => True)));
23578      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1424, (False, AMF.CMOF.Public_Visibility));
23579   end Initialize_1424;
23580
23581   ---------------------
23582   -- Initialize_1425 --
23583   ---------------------
23584
23585   procedure Initialize_1425 is
23586   begin
23587      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1425, (False, 0));
23588      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23589       (Base + 1425,
23590        AMF.Internals.Tables.UML_String_Data_0A.MS_0A62'Access);
23591      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1425, (False, (Unlimited => True)));
23592      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1425, (False, AMF.CMOF.Public_Visibility));
23593   end Initialize_1425;
23594
23595   ---------------------
23596   -- Initialize_1426 --
23597   ---------------------
23598
23599   procedure Initialize_1426 is
23600   begin
23601      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1426, (False, 0));
23602      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23603       (Base + 1426,
23604        AMF.Internals.Tables.UML_String_Data_03.MS_0393'Access);
23605      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1426, (False, (Unlimited => True)));
23606      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1426, (False, AMF.CMOF.Public_Visibility));
23607   end Initialize_1426;
23608
23609   ---------------------
23610   -- Initialize_1427 --
23611   ---------------------
23612
23613   procedure Initialize_1427 is
23614   begin
23615      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1427, (False, 0));
23616      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23617       (Base + 1427,
23618        AMF.Internals.Tables.UML_String_Data_0B.MS_0B9D'Access);
23619      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1427, (False, AMF.CMOF.Public_Visibility));
23620   end Initialize_1427;
23621
23622   ---------------------
23623   -- Initialize_1428 --
23624   ---------------------
23625
23626   procedure Initialize_1428 is
23627   begin
23628      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1428, (False, 0));
23629      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23630       (Base + 1428,
23631        AMF.Internals.Tables.UML_String_Data_02.MS_021F'Access);
23632      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1428, (False, AMF.CMOF.Public_Visibility));
23633   end Initialize_1428;
23634
23635   ---------------------
23636   -- Initialize_1429 --
23637   ---------------------
23638
23639   procedure Initialize_1429 is
23640   begin
23641      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1429, (False, 0));
23642      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23643       (Base + 1429,
23644        AMF.Internals.Tables.UML_String_Data_0A.MS_0A43'Access);
23645      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1429, (False, AMF.CMOF.Public_Visibility));
23646   end Initialize_1429;
23647
23648   ---------------------
23649   -- Initialize_1430 --
23650   ---------------------
23651
23652   procedure Initialize_1430 is
23653   begin
23654      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1430, (False, 0));
23655      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23656       (Base + 1430,
23657        AMF.Internals.Tables.UML_String_Data_01.MS_0190'Access);
23658      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1430, (False, AMF.CMOF.Public_Visibility));
23659   end Initialize_1430;
23660
23661   ---------------------
23662   -- Initialize_1431 --
23663   ---------------------
23664
23665   procedure Initialize_1431 is
23666   begin
23667      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1431, (False, 0));
23668      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23669       (Base + 1431,
23670        AMF.Internals.Tables.UML_String_Data_04.MS_0494'Access);
23671      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1431, (False, AMF.CMOF.Public_Visibility));
23672   end Initialize_1431;
23673
23674   ---------------------
23675   -- Initialize_1432 --
23676   ---------------------
23677
23678   procedure Initialize_1432 is
23679   begin
23680      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1432, (False, 0));
23681      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23682       (Base + 1432,
23683        AMF.Internals.Tables.UML_String_Data_07.MS_07C5'Access);
23684      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1432, (False, AMF.CMOF.Public_Visibility));
23685   end Initialize_1432;
23686
23687   ---------------------
23688   -- Initialize_1433 --
23689   ---------------------
23690
23691   procedure Initialize_1433 is
23692   begin
23693      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1433, (False, 0));
23694      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23695       (Base + 1433,
23696        AMF.Internals.Tables.UML_String_Data_07.MS_07A4'Access);
23697      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1433, (False, AMF.CMOF.Public_Visibility));
23698   end Initialize_1433;
23699
23700   ---------------------
23701   -- Initialize_1434 --
23702   ---------------------
23703
23704   procedure Initialize_1434 is
23705   begin
23706      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1434, (False, 0));
23707      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23708       (Base + 1434,
23709        AMF.Internals.Tables.UML_String_Data_03.MS_0364'Access);
23710      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1434, (False, (Unlimited => True)));
23711      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1434, (False, AMF.CMOF.Public_Visibility));
23712   end Initialize_1434;
23713
23714   ---------------------
23715   -- Initialize_1435 --
23716   ---------------------
23717
23718   procedure Initialize_1435 is
23719   begin
23720      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1435, (False, 0));
23721      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23722       (Base + 1435,
23723        AMF.Internals.Tables.UML_String_Data_05.MS_0596'Access);
23724      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1435, (False, AMF.CMOF.Public_Visibility));
23725   end Initialize_1435;
23726
23727   ---------------------
23728   -- Initialize_1436 --
23729   ---------------------
23730
23731   procedure Initialize_1436 is
23732   begin
23733      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1436, (False, 0));
23734      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23735       (Base + 1436,
23736        AMF.Internals.Tables.UML_String_Data_07.MS_07DD'Access);
23737      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1436, (False, AMF.CMOF.Public_Visibility));
23738   end Initialize_1436;
23739
23740   ---------------------
23741   -- Initialize_1437 --
23742   ---------------------
23743
23744   procedure Initialize_1437 is
23745   begin
23746      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1437, (False, 0));
23747      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23748       (Base + 1437,
23749        AMF.Internals.Tables.UML_String_Data_0A.MS_0A9D'Access);
23750      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1437, (False, AMF.CMOF.Public_Visibility));
23751   end Initialize_1437;
23752
23753   ---------------------
23754   -- Initialize_1438 --
23755   ---------------------
23756
23757   procedure Initialize_1438 is
23758   begin
23759      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1438, (False, 0));
23760      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23761       (Base + 1438,
23762        AMF.Internals.Tables.UML_String_Data_00.MS_00BE'Access);
23763      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1438, (False, AMF.CMOF.Public_Visibility));
23764   end Initialize_1438;
23765
23766   ---------------------
23767   -- Initialize_1439 --
23768   ---------------------
23769
23770   procedure Initialize_1439 is
23771   begin
23772      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1439, (False, 0));
23773      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23774       (Base + 1439,
23775        AMF.Internals.Tables.UML_String_Data_03.MS_0364'Access);
23776      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1439, (False, AMF.CMOF.Public_Visibility));
23777   end Initialize_1439;
23778
23779   ---------------------
23780   -- Initialize_1440 --
23781   ---------------------
23782
23783   procedure Initialize_1440 is
23784   begin
23785      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1440, (False, 0));
23786      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23787       (Base + 1440,
23788        AMF.Internals.Tables.UML_String_Data_08.MS_084E'Access);
23789      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1440, (False, AMF.CMOF.Public_Visibility));
23790   end Initialize_1440;
23791
23792   ---------------------
23793   -- Initialize_1441 --
23794   ---------------------
23795
23796   procedure Initialize_1441 is
23797   begin
23798      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1441, (False, 0));
23799      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23800       (Base + 1441,
23801        AMF.Internals.Tables.UML_String_Data_02.MS_02A6'Access);
23802      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1441, (False, AMF.CMOF.Public_Visibility));
23803   end Initialize_1441;
23804
23805   ---------------------
23806   -- Initialize_1442 --
23807   ---------------------
23808
23809   procedure Initialize_1442 is
23810   begin
23811      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1442, (False, 0));
23812      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23813       (Base + 1442,
23814        AMF.Internals.Tables.UML_String_Data_0B.MS_0B4F'Access);
23815      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1442, (False, AMF.CMOF.Public_Visibility));
23816   end Initialize_1442;
23817
23818   ---------------------
23819   -- Initialize_1443 --
23820   ---------------------
23821
23822   procedure Initialize_1443 is
23823   begin
23824      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1443, (False, 0));
23825      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23826       (Base + 1443,
23827        AMF.Internals.Tables.UML_String_Data_0B.MS_0BF3'Access);
23828      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1443, (False, AMF.CMOF.Public_Visibility));
23829   end Initialize_1443;
23830
23831   ---------------------
23832   -- Initialize_1444 --
23833   ---------------------
23834
23835   procedure Initialize_1444 is
23836   begin
23837      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1444, (False, 0));
23838      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23839       (Base + 1444,
23840        AMF.Internals.Tables.UML_String_Data_04.MS_0421'Access);
23841      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1444, (False, AMF.CMOF.Public_Visibility));
23842   end Initialize_1444;
23843
23844   ---------------------
23845   -- Initialize_1445 --
23846   ---------------------
23847
23848   procedure Initialize_1445 is
23849   begin
23850      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1445, (False, 0));
23851      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23852       (Base + 1445,
23853        AMF.Internals.Tables.UML_String_Data_01.MS_0160'Access);
23854      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1445, (False, AMF.CMOF.Public_Visibility));
23855   end Initialize_1445;
23856
23857   ---------------------
23858   -- Initialize_1446 --
23859   ---------------------
23860
23861   procedure Initialize_1446 is
23862   begin
23863      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1446, (False, 0));
23864      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23865       (Base + 1446,
23866        AMF.Internals.Tables.UML_String_Data_03.MS_0364'Access);
23867      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1446, (False, (Unlimited => True)));
23868      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1446, (False, AMF.CMOF.Public_Visibility));
23869   end Initialize_1446;
23870
23871   ---------------------
23872   -- Initialize_1447 --
23873   ---------------------
23874
23875   procedure Initialize_1447 is
23876   begin
23877      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1447, (False, 0));
23878      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23879       (Base + 1447,
23880        AMF.Internals.Tables.UML_String_Data_09.MS_09A3'Access);
23881      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1447, (False, (Unlimited => True)));
23882      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1447, (False, AMF.CMOF.Public_Visibility));
23883   end Initialize_1447;
23884
23885   ---------------------
23886   -- Initialize_1448 --
23887   ---------------------
23888
23889   procedure Initialize_1448 is
23890   begin
23891      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1448, (False, 0));
23892      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23893       (Base + 1448,
23894        AMF.Internals.Tables.UML_String_Data_0A.MS_0AC7'Access);
23895      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1448, (False, AMF.CMOF.Public_Visibility));
23896   end Initialize_1448;
23897
23898   ---------------------
23899   -- Initialize_1449 --
23900   ---------------------
23901
23902   procedure Initialize_1449 is
23903   begin
23904      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1449, (False, 0));
23905      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23906       (Base + 1449,
23907        AMF.Internals.Tables.UML_String_Data_03.MS_039B'Access);
23908      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1449, (False, AMF.CMOF.Public_Visibility));
23909   end Initialize_1449;
23910
23911   ---------------------
23912   -- Initialize_1450 --
23913   ---------------------
23914
23915   procedure Initialize_1450 is
23916   begin
23917      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1450, (False, 0));
23918      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23919       (Base + 1450,
23920        AMF.Internals.Tables.UML_String_Data_05.MS_0516'Access);
23921      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1450, (False, (Unlimited => True)));
23922      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1450, (False, AMF.CMOF.Public_Visibility));
23923   end Initialize_1450;
23924
23925   ---------------------
23926   -- Initialize_1451 --
23927   ---------------------
23928
23929   procedure Initialize_1451 is
23930   begin
23931      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1451, (False, 0));
23932      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23933       (Base + 1451,
23934        AMF.Internals.Tables.UML_String_Data_02.MS_0232'Access);
23935      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1451, (False, (Unlimited => True)));
23936      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1451, (False, AMF.CMOF.Public_Visibility));
23937   end Initialize_1451;
23938
23939   ---------------------
23940   -- Initialize_1452 --
23941   ---------------------
23942
23943   procedure Initialize_1452 is
23944   begin
23945      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1452, (False, 0));
23946      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23947       (Base + 1452,
23948        AMF.Internals.Tables.UML_String_Data_00.MS_0051'Access);
23949      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1452, (False, AMF.CMOF.Public_Visibility));
23950   end Initialize_1452;
23951
23952   ---------------------
23953   -- Initialize_1453 --
23954   ---------------------
23955
23956   procedure Initialize_1453 is
23957   begin
23958      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1453, (False, 0));
23959      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23960       (Base + 1453,
23961        AMF.Internals.Tables.UML_String_Data_09.MS_0943'Access);
23962      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1453, (False, AMF.CMOF.Public_Visibility));
23963   end Initialize_1453;
23964
23965   ---------------------
23966   -- Initialize_1454 --
23967   ---------------------
23968
23969   procedure Initialize_1454 is
23970   begin
23971      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1454, (False, 0));
23972      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23973       (Base + 1454,
23974        AMF.Internals.Tables.UML_String_Data_07.MS_07C7'Access);
23975      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1454, (False, AMF.CMOF.Public_Visibility));
23976   end Initialize_1454;
23977
23978   ---------------------
23979   -- Initialize_1455 --
23980   ---------------------
23981
23982   procedure Initialize_1455 is
23983   begin
23984      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1455, (False, 0));
23985      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23986       (Base + 1455,
23987        AMF.Internals.Tables.UML_String_Data_09.MS_0938'Access);
23988      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1455, (False, AMF.CMOF.Public_Visibility));
23989   end Initialize_1455;
23990
23991   ---------------------
23992   -- Initialize_1456 --
23993   ---------------------
23994
23995   procedure Initialize_1456 is
23996   begin
23997      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1456, (False, 0));
23998      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
23999       (Base + 1456,
24000        AMF.Internals.Tables.UML_String_Data_01.MS_0190'Access);
24001      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1456, (False, AMF.CMOF.Public_Visibility));
24002   end Initialize_1456;
24003
24004   ---------------------
24005   -- Initialize_1457 --
24006   ---------------------
24007
24008   procedure Initialize_1457 is
24009   begin
24010      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1457, (False, 0));
24011      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24012       (Base + 1457,
24013        AMF.Internals.Tables.UML_String_Data_06.MS_06A4'Access);
24014      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1457, (False, AMF.CMOF.Public_Visibility));
24015   end Initialize_1457;
24016
24017   ---------------------
24018   -- Initialize_1458 --
24019   ---------------------
24020
24021   procedure Initialize_1458 is
24022   begin
24023      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1458, (False, 0));
24024      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24025       (Base + 1458,
24026        AMF.Internals.Tables.UML_String_Data_0A.MS_0A06'Access);
24027      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1458, (False, AMF.CMOF.Public_Visibility));
24028   end Initialize_1458;
24029
24030   ---------------------
24031   -- Initialize_1459 --
24032   ---------------------
24033
24034   procedure Initialize_1459 is
24035   begin
24036      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1459, (False, 0));
24037      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24038       (Base + 1459,
24039        AMF.Internals.Tables.UML_String_Data_0C.MS_0C75'Access);
24040      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1459, (False, AMF.CMOF.Public_Visibility));
24041   end Initialize_1459;
24042
24043   ---------------------
24044   -- Initialize_1460 --
24045   ---------------------
24046
24047   procedure Initialize_1460 is
24048   begin
24049      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1460, (False, 0));
24050      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24051       (Base + 1460,
24052        AMF.Internals.Tables.UML_String_Data_03.MS_0385'Access);
24053      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1460, (False, AMF.CMOF.Public_Visibility));
24054   end Initialize_1460;
24055
24056   ---------------------
24057   -- Initialize_1461 --
24058   ---------------------
24059
24060   procedure Initialize_1461 is
24061   begin
24062      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1461, (False, 0));
24063      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24064       (Base + 1461,
24065        AMF.Internals.Tables.UML_String_Data_0A.MS_0A06'Access);
24066      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1461, (False, AMF.CMOF.Public_Visibility));
24067   end Initialize_1461;
24068
24069   ---------------------
24070   -- Initialize_1462 --
24071   ---------------------
24072
24073   procedure Initialize_1462 is
24074   begin
24075      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1462, (False, 0));
24076      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24077       (Base + 1462,
24078        AMF.Internals.Tables.UML_String_Data_01.MS_01BF'Access);
24079      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1462, (False, AMF.CMOF.Public_Visibility));
24080   end Initialize_1462;
24081
24082   ---------------------
24083   -- Initialize_1463 --
24084   ---------------------
24085
24086   procedure Initialize_1463 is
24087   begin
24088      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24089       (Base + 1463,
24090        AMF.Internals.Tables.UML_String_Data_02.MS_0202'Access);
24091      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1463, (False, AMF.CMOF.Public_Visibility));
24092   end Initialize_1463;
24093
24094   ---------------------
24095   -- Initialize_1464 --
24096   ---------------------
24097
24098   procedure Initialize_1464 is
24099   begin
24100      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1464, (False, 0));
24101      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24102       (Base + 1464,
24103        AMF.Internals.Tables.UML_String_Data_01.MS_0190'Access);
24104      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1464, (False, AMF.CMOF.Public_Visibility));
24105   end Initialize_1464;
24106
24107   ---------------------
24108   -- Initialize_1465 --
24109   ---------------------
24110
24111   procedure Initialize_1465 is
24112   begin
24113      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1465, (False, 0));
24114      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24115       (Base + 1465,
24116        AMF.Internals.Tables.UML_String_Data_02.MS_029D'Access);
24117      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1465, (False, AMF.CMOF.Public_Visibility));
24118   end Initialize_1465;
24119
24120   ---------------------
24121   -- Initialize_1466 --
24122   ---------------------
24123
24124   procedure Initialize_1466 is
24125   begin
24126      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1466, (False, 0));
24127      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24128       (Base + 1466,
24129        AMF.Internals.Tables.UML_String_Data_0A.MS_0AC6'Access);
24130      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1466, (False, AMF.CMOF.Public_Visibility));
24131   end Initialize_1466;
24132
24133   ---------------------
24134   -- Initialize_1467 --
24135   ---------------------
24136
24137   procedure Initialize_1467 is
24138   begin
24139      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1467, (False, 0));
24140      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24141       (Base + 1467,
24142        AMF.Internals.Tables.UML_String_Data_02.MS_029D'Access);
24143      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1467, (False, AMF.CMOF.Public_Visibility));
24144   end Initialize_1467;
24145
24146   ---------------------
24147   -- Initialize_1468 --
24148   ---------------------
24149
24150   procedure Initialize_1468 is
24151   begin
24152      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1468, (False, 0));
24153      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24154       (Base + 1468,
24155        AMF.Internals.Tables.UML_String_Data_03.MS_03C6'Access);
24156      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1468, (False, AMF.CMOF.Public_Visibility));
24157   end Initialize_1468;
24158
24159   ---------------------
24160   -- Initialize_1469 --
24161   ---------------------
24162
24163   procedure Initialize_1469 is
24164   begin
24165      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1469, (False, 0));
24166      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24167       (Base + 1469,
24168        AMF.Internals.Tables.UML_String_Data_0A.MS_0A97'Access);
24169      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1469, (False, AMF.CMOF.Public_Visibility));
24170   end Initialize_1469;
24171
24172   ---------------------
24173   -- Initialize_1470 --
24174   ---------------------
24175
24176   procedure Initialize_1470 is
24177   begin
24178      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1470, (False, 0));
24179      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24180       (Base + 1470,
24181        AMF.Internals.Tables.UML_String_Data_04.MS_0494'Access);
24182      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1470, (False, AMF.CMOF.Public_Visibility));
24183   end Initialize_1470;
24184
24185   ---------------------
24186   -- Initialize_1471 --
24187   ---------------------
24188
24189   procedure Initialize_1471 is
24190   begin
24191      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1471, (False, 0));
24192      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24193       (Base + 1471,
24194        AMF.Internals.Tables.UML_String_Data_07.MS_07C5'Access);
24195      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1471, (False, AMF.CMOF.Public_Visibility));
24196   end Initialize_1471;
24197
24198   ---------------------
24199   -- Initialize_1472 --
24200   ---------------------
24201
24202   procedure Initialize_1472 is
24203   begin
24204      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24205       (Base + 1472,
24206        AMF.Internals.Tables.UML_String_Data_07.MS_0749'Access);
24207      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1472, (False, AMF.CMOF.Public_Visibility));
24208   end Initialize_1472;
24209
24210   ---------------------
24211   -- Initialize_1473 --
24212   ---------------------
24213
24214   procedure Initialize_1473 is
24215   begin
24216      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1473, (False, 0));
24217      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24218       (Base + 1473,
24219        AMF.Internals.Tables.UML_String_Data_03.MS_0321'Access);
24220      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1473, (False, AMF.CMOF.Public_Visibility));
24221   end Initialize_1473;
24222
24223   ---------------------
24224   -- Initialize_1474 --
24225   ---------------------
24226
24227   procedure Initialize_1474 is
24228   begin
24229      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1474, (False, 0));
24230      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24231       (Base + 1474,
24232        AMF.Internals.Tables.UML_String_Data_05.MS_05A4'Access);
24233      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1474, (False, AMF.CMOF.Public_Visibility));
24234   end Initialize_1474;
24235
24236   ---------------------
24237   -- Initialize_1475 --
24238   ---------------------
24239
24240   procedure Initialize_1475 is
24241   begin
24242      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1475, (False, 0));
24243      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24244       (Base + 1475,
24245        AMF.Internals.Tables.UML_String_Data_07.MS_0749'Access);
24246      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1475, (False, AMF.CMOF.Public_Visibility));
24247   end Initialize_1475;
24248
24249   ---------------------
24250   -- Initialize_1476 --
24251   ---------------------
24252
24253   procedure Initialize_1476 is
24254   begin
24255      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1476, (False, 0));
24256      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24257       (Base + 1476,
24258        AMF.Internals.Tables.UML_String_Data_09.MS_0909'Access);
24259      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1476, (False, (Unlimited => True)));
24260      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1476, (False, AMF.CMOF.Public_Visibility));
24261   end Initialize_1476;
24262
24263   ---------------------
24264   -- Initialize_1477 --
24265   ---------------------
24266
24267   procedure Initialize_1477 is
24268   begin
24269      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1477, (False, 0));
24270      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24271       (Base + 1477,
24272        AMF.Internals.Tables.UML_String_Data_03.MS_0350'Access);
24273      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1477, (False, (Unlimited => True)));
24274      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1477, (False, AMF.CMOF.Public_Visibility));
24275   end Initialize_1477;
24276
24277   ---------------------
24278   -- Initialize_1478 --
24279   ---------------------
24280
24281   procedure Initialize_1478 is
24282   begin
24283      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1478, (False, 0));
24284      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24285       (Base + 1478,
24286        AMF.Internals.Tables.UML_String_Data_06.MS_06BA'Access);
24287      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1478, (False, (Unlimited => True)));
24288      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1478, (False, AMF.CMOF.Public_Visibility));
24289   end Initialize_1478;
24290
24291   ---------------------
24292   -- Initialize_1479 --
24293   ---------------------
24294
24295   procedure Initialize_1479 is
24296   begin
24297      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1479, (False, 0));
24298      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24299       (Base + 1479,
24300        AMF.Internals.Tables.UML_String_Data_0A.MS_0A06'Access);
24301      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1479, (False, AMF.CMOF.Public_Visibility));
24302   end Initialize_1479;
24303
24304   ---------------------
24305   -- Initialize_1480 --
24306   ---------------------
24307
24308   procedure Initialize_1480 is
24309   begin
24310      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1480, (False, 0));
24311      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24312       (Base + 1480,
24313        AMF.Internals.Tables.UML_String_Data_09.MS_09A4'Access);
24314      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1480, (False, AMF.CMOF.Public_Visibility));
24315   end Initialize_1480;
24316
24317   ---------------------
24318   -- Initialize_1481 --
24319   ---------------------
24320
24321   procedure Initialize_1481 is
24322   begin
24323      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1481, (False, 0));
24324      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24325       (Base + 1481,
24326        AMF.Internals.Tables.UML_String_Data_07.MS_073C'Access);
24327      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1481, (False, (Unlimited => True)));
24328      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1481, (False, AMF.CMOF.Public_Visibility));
24329   end Initialize_1481;
24330
24331   ---------------------
24332   -- Initialize_1482 --
24333   ---------------------
24334
24335   procedure Initialize_1482 is
24336   begin
24337      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1482, (False, 0));
24338      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24339       (Base + 1482,
24340        AMF.Internals.Tables.UML_String_Data_02.MS_0260'Access);
24341      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1482, (False, AMF.CMOF.Public_Visibility));
24342   end Initialize_1482;
24343
24344   ---------------------
24345   -- Initialize_1483 --
24346   ---------------------
24347
24348   procedure Initialize_1483 is
24349   begin
24350      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1483, (False, 0));
24351      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24352       (Base + 1483,
24353        AMF.Internals.Tables.UML_String_Data_02.MS_029D'Access);
24354      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1483, (False, AMF.CMOF.Public_Visibility));
24355   end Initialize_1483;
24356
24357   ---------------------
24358   -- Initialize_1484 --
24359   ---------------------
24360
24361   procedure Initialize_1484 is
24362   begin
24363      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1484, (False, 0));
24364      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24365       (Base + 1484,
24366        AMF.Internals.Tables.UML_String_Data_04.MS_046F'Access);
24367      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1484, (False, AMF.CMOF.Public_Visibility));
24368   end Initialize_1484;
24369
24370   ---------------------
24371   -- Initialize_1485 --
24372   ---------------------
24373
24374   procedure Initialize_1485 is
24375   begin
24376      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1485, (False, 0));
24377      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24378       (Base + 1485,
24379        AMF.Internals.Tables.UML_String_Data_07.MS_074A'Access);
24380      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1485, (False, AMF.CMOF.Public_Visibility));
24381   end Initialize_1485;
24382
24383   ---------------------
24384   -- Initialize_1486 --
24385   ---------------------
24386
24387   procedure Initialize_1486 is
24388   begin
24389      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1486, (False, 0));
24390      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24391       (Base + 1486,
24392        AMF.Internals.Tables.UML_String_Data_02.MS_029D'Access);
24393      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1486, (False, AMF.CMOF.Public_Visibility));
24394   end Initialize_1486;
24395
24396   ---------------------
24397   -- Initialize_1487 --
24398   ---------------------
24399
24400   procedure Initialize_1487 is
24401   begin
24402      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1487, (False, 0));
24403      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24404       (Base + 1487,
24405        AMF.Internals.Tables.UML_String_Data_03.MS_031F'Access);
24406      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1487, (False, AMF.CMOF.Public_Visibility));
24407   end Initialize_1487;
24408
24409   ---------------------
24410   -- Initialize_1488 --
24411   ---------------------
24412
24413   procedure Initialize_1488 is
24414   begin
24415      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1488, (False, 0));
24416      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24417       (Base + 1488,
24418        AMF.Internals.Tables.UML_String_Data_0A.MS_0AE4'Access);
24419      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1488, (False, (Unlimited => True)));
24420      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1488, (False, AMF.CMOF.Public_Visibility));
24421   end Initialize_1488;
24422
24423   ---------------------
24424   -- Initialize_1489 --
24425   ---------------------
24426
24427   procedure Initialize_1489 is
24428   begin
24429      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1489, (False, 0));
24430      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24431       (Base + 1489,
24432        AMF.Internals.Tables.UML_String_Data_07.MS_07C5'Access);
24433      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1489, (False, AMF.CMOF.Public_Visibility));
24434   end Initialize_1489;
24435
24436   ---------------------
24437   -- Initialize_1490 --
24438   ---------------------
24439
24440   procedure Initialize_1490 is
24441   begin
24442      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
24443       (Base + 1490,
24444        AMF.Internals.Tables.UML_String_Data_03.MS_0394'Access);
24445   end Initialize_1490;
24446
24447   ---------------------
24448   -- Initialize_1491 --
24449   ---------------------
24450
24451   procedure Initialize_1491 is
24452   begin
24453      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1491, (False, 0));
24454      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24455       (Base + 1491,
24456        AMF.Internals.Tables.UML_String_Data_0B.MS_0B31'Access);
24457      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1491, (False, (Unlimited => True)));
24458      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1491, (False, AMF.CMOF.Public_Visibility));
24459   end Initialize_1491;
24460
24461   ---------------------
24462   -- Initialize_1492 --
24463   ---------------------
24464
24465   procedure Initialize_1492 is
24466   begin
24467      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1492, (False, 0));
24468      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24469       (Base + 1492,
24470        AMF.Internals.Tables.UML_String_Data_05.MS_05A4'Access);
24471      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1492, (False, (Unlimited => True)));
24472      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1492, (False, AMF.CMOF.Public_Visibility));
24473   end Initialize_1492;
24474
24475   ---------------------
24476   -- Initialize_1493 --
24477   ---------------------
24478
24479   procedure Initialize_1493 is
24480   begin
24481      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1493, (False, 0));
24482      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24483       (Base + 1493,
24484        AMF.Internals.Tables.UML_String_Data_0B.MS_0B31'Access);
24485      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1493, (False, (Unlimited => True)));
24486      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1493, (False, AMF.CMOF.Public_Visibility));
24487   end Initialize_1493;
24488
24489   ---------------------
24490   -- Initialize_1494 --
24491   ---------------------
24492
24493   procedure Initialize_1494 is
24494   begin
24495      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24496       (Base + 1494,
24497        AMF.Internals.Tables.UML_String_Data_04.MS_0453'Access);
24498      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1494, (False, AMF.CMOF.Public_Visibility));
24499   end Initialize_1494;
24500
24501   ---------------------
24502   -- Initialize_1495 --
24503   ---------------------
24504
24505   procedure Initialize_1495 is
24506   begin
24507      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1495, (False, 0));
24508      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24509       (Base + 1495,
24510        AMF.Internals.Tables.UML_String_Data_05.MS_05CF'Access);
24511      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1495, (False, (Unlimited => True)));
24512      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1495, (False, AMF.CMOF.Public_Visibility));
24513   end Initialize_1495;
24514
24515   ---------------------
24516   -- Initialize_1496 --
24517   ---------------------
24518
24519   procedure Initialize_1496 is
24520   begin
24521      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1496, (False, 0));
24522      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24523       (Base + 1496,
24524        AMF.Internals.Tables.UML_String_Data_00.MS_00BE'Access);
24525      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1496, (False, AMF.CMOF.Public_Visibility));
24526   end Initialize_1496;
24527
24528   ---------------------
24529   -- Initialize_1497 --
24530   ---------------------
24531
24532   procedure Initialize_1497 is
24533   begin
24534      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1497, (False, 0));
24535      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24536       (Base + 1497,
24537        AMF.Internals.Tables.UML_String_Data_0A.MS_0AC6'Access);
24538      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1497, (False, (Unlimited => True)));
24539      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1497, (False, AMF.CMOF.Public_Visibility));
24540   end Initialize_1497;
24541
24542   ---------------------
24543   -- Initialize_1498 --
24544   ---------------------
24545
24546   procedure Initialize_1498 is
24547   begin
24548      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1498, (False, 0));
24549      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24550       (Base + 1498,
24551        AMF.Internals.Tables.UML_String_Data_06.MS_0638'Access);
24552      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1498, (False, (Unlimited => True)));
24553      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1498, (False, AMF.CMOF.Public_Visibility));
24554   end Initialize_1498;
24555
24556   ---------------------
24557   -- Initialize_1499 --
24558   ---------------------
24559
24560   procedure Initialize_1499 is
24561   begin
24562      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1499, (False, 0));
24563      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24564       (Base + 1499,
24565        AMF.Internals.Tables.UML_String_Data_0A.MS_0ADA'Access);
24566      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1499, (False, (Unlimited => True)));
24567      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1499, (False, AMF.CMOF.Public_Visibility));
24568   end Initialize_1499;
24569
24570   ---------------------
24571   -- Initialize_1500 --
24572   ---------------------
24573
24574   procedure Initialize_1500 is
24575   begin
24576      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1500, (False, 0));
24577      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24578       (Base + 1500,
24579        AMF.Internals.Tables.UML_String_Data_08.MS_08BE'Access);
24580      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1500, (False, (Unlimited => True)));
24581      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1500, (False, AMF.CMOF.Public_Visibility));
24582   end Initialize_1500;
24583
24584   ---------------------
24585   -- Initialize_1501 --
24586   ---------------------
24587
24588   procedure Initialize_1501 is
24589   begin
24590      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1501, (False, 0));
24591      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24592       (Base + 1501,
24593        AMF.Internals.Tables.UML_String_Data_07.MS_0738'Access);
24594      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1501, (False, (Unlimited => True)));
24595      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1501, (False, AMF.CMOF.Public_Visibility));
24596   end Initialize_1501;
24597
24598   ---------------------
24599   -- Initialize_1502 --
24600   ---------------------
24601
24602   procedure Initialize_1502 is
24603   begin
24604      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1502, (False, 0));
24605      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24606       (Base + 1502,
24607        AMF.Internals.Tables.UML_String_Data_08.MS_08BE'Access);
24608      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1502, (False, (Unlimited => True)));
24609      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1502, (False, AMF.CMOF.Public_Visibility));
24610   end Initialize_1502;
24611
24612   ---------------------
24613   -- Initialize_1503 --
24614   ---------------------
24615
24616   procedure Initialize_1503 is
24617   begin
24618      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1503, (False, 0));
24619      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24620       (Base + 1503,
24621        AMF.Internals.Tables.UML_String_Data_08.MS_08BE'Access);
24622      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1503, (False, (Unlimited => True)));
24623      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1503, (False, AMF.CMOF.Public_Visibility));
24624   end Initialize_1503;
24625
24626   ---------------------
24627   -- Initialize_1504 --
24628   ---------------------
24629
24630   procedure Initialize_1504 is
24631   begin
24632      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1504, (False, 0));
24633      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24634       (Base + 1504,
24635        AMF.Internals.Tables.UML_String_Data_0C.MS_0C1E'Access);
24636      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1504, (False, AMF.CMOF.Public_Visibility));
24637   end Initialize_1504;
24638
24639   ---------------------
24640   -- Initialize_1505 --
24641   ---------------------
24642
24643   procedure Initialize_1505 is
24644   begin
24645      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1505, (False, 0));
24646      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24647       (Base + 1505,
24648        AMF.Internals.Tables.UML_String_Data_02.MS_029D'Access);
24649      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1505, (False, (Unlimited => True)));
24650      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1505, (False, AMF.CMOF.Public_Visibility));
24651   end Initialize_1505;
24652
24653   ---------------------
24654   -- Initialize_1506 --
24655   ---------------------
24656
24657   procedure Initialize_1506 is
24658   begin
24659      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1506, (False, 0));
24660      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24661       (Base + 1506,
24662        AMF.Internals.Tables.UML_String_Data_03.MS_0321'Access);
24663      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1506, (False, (Unlimited => True)));
24664      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1506, (False, AMF.CMOF.Public_Visibility));
24665   end Initialize_1506;
24666
24667   ---------------------
24668   -- Initialize_1507 --
24669   ---------------------
24670
24671   procedure Initialize_1507 is
24672   begin
24673      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1507, (False, 0));
24674      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24675       (Base + 1507,
24676        AMF.Internals.Tables.UML_String_Data_07.MS_07F2'Access);
24677      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1507, (False, (Unlimited => True)));
24678      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1507, (False, AMF.CMOF.Public_Visibility));
24679   end Initialize_1507;
24680
24681   ---------------------
24682   -- Initialize_1508 --
24683   ---------------------
24684
24685   procedure Initialize_1508 is
24686   begin
24687      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1508, (False, 0));
24688      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24689       (Base + 1508,
24690        AMF.Internals.Tables.UML_String_Data_04.MS_04EE'Access);
24691      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1508, (False, (Unlimited => True)));
24692      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1508, (False, AMF.CMOF.Public_Visibility));
24693   end Initialize_1508;
24694
24695   ---------------------
24696   -- Initialize_1509 --
24697   ---------------------
24698
24699   procedure Initialize_1509 is
24700   begin
24701      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1509, (False, 0));
24702      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24703       (Base + 1509,
24704        AMF.Internals.Tables.UML_String_Data_01.MS_01FC'Access);
24705      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1509, (False, (Unlimited => True)));
24706      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1509, (False, AMF.CMOF.Public_Visibility));
24707   end Initialize_1509;
24708
24709   ---------------------
24710   -- Initialize_1510 --
24711   ---------------------
24712
24713   procedure Initialize_1510 is
24714   begin
24715      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1510, (False, 0));
24716      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24717       (Base + 1510,
24718        AMF.Internals.Tables.UML_String_Data_07.MS_07C5'Access);
24719      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1510, (False, (Unlimited => True)));
24720      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1510, (False, AMF.CMOF.Public_Visibility));
24721   end Initialize_1510;
24722
24723   ---------------------
24724   -- Initialize_1511 --
24725   ---------------------
24726
24727   procedure Initialize_1511 is
24728   begin
24729      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1511, (False, 0));
24730      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24731       (Base + 1511,
24732        AMF.Internals.Tables.UML_String_Data_08.MS_0806'Access);
24733      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1511, (False, (Unlimited => True)));
24734      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1511, (False, AMF.CMOF.Public_Visibility));
24735   end Initialize_1511;
24736
24737   ---------------------
24738   -- Initialize_1512 --
24739   ---------------------
24740
24741   procedure Initialize_1512 is
24742   begin
24743      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1512, (False, 0));
24744      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24745       (Base + 1512,
24746        AMF.Internals.Tables.UML_String_Data_06.MS_0638'Access);
24747      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1512, (False, (Unlimited => True)));
24748      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1512, (False, AMF.CMOF.Public_Visibility));
24749   end Initialize_1512;
24750
24751   ---------------------
24752   -- Initialize_1513 --
24753   ---------------------
24754
24755   procedure Initialize_1513 is
24756   begin
24757      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1513, (False, 0));
24758      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24759       (Base + 1513,
24760        AMF.Internals.Tables.UML_String_Data_0B.MS_0B31'Access);
24761      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1513, (False, (Unlimited => True)));
24762      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1513, (False, AMF.CMOF.Public_Visibility));
24763   end Initialize_1513;
24764
24765   ---------------------
24766   -- Initialize_1514 --
24767   ---------------------
24768
24769   procedure Initialize_1514 is
24770   begin
24771      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1514, (False, 0));
24772      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24773       (Base + 1514,
24774        AMF.Internals.Tables.UML_String_Data_00.MS_0051'Access);
24775      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1514, (False, (Unlimited => True)));
24776      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1514, (False, AMF.CMOF.Public_Visibility));
24777   end Initialize_1514;
24778
24779   ---------------------
24780   -- Initialize_1515 --
24781   ---------------------
24782
24783   procedure Initialize_1515 is
24784   begin
24785      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1515, (False, 0));
24786      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24787       (Base + 1515,
24788        AMF.Internals.Tables.UML_String_Data_02.MS_0273'Access);
24789      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1515, (False, AMF.CMOF.Public_Visibility));
24790   end Initialize_1515;
24791
24792   ---------------------
24793   -- Initialize_1516 --
24794   ---------------------
24795
24796   procedure Initialize_1516 is
24797   begin
24798      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1516, (False, 0));
24799      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24800       (Base + 1516,
24801        AMF.Internals.Tables.UML_String_Data_09.MS_09B7'Access);
24802      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1516, (False, AMF.CMOF.Public_Visibility));
24803   end Initialize_1516;
24804
24805   ---------------------
24806   -- Initialize_1517 --
24807   ---------------------
24808
24809   procedure Initialize_1517 is
24810   begin
24811      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1517, (False, 0));
24812      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24813       (Base + 1517,
24814        AMF.Internals.Tables.UML_String_Data_01.MS_01FC'Access);
24815      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1517, (False, (Unlimited => True)));
24816      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1517, (False, AMF.CMOF.Public_Visibility));
24817   end Initialize_1517;
24818
24819   ---------------------
24820   -- Initialize_1518 --
24821   ---------------------
24822
24823   procedure Initialize_1518 is
24824   begin
24825      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1518, (False, 0));
24826      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24827       (Base + 1518,
24828        AMF.Internals.Tables.UML_String_Data_05.MS_051A'Access);
24829      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1518, (False, (Unlimited => True)));
24830      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1518, (False, AMF.CMOF.Public_Visibility));
24831   end Initialize_1518;
24832
24833   ---------------------
24834   -- Initialize_1519 --
24835   ---------------------
24836
24837   procedure Initialize_1519 is
24838   begin
24839      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1519, (False, 0));
24840      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24841       (Base + 1519,
24842        AMF.Internals.Tables.UML_String_Data_02.MS_0273'Access);
24843      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1519, (False, (Unlimited => True)));
24844      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1519, (False, AMF.CMOF.Public_Visibility));
24845   end Initialize_1519;
24846
24847   ---------------------
24848   -- Initialize_1520 --
24849   ---------------------
24850
24851   procedure Initialize_1520 is
24852   begin
24853      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1520, (False, 0));
24854      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24855       (Base + 1520,
24856        AMF.Internals.Tables.UML_String_Data_09.MS_09B7'Access);
24857      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1520, (False, (Unlimited => True)));
24858      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1520, (False, AMF.CMOF.Public_Visibility));
24859   end Initialize_1520;
24860
24861   ---------------------
24862   -- Initialize_1521 --
24863   ---------------------
24864
24865   procedure Initialize_1521 is
24866   begin
24867      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1521, (False, 0));
24868      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24869       (Base + 1521,
24870        AMF.Internals.Tables.UML_String_Data_03.MS_0376'Access);
24871      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1521, (False, (Unlimited => True)));
24872      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1521, (False, AMF.CMOF.Public_Visibility));
24873   end Initialize_1521;
24874
24875   ---------------------
24876   -- Initialize_1522 --
24877   ---------------------
24878
24879   procedure Initialize_1522 is
24880   begin
24881      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1522, (False, 0));
24882      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24883       (Base + 1522,
24884        AMF.Internals.Tables.UML_String_Data_07.MS_074A'Access);
24885      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1522, (False, (Unlimited => True)));
24886      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1522, (False, AMF.CMOF.Public_Visibility));
24887   end Initialize_1522;
24888
24889   ---------------------
24890   -- Initialize_1523 --
24891   ---------------------
24892
24893   procedure Initialize_1523 is
24894   begin
24895      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1523, (False, 0));
24896      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24897       (Base + 1523,
24898        AMF.Internals.Tables.UML_String_Data_06.MS_0630'Access);
24899      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1523, (False, (Unlimited => True)));
24900      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1523, (False, AMF.CMOF.Public_Visibility));
24901   end Initialize_1523;
24902
24903   ---------------------
24904   -- Initialize_1524 --
24905   ---------------------
24906
24907   procedure Initialize_1524 is
24908   begin
24909      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1524, (False, 0));
24910      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24911       (Base + 1524,
24912        AMF.Internals.Tables.UML_String_Data_08.MS_08F6'Access);
24913      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1524, (False, (Unlimited => True)));
24914      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1524, (False, AMF.CMOF.Public_Visibility));
24915   end Initialize_1524;
24916
24917   ---------------------
24918   -- Initialize_1525 --
24919   ---------------------
24920
24921   procedure Initialize_1525 is
24922   begin
24923      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1525, (False, 0));
24924      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24925       (Base + 1525,
24926        AMF.Internals.Tables.UML_String_Data_03.MS_0313'Access);
24927      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1525, (False, AMF.CMOF.Public_Visibility));
24928   end Initialize_1525;
24929
24930   ---------------------
24931   -- Initialize_1526 --
24932   ---------------------
24933
24934   procedure Initialize_1526 is
24935   begin
24936      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1526, (False, 0));
24937      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24938       (Base + 1526,
24939        AMF.Internals.Tables.UML_String_Data_0B.MS_0B8C'Access);
24940      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1526, (False, AMF.CMOF.Public_Visibility));
24941   end Initialize_1526;
24942
24943   ---------------------
24944   -- Initialize_1527 --
24945   ---------------------
24946
24947   procedure Initialize_1527 is
24948   begin
24949      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1527, (False, 0));
24950      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24951       (Base + 1527,
24952        AMF.Internals.Tables.UML_String_Data_01.MS_0133'Access);
24953      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1527, (False, AMF.CMOF.Public_Visibility));
24954   end Initialize_1527;
24955
24956   ---------------------
24957   -- Initialize_1528 --
24958   ---------------------
24959
24960   procedure Initialize_1528 is
24961   begin
24962      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1528, (False, 0));
24963      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24964       (Base + 1528,
24965        AMF.Internals.Tables.UML_String_Data_01.MS_0133'Access);
24966      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1528, (False, AMF.CMOF.Public_Visibility));
24967   end Initialize_1528;
24968
24969   ---------------------
24970   -- Initialize_1529 --
24971   ---------------------
24972
24973   procedure Initialize_1529 is
24974   begin
24975      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1529, (False, 0));
24976      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24977       (Base + 1529,
24978        AMF.Internals.Tables.UML_String_Data_03.MS_0321'Access);
24979      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1529, (False, AMF.CMOF.Public_Visibility));
24980   end Initialize_1529;
24981
24982   ---------------------
24983   -- Initialize_1530 --
24984   ---------------------
24985
24986   procedure Initialize_1530 is
24987   begin
24988      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1530, (False, 0));
24989      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
24990       (Base + 1530,
24991        AMF.Internals.Tables.UML_String_Data_0B.MS_0BF0'Access);
24992      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1530, (False, (Unlimited => True)));
24993      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1530, (False, AMF.CMOF.Public_Visibility));
24994   end Initialize_1530;
24995
24996   ---------------------
24997   -- Initialize_1531 --
24998   ---------------------
24999
25000   procedure Initialize_1531 is
25001   begin
25002      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1531, (False, 0));
25003      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25004       (Base + 1531,
25005        AMF.Internals.Tables.UML_String_Data_09.MS_0937'Access);
25006      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1531, (False, (Unlimited => True)));
25007      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1531, (False, AMF.CMOF.Public_Visibility));
25008   end Initialize_1531;
25009
25010   ---------------------
25011   -- Initialize_1532 --
25012   ---------------------
25013
25014   procedure Initialize_1532 is
25015   begin
25016      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
25017       (Base + 1532,
25018        AMF.Internals.Tables.UML_String_Data_04.MS_042C'Access);
25019   end Initialize_1532;
25020
25021   ---------------------
25022   -- Initialize_1533 --
25023   ---------------------
25024
25025   procedure Initialize_1533 is
25026   begin
25027      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1533, (False, 0));
25028      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25029       (Base + 1533,
25030        AMF.Internals.Tables.UML_String_Data_05.MS_057B'Access);
25031      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1533, (False, (Unlimited => True)));
25032      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1533, (False, AMF.CMOF.Public_Visibility));
25033   end Initialize_1533;
25034
25035   ---------------------
25036   -- Initialize_1534 --
25037   ---------------------
25038
25039   procedure Initialize_1534 is
25040   begin
25041      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1534, (False, 0));
25042      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25043       (Base + 1534,
25044        AMF.Internals.Tables.UML_String_Data_06.MS_06D0'Access);
25045      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1534, (False, AMF.CMOF.Public_Visibility));
25046   end Initialize_1534;
25047
25048   ---------------------
25049   -- Initialize_1535 --
25050   ---------------------
25051
25052   procedure Initialize_1535 is
25053   begin
25054      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1535, (False, 0));
25055      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25056       (Base + 1535,
25057        AMF.Internals.Tables.UML_String_Data_05.MS_05A4'Access);
25058      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1535, (False, (Unlimited => True)));
25059      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1535, (False, AMF.CMOF.Public_Visibility));
25060   end Initialize_1535;
25061
25062   ---------------------
25063   -- Initialize_1536 --
25064   ---------------------
25065
25066   procedure Initialize_1536 is
25067   begin
25068      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1536, (False, 0));
25069      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25070       (Base + 1536,
25071        AMF.Internals.Tables.UML_String_Data_0B.MS_0B31'Access);
25072      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1536, (False, (Unlimited => True)));
25073      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1536, (False, AMF.CMOF.Public_Visibility));
25074   end Initialize_1536;
25075
25076   ---------------------
25077   -- Initialize_1537 --
25078   ---------------------
25079
25080   procedure Initialize_1537 is
25081   begin
25082      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1537, (False, 0));
25083      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25084       (Base + 1537,
25085        AMF.Internals.Tables.UML_String_Data_09.MS_09E2'Access);
25086      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1537, (False, AMF.CMOF.Public_Visibility));
25087   end Initialize_1537;
25088
25089   ---------------------
25090   -- Initialize_1538 --
25091   ---------------------
25092
25093   procedure Initialize_1538 is
25094   begin
25095      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1538, (False, 0));
25096      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25097       (Base + 1538,
25098        AMF.Internals.Tables.UML_String_Data_08.MS_0877'Access);
25099      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1538, (False, AMF.CMOF.Public_Visibility));
25100   end Initialize_1538;
25101
25102   ---------------------
25103   -- Initialize_1539 --
25104   ---------------------
25105
25106   procedure Initialize_1539 is
25107   begin
25108      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1539, (False, 0));
25109      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25110       (Base + 1539,
25111        AMF.Internals.Tables.UML_String_Data_0A.MS_0AA7'Access);
25112      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1539, (False, AMF.CMOF.Public_Visibility));
25113   end Initialize_1539;
25114
25115   ---------------------
25116   -- Initialize_1540 --
25117   ---------------------
25118
25119   procedure Initialize_1540 is
25120   begin
25121      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1540, (False, 0));
25122      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25123       (Base + 1540,
25124        AMF.Internals.Tables.UML_String_Data_05.MS_0511'Access);
25125      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1540, (False, AMF.CMOF.Public_Visibility));
25126   end Initialize_1540;
25127
25128   ---------------------
25129   -- Initialize_1541 --
25130   ---------------------
25131
25132   procedure Initialize_1541 is
25133   begin
25134      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1541, (False, 0));
25135      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25136       (Base + 1541,
25137        AMF.Internals.Tables.UML_String_Data_03.MS_03BA'Access);
25138      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1541, (False, AMF.CMOF.Public_Visibility));
25139   end Initialize_1541;
25140
25141   ---------------------
25142   -- Initialize_1542 --
25143   ---------------------
25144
25145   procedure Initialize_1542 is
25146   begin
25147      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1542, (False, 0));
25148      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25149       (Base + 1542,
25150        AMF.Internals.Tables.UML_String_Data_0B.MS_0B37'Access);
25151      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1542, (False, AMF.CMOF.Public_Visibility));
25152   end Initialize_1542;
25153
25154   ---------------------
25155   -- Initialize_1543 --
25156   ---------------------
25157
25158   procedure Initialize_1543 is
25159   begin
25160      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1543, (False, 0));
25161      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25162       (Base + 1543,
25163        AMF.Internals.Tables.UML_String_Data_05.MS_05E9'Access);
25164      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1543, (False, AMF.CMOF.Public_Visibility));
25165   end Initialize_1543;
25166
25167   ---------------------
25168   -- Initialize_1544 --
25169   ---------------------
25170
25171   procedure Initialize_1544 is
25172   begin
25173      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1544, (False, 0));
25174      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25175       (Base + 1544,
25176        AMF.Internals.Tables.UML_String_Data_00.MS_005A'Access);
25177      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1544, (False, (Unlimited => True)));
25178      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1544, (False, AMF.CMOF.Public_Visibility));
25179   end Initialize_1544;
25180
25181   ---------------------
25182   -- Initialize_1545 --
25183   ---------------------
25184
25185   procedure Initialize_1545 is
25186   begin
25187      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1545, (False, 0));
25188      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25189       (Base + 1545,
25190        AMF.Internals.Tables.UML_String_Data_01.MS_01EA'Access);
25191      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1545, (False, AMF.CMOF.Public_Visibility));
25192   end Initialize_1545;
25193
25194   ---------------------
25195   -- Initialize_1546 --
25196   ---------------------
25197
25198   procedure Initialize_1546 is
25199   begin
25200      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1546, (False, 0));
25201      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25202       (Base + 1546,
25203        AMF.Internals.Tables.UML_String_Data_07.MS_07DD'Access);
25204      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1546, (False, AMF.CMOF.Public_Visibility));
25205   end Initialize_1546;
25206
25207   ---------------------
25208   -- Initialize_1547 --
25209   ---------------------
25210
25211   procedure Initialize_1547 is
25212   begin
25213      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1547, (False, 0));
25214      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25215       (Base + 1547,
25216        AMF.Internals.Tables.UML_String_Data_07.MS_0710'Access);
25217      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1547, (False, AMF.CMOF.Public_Visibility));
25218   end Initialize_1547;
25219
25220   ---------------------
25221   -- Initialize_1548 --
25222   ---------------------
25223
25224   procedure Initialize_1548 is
25225   begin
25226      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1548, (False, 0));
25227      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25228       (Base + 1548,
25229        AMF.Internals.Tables.UML_String_Data_0A.MS_0A9D'Access);
25230      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1548, (False, AMF.CMOF.Public_Visibility));
25231   end Initialize_1548;
25232
25233   ---------------------
25234   -- Initialize_1549 --
25235   ---------------------
25236
25237   procedure Initialize_1549 is
25238   begin
25239      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1549, (False, 0));
25240      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25241       (Base + 1549,
25242        AMF.Internals.Tables.UML_String_Data_00.MS_00BE'Access);
25243      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1549, (False, AMF.CMOF.Public_Visibility));
25244   end Initialize_1549;
25245
25246   ---------------------
25247   -- Initialize_1550 --
25248   ---------------------
25249
25250   procedure Initialize_1550 is
25251   begin
25252      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1550, (False, 0));
25253      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25254       (Base + 1550,
25255        AMF.Internals.Tables.UML_String_Data_09.MS_09C2'Access);
25256      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1550, (False, AMF.CMOF.Public_Visibility));
25257   end Initialize_1550;
25258
25259   ---------------------
25260   -- Initialize_1551 --
25261   ---------------------
25262
25263   procedure Initialize_1551 is
25264   begin
25265      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1551, (False, 0));
25266      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25267       (Base + 1551,
25268        AMF.Internals.Tables.UML_String_Data_02.MS_026F'Access);
25269      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1551, (False, AMF.CMOF.Public_Visibility));
25270   end Initialize_1551;
25271
25272   ---------------------
25273   -- Initialize_1552 --
25274   ---------------------
25275
25276   procedure Initialize_1552 is
25277   begin
25278      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1552, (False, 0));
25279      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25280       (Base + 1552,
25281        AMF.Internals.Tables.UML_String_Data_09.MS_09BC'Access);
25282      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1552, (False, AMF.CMOF.Public_Visibility));
25283   end Initialize_1552;
25284
25285   ---------------------
25286   -- Initialize_1553 --
25287   ---------------------
25288
25289   procedure Initialize_1553 is
25290   begin
25291      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1553, (False, 0));
25292      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25293       (Base + 1553,
25294        AMF.Internals.Tables.UML_String_Data_03.MS_0376'Access);
25295      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1553, (False, AMF.CMOF.Public_Visibility));
25296   end Initialize_1553;
25297
25298   ---------------------
25299   -- Initialize_1554 --
25300   ---------------------
25301
25302   procedure Initialize_1554 is
25303   begin
25304      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1554, (False, 0));
25305      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25306       (Base + 1554,
25307        AMF.Internals.Tables.UML_String_Data_09.MS_0963'Access);
25308      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1554, (False, AMF.CMOF.Public_Visibility));
25309   end Initialize_1554;
25310
25311   ---------------------
25312   -- Initialize_1555 --
25313   ---------------------
25314
25315   procedure Initialize_1555 is
25316   begin
25317      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1555, (False, 0));
25318      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25319       (Base + 1555,
25320        AMF.Internals.Tables.UML_String_Data_0B.MS_0BF3'Access);
25321      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1555, (False, AMF.CMOF.Public_Visibility));
25322   end Initialize_1555;
25323
25324   ---------------------
25325   -- Initialize_1556 --
25326   ---------------------
25327
25328   procedure Initialize_1556 is
25329   begin
25330      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1556, (False, 0));
25331      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25332       (Base + 1556,
25333        AMF.Internals.Tables.UML_String_Data_04.MS_04EF'Access);
25334      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1556, (False, AMF.CMOF.Public_Visibility));
25335   end Initialize_1556;
25336
25337   ---------------------
25338   -- Initialize_1557 --
25339   ---------------------
25340
25341   procedure Initialize_1557 is
25342   begin
25343      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1557, (False, 0));
25344      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25345       (Base + 1557,
25346        AMF.Internals.Tables.UML_String_Data_06.MS_0620'Access);
25347      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1557, (False, AMF.CMOF.Public_Visibility));
25348   end Initialize_1557;
25349
25350   ---------------------
25351   -- Initialize_1558 --
25352   ---------------------
25353
25354   procedure Initialize_1558 is
25355   begin
25356      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1558, (False, 0));
25357      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25358       (Base + 1558,
25359        AMF.Internals.Tables.UML_String_Data_0A.MS_0A1F'Access);
25360      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1558, (False, AMF.CMOF.Public_Visibility));
25361   end Initialize_1558;
25362
25363   ---------------------
25364   -- Initialize_1559 --
25365   ---------------------
25366
25367   procedure Initialize_1559 is
25368   begin
25369      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1559, (False, 0));
25370      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25371       (Base + 1559,
25372        AMF.Internals.Tables.UML_String_Data_01.MS_0133'Access);
25373      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1559, (False, AMF.CMOF.Public_Visibility));
25374   end Initialize_1559;
25375
25376   ---------------------
25377   -- Initialize_1560 --
25378   ---------------------
25379
25380   procedure Initialize_1560 is
25381   begin
25382      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1560, (False, 0));
25383      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25384       (Base + 1560,
25385        AMF.Internals.Tables.UML_String_Data_06.MS_0630'Access);
25386      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1560, (False, (Unlimited => True)));
25387      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1560, (False, AMF.CMOF.Public_Visibility));
25388   end Initialize_1560;
25389
25390   ---------------------
25391   -- Initialize_1561 --
25392   ---------------------
25393
25394   procedure Initialize_1561 is
25395   begin
25396      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1561, (False, 0));
25397      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25398       (Base + 1561,
25399        AMF.Internals.Tables.UML_String_Data_06.MS_0630'Access);
25400      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1561, (False, AMF.CMOF.Public_Visibility));
25401   end Initialize_1561;
25402
25403   ---------------------
25404   -- Initialize_1562 --
25405   ---------------------
25406
25407   procedure Initialize_1562 is
25408   begin
25409      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1562, (False, 0));
25410      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25411       (Base + 1562,
25412        AMF.Internals.Tables.UML_String_Data_03.MS_0308'Access);
25413      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1562, (False, AMF.CMOF.Public_Visibility));
25414   end Initialize_1562;
25415
25416   ---------------------
25417   -- Initialize_1563 --
25418   ---------------------
25419
25420   procedure Initialize_1563 is
25421   begin
25422      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1563, (False, 0));
25423      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25424       (Base + 1563,
25425        AMF.Internals.Tables.UML_String_Data_0A.MS_0A06'Access);
25426      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1563, (False, (Unlimited => True)));
25427      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1563, (False, AMF.CMOF.Public_Visibility));
25428   end Initialize_1563;
25429
25430   ---------------------
25431   -- Initialize_1564 --
25432   ---------------------
25433
25434   procedure Initialize_1564 is
25435   begin
25436      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1564, (False, 0));
25437      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25438       (Base + 1564,
25439        AMF.Internals.Tables.UML_String_Data_09.MS_0963'Access);
25440      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1564, (False, AMF.CMOF.Public_Visibility));
25441   end Initialize_1564;
25442
25443   ---------------------
25444   -- Initialize_1565 --
25445   ---------------------
25446
25447   procedure Initialize_1565 is
25448   begin
25449      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1565, (False, 0));
25450      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25451       (Base + 1565,
25452        AMF.Internals.Tables.UML_String_Data_0C.MS_0C99'Access);
25453      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1565, (False, (Unlimited => True)));
25454      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1565, (False, AMF.CMOF.Public_Visibility));
25455   end Initialize_1565;
25456
25457   ---------------------
25458   -- Initialize_1566 --
25459   ---------------------
25460
25461   procedure Initialize_1566 is
25462   begin
25463      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1566, (False, 0));
25464      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25465       (Base + 1566,
25466        AMF.Internals.Tables.UML_String_Data_01.MS_01F4'Access);
25467      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1566, (False, (Unlimited => True)));
25468      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1566, (False, AMF.CMOF.Public_Visibility));
25469   end Initialize_1566;
25470
25471   ---------------------
25472   -- Initialize_1567 --
25473   ---------------------
25474
25475   procedure Initialize_1567 is
25476   begin
25477      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1567, (False, 0));
25478      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25479       (Base + 1567,
25480        AMF.Internals.Tables.UML_String_Data_05.MS_057B'Access);
25481      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1567, (False, AMF.CMOF.Public_Visibility));
25482   end Initialize_1567;
25483
25484   ---------------------
25485   -- Initialize_1568 --
25486   ---------------------
25487
25488   procedure Initialize_1568 is
25489   begin
25490      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1568, (False, 0));
25491      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25492       (Base + 1568,
25493        AMF.Internals.Tables.UML_String_Data_0C.MS_0C1E'Access);
25494      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1568, (False, AMF.CMOF.Public_Visibility));
25495   end Initialize_1568;
25496
25497   ---------------------
25498   -- Initialize_1569 --
25499   ---------------------
25500
25501   procedure Initialize_1569 is
25502   begin
25503      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1569, (False, 0));
25504      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25505       (Base + 1569,
25506        AMF.Internals.Tables.UML_String_Data_05.MS_05E9'Access);
25507      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1569, (False, AMF.CMOF.Public_Visibility));
25508   end Initialize_1569;
25509
25510   ---------------------
25511   -- Initialize_1570 --
25512   ---------------------
25513
25514   procedure Initialize_1570 is
25515   begin
25516      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1570, (False, 0));
25517      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25518       (Base + 1570,
25519        AMF.Internals.Tables.UML_String_Data_08.MS_08B8'Access);
25520      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1570, (False, (Unlimited => True)));
25521      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1570, (False, AMF.CMOF.Public_Visibility));
25522   end Initialize_1570;
25523
25524   ---------------------
25525   -- Initialize_1571 --
25526   ---------------------
25527
25528   procedure Initialize_1571 is
25529   begin
25530      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1571, (False, 0));
25531      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25532       (Base + 1571,
25533        AMF.Internals.Tables.UML_String_Data_08.MS_08D9'Access);
25534      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1571, (False, (Unlimited => True)));
25535      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1571, (False, AMF.CMOF.Public_Visibility));
25536   end Initialize_1571;
25537
25538   ---------------------
25539   -- Initialize_1572 --
25540   ---------------------
25541
25542   procedure Initialize_1572 is
25543   begin
25544      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1572, (False, 0));
25545      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25546       (Base + 1572,
25547        AMF.Internals.Tables.UML_String_Data_02.MS_023C'Access);
25548      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1572, (False, (Unlimited => True)));
25549      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1572, (False, AMF.CMOF.Public_Visibility));
25550   end Initialize_1572;
25551
25552   ---------------------
25553   -- Initialize_1573 --
25554   ---------------------
25555
25556   procedure Initialize_1573 is
25557   begin
25558      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1573, (False, 0));
25559      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25560       (Base + 1573,
25561        AMF.Internals.Tables.UML_String_Data_08.MS_08CD'Access);
25562      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1573, (False, (Unlimited => True)));
25563      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1573, (False, AMF.CMOF.Public_Visibility));
25564   end Initialize_1573;
25565
25566   ---------------------
25567   -- Initialize_1574 --
25568   ---------------------
25569
25570   procedure Initialize_1574 is
25571   begin
25572      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1574, (False, 0));
25573      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25574       (Base + 1574,
25575        AMF.Internals.Tables.UML_String_Data_07.MS_0736'Access);
25576      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1574, (False, (Unlimited => True)));
25577      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1574, (False, AMF.CMOF.Public_Visibility));
25578   end Initialize_1574;
25579
25580   ---------------------
25581   -- Initialize_1575 --
25582   ---------------------
25583
25584   procedure Initialize_1575 is
25585   begin
25586      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1575, (False, 0));
25587      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25588       (Base + 1575,
25589        AMF.Internals.Tables.UML_String_Data_02.MS_0220'Access);
25590      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1575, (False, (Unlimited => True)));
25591      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1575, (False, AMF.CMOF.Public_Visibility));
25592   end Initialize_1575;
25593
25594   ---------------------
25595   -- Initialize_1576 --
25596   ---------------------
25597
25598   procedure Initialize_1576 is
25599   begin
25600      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1576, (False, 0));
25601      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25602       (Base + 1576,
25603        AMF.Internals.Tables.UML_String_Data_08.MS_0840'Access);
25604      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1576, (False, (Unlimited => True)));
25605      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1576, (False, AMF.CMOF.Public_Visibility));
25606   end Initialize_1576;
25607
25608   ---------------------
25609   -- Initialize_1577 --
25610   ---------------------
25611
25612   procedure Initialize_1577 is
25613   begin
25614      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1577, (False, 0));
25615      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25616       (Base + 1577,
25617        AMF.Internals.Tables.UML_String_Data_03.MS_038C'Access);
25618      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1577, (False, AMF.CMOF.Public_Visibility));
25619   end Initialize_1577;
25620
25621   ---------------------
25622   -- Initialize_1578 --
25623   ---------------------
25624
25625   procedure Initialize_1578 is
25626   begin
25627      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1578, (False, 0));
25628      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25629       (Base + 1578,
25630        AMF.Internals.Tables.UML_String_Data_08.MS_080E'Access);
25631      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1578, (False, AMF.CMOF.Public_Visibility));
25632   end Initialize_1578;
25633
25634   ---------------------
25635   -- Initialize_1579 --
25636   ---------------------
25637
25638   procedure Initialize_1579 is
25639   begin
25640      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1579, (False, 0));
25641      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25642       (Base + 1579,
25643        AMF.Internals.Tables.UML_String_Data_01.MS_0186'Access);
25644      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1579, (False, AMF.CMOF.Public_Visibility));
25645   end Initialize_1579;
25646
25647   ---------------------
25648   -- Initialize_1580 --
25649   ---------------------
25650
25651   procedure Initialize_1580 is
25652   begin
25653      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1580, (False, 0));
25654      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25655       (Base + 1580,
25656        AMF.Internals.Tables.UML_String_Data_04.MS_04A7'Access);
25657      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1580, (False, AMF.CMOF.Public_Visibility));
25658   end Initialize_1580;
25659
25660   ---------------------
25661   -- Initialize_1581 --
25662   ---------------------
25663
25664   procedure Initialize_1581 is
25665   begin
25666      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1581, (False, 0));
25667      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25668       (Base + 1581,
25669        AMF.Internals.Tables.UML_String_Data_0B.MS_0BF9'Access);
25670      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1581, (False, AMF.CMOF.Public_Visibility));
25671   end Initialize_1581;
25672
25673   ---------------------
25674   -- Initialize_1582 --
25675   ---------------------
25676
25677   procedure Initialize_1582 is
25678   begin
25679      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
25680       (Base + 1582,
25681        AMF.Internals.Tables.UML_String_Data_03.MS_0346'Access);
25682   end Initialize_1582;
25683
25684   ---------------------
25685   -- Initialize_1583 --
25686   ---------------------
25687
25688   procedure Initialize_1583 is
25689   begin
25690      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1583, (False, 0));
25691      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25692       (Base + 1583,
25693        AMF.Internals.Tables.UML_String_Data_01.MS_01F9'Access);
25694      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1583, (False, (Unlimited => True)));
25695      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1583, (False, AMF.CMOF.Public_Visibility));
25696   end Initialize_1583;
25697
25698   ---------------------
25699   -- Initialize_1584 --
25700   ---------------------
25701
25702   procedure Initialize_1584 is
25703   begin
25704      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1584, (False, 0));
25705      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25706       (Base + 1584,
25707        AMF.Internals.Tables.UML_String_Data_02.MS_022E'Access);
25708      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1584, (False, AMF.CMOF.Public_Visibility));
25709   end Initialize_1584;
25710
25711   ---------------------
25712   -- Initialize_1585 --
25713   ---------------------
25714
25715   procedure Initialize_1585 is
25716   begin
25717      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1585, (False, 0));
25718      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25719       (Base + 1585,
25720        AMF.Internals.Tables.UML_String_Data_0B.MS_0B4F'Access);
25721      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1585, (False, (Unlimited => True)));
25722      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1585, (False, AMF.CMOF.Public_Visibility));
25723   end Initialize_1585;
25724
25725   ---------------------
25726   -- Initialize_1586 --
25727   ---------------------
25728
25729   procedure Initialize_1586 is
25730   begin
25731      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1586, (False, 0));
25732      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25733       (Base + 1586,
25734        AMF.Internals.Tables.UML_String_Data_07.MS_07C1'Access);
25735      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1586, (False, AMF.CMOF.Public_Visibility));
25736   end Initialize_1586;
25737
25738   ---------------------
25739   -- Initialize_1587 --
25740   ---------------------
25741
25742   procedure Initialize_1587 is
25743   begin
25744      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1587, (False, 0));
25745      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25746       (Base + 1587,
25747        AMF.Internals.Tables.UML_String_Data_07.MS_07C1'Access);
25748      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1587, (False, AMF.CMOF.Public_Visibility));
25749   end Initialize_1587;
25750
25751   ---------------------
25752   -- Initialize_1588 --
25753   ---------------------
25754
25755   procedure Initialize_1588 is
25756   begin
25757      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1588, (False, 0));
25758      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25759       (Base + 1588,
25760        AMF.Internals.Tables.UML_String_Data_00.MS_0051'Access);
25761      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1588, (False, (Unlimited => True)));
25762      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1588, (False, AMF.CMOF.Public_Visibility));
25763   end Initialize_1588;
25764
25765   ---------------------
25766   -- Initialize_1589 --
25767   ---------------------
25768
25769   procedure Initialize_1589 is
25770   begin
25771      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1589, (False, 0));
25772      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25773       (Base + 1589,
25774        AMF.Internals.Tables.UML_String_Data_04.MS_0494'Access);
25775      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1589, (False, (Unlimited => True)));
25776      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1589, (False, AMF.CMOF.Public_Visibility));
25777   end Initialize_1589;
25778
25779   ---------------------
25780   -- Initialize_1590 --
25781   ---------------------
25782
25783   procedure Initialize_1590 is
25784   begin
25785      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1590, (False, 0));
25786      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25787       (Base + 1590,
25788        AMF.Internals.Tables.UML_String_Data_0B.MS_0B4D'Access);
25789      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1590, (False, (Unlimited => True)));
25790      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1590, (False, AMF.CMOF.Public_Visibility));
25791   end Initialize_1590;
25792
25793   ---------------------
25794   -- Initialize_1591 --
25795   ---------------------
25796
25797   procedure Initialize_1591 is
25798   begin
25799      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
25800       (Base + 1591,
25801        AMF.Internals.Tables.UML_String_Data_07.MS_0709'Access);
25802   end Initialize_1591;
25803
25804   ---------------------
25805   -- Initialize_1592 --
25806   ---------------------
25807
25808   procedure Initialize_1592 is
25809   begin
25810      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1592, (False, 0));
25811      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25812       (Base + 1592,
25813        AMF.Internals.Tables.UML_String_Data_02.MS_0232'Access);
25814      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1592, (False, AMF.CMOF.Public_Visibility));
25815   end Initialize_1592;
25816
25817   ---------------------
25818   -- Initialize_1593 --
25819   ---------------------
25820
25821   procedure Initialize_1593 is
25822   begin
25823      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1593, (False, 0));
25824      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25825       (Base + 1593,
25826        AMF.Internals.Tables.UML_String_Data_0C.MS_0C07'Access);
25827      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1593, (False, AMF.CMOF.Public_Visibility));
25828   end Initialize_1593;
25829
25830   ---------------------
25831   -- Initialize_1594 --
25832   ---------------------
25833
25834   procedure Initialize_1594 is
25835   begin
25836      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1594, (False, 0));
25837      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25838       (Base + 1594,
25839        AMF.Internals.Tables.UML_String_Data_08.MS_0840'Access);
25840      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1594, (False, (Unlimited => True)));
25841      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1594, (False, AMF.CMOF.Public_Visibility));
25842   end Initialize_1594;
25843
25844   ---------------------
25845   -- Initialize_1595 --
25846   ---------------------
25847
25848   procedure Initialize_1595 is
25849   begin
25850      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1595, (False, 0));
25851      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25852       (Base + 1595,
25853        AMF.Internals.Tables.UML_String_Data_06.MS_06D0'Access);
25854      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1595, (False, AMF.CMOF.Public_Visibility));
25855   end Initialize_1595;
25856
25857   ---------------------
25858   -- Initialize_1596 --
25859   ---------------------
25860
25861   procedure Initialize_1596 is
25862   begin
25863      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1596, (False, 0));
25864      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25865       (Base + 1596,
25866        AMF.Internals.Tables.UML_String_Data_02.MS_023C'Access);
25867      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1596, (False, AMF.CMOF.Public_Visibility));
25868   end Initialize_1596;
25869
25870   ---------------------
25871   -- Initialize_1597 --
25872   ---------------------
25873
25874   procedure Initialize_1597 is
25875   begin
25876      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1597, (False, 0));
25877      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25878       (Base + 1597,
25879        AMF.Internals.Tables.UML_String_Data_03.MS_0359'Access);
25880      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1597, (False, AMF.CMOF.Public_Visibility));
25881   end Initialize_1597;
25882
25883   ---------------------
25884   -- Initialize_1598 --
25885   ---------------------
25886
25887   procedure Initialize_1598 is
25888   begin
25889      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1598, (False, 0));
25890      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25891       (Base + 1598,
25892        AMF.Internals.Tables.UML_String_Data_05.MS_05E9'Access);
25893      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1598, (False, AMF.CMOF.Public_Visibility));
25894   end Initialize_1598;
25895
25896   ---------------------
25897   -- Initialize_1599 --
25898   ---------------------
25899
25900   procedure Initialize_1599 is
25901   begin
25902      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1599, (False, 0));
25903      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25904       (Base + 1599,
25905        AMF.Internals.Tables.UML_String_Data_0C.MS_0C99'Access);
25906      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1599, (False, (Unlimited => True)));
25907      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1599, (False, AMF.CMOF.Public_Visibility));
25908   end Initialize_1599;
25909
25910   ---------------------
25911   -- Initialize_1600 --
25912   ---------------------
25913
25914   procedure Initialize_1600 is
25915   begin
25916      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1600, (False, 0));
25917      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25918       (Base + 1600,
25919        AMF.Internals.Tables.UML_String_Data_09.MS_09E2'Access);
25920      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1600, (False, AMF.CMOF.Public_Visibility));
25921   end Initialize_1600;
25922
25923   ---------------------
25924   -- Initialize_1601 --
25925   ---------------------
25926
25927   procedure Initialize_1601 is
25928   begin
25929      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1601, (False, 0));
25930      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25931       (Base + 1601,
25932        AMF.Internals.Tables.UML_String_Data_09.MS_09B7'Access);
25933      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1601, (False, AMF.CMOF.Public_Visibility));
25934   end Initialize_1601;
25935
25936   ---------------------
25937   -- Initialize_1602 --
25938   ---------------------
25939
25940   procedure Initialize_1602 is
25941   begin
25942      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1602, (False, 0));
25943      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25944       (Base + 1602,
25945        AMF.Internals.Tables.UML_String_Data_03.MS_0308'Access);
25946      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1602, (False, (Unlimited => True)));
25947      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1602, (False, AMF.CMOF.Public_Visibility));
25948   end Initialize_1602;
25949
25950   ---------------------
25951   -- Initialize_1603 --
25952   ---------------------
25953
25954   procedure Initialize_1603 is
25955   begin
25956      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1603, (False, 0));
25957      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25958       (Base + 1603,
25959        AMF.Internals.Tables.UML_String_Data_07.MS_07F2'Access);
25960      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1603, (False, (Unlimited => True)));
25961      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1603, (False, AMF.CMOF.Public_Visibility));
25962   end Initialize_1603;
25963
25964   ---------------------
25965   -- Initialize_1604 --
25966   ---------------------
25967
25968   procedure Initialize_1604 is
25969   begin
25970      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1604, (False, 0));
25971      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25972       (Base + 1604,
25973        AMF.Internals.Tables.UML_String_Data_00.MS_008D'Access);
25974      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1604, (False, (Unlimited => True)));
25975      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1604, (False, AMF.CMOF.Public_Visibility));
25976   end Initialize_1604;
25977
25978   ---------------------
25979   -- Initialize_1605 --
25980   ---------------------
25981
25982   procedure Initialize_1605 is
25983   begin
25984      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1605, (False, 0));
25985      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
25986       (Base + 1605,
25987        AMF.Internals.Tables.UML_String_Data_06.MS_0638'Access);
25988      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1605, (False, (Unlimited => True)));
25989      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1605, (False, AMF.CMOF.Public_Visibility));
25990   end Initialize_1605;
25991
25992   ---------------------
25993   -- Initialize_1606 --
25994   ---------------------
25995
25996   procedure Initialize_1606 is
25997   begin
25998      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1606, (False, 0));
25999      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
26000       (Base + 1606,
26001        AMF.Internals.Tables.UML_String_Data_0B.MS_0B57'Access);
26002      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1606, (False, (Unlimited => True)));
26003      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1606, (False, AMF.CMOF.Public_Visibility));
26004   end Initialize_1606;
26005
26006   ---------------------
26007   -- Initialize_1607 --
26008   ---------------------
26009
26010   procedure Initialize_1607 is
26011   begin
26012      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1607, (False, 0));
26013      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
26014       (Base + 1607,
26015        AMF.Internals.Tables.UML_String_Data_0B.MS_0BF3'Access);
26016      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1607, (False, (Unlimited => True)));
26017      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1607, (False, AMF.CMOF.Public_Visibility));
26018   end Initialize_1607;
26019
26020   ---------------------
26021   -- Initialize_1608 --
26022   ---------------------
26023
26024   procedure Initialize_1608 is
26025   begin
26026      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1608, (False, 0));
26027      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
26028       (Base + 1608,
26029        AMF.Internals.Tables.UML_String_Data_01.MS_01F4'Access);
26030      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1608, (False, AMF.CMOF.Public_Visibility));
26031   end Initialize_1608;
26032
26033   ---------------------
26034   -- Initialize_1609 --
26035   ---------------------
26036
26037   procedure Initialize_1609 is
26038   begin
26039      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1609, (False, 0));
26040      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
26041       (Base + 1609,
26042        AMF.Internals.Tables.UML_String_Data_06.MS_0696'Access);
26043      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1609, (False, AMF.CMOF.Public_Visibility));
26044   end Initialize_1609;
26045
26046   ---------------------
26047   -- Initialize_1610 --
26048   ---------------------
26049
26050   procedure Initialize_1610 is
26051   begin
26052      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1610, (False, 0));
26053      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
26054       (Base + 1610,
26055        AMF.Internals.Tables.UML_String_Data_06.MS_06BE'Access);
26056      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1610, (False, (Unlimited => True)));
26057      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1610, (False, AMF.CMOF.Public_Visibility));
26058   end Initialize_1610;
26059
26060   ---------------------
26061   -- Initialize_1611 --
26062   ---------------------
26063
26064   procedure Initialize_1611 is
26065   begin
26066      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1611, (False, 0));
26067      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
26068       (Base + 1611,
26069        AMF.Internals.Tables.UML_String_Data_04.MS_0453'Access);
26070      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1611, (False, AMF.CMOF.Public_Visibility));
26071   end Initialize_1611;
26072
26073   ---------------------
26074   -- Initialize_1612 --
26075   ---------------------
26076
26077   procedure Initialize_1612 is
26078   begin
26079      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1612, (False, 0));
26080      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
26081       (Base + 1612,
26082        AMF.Internals.Tables.UML_String_Data_08.MS_081E'Access);
26083      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1612, (False, AMF.CMOF.Public_Visibility));
26084   end Initialize_1612;
26085
26086   ---------------------
26087   -- Initialize_1613 --
26088   ---------------------
26089
26090   procedure Initialize_1613 is
26091   begin
26092      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1613, (False, 0));
26093      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
26094       (Base + 1613,
26095        AMF.Internals.Tables.UML_String_Data_05.MS_05CF'Access);
26096      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1613, (False, AMF.CMOF.Public_Visibility));
26097   end Initialize_1613;
26098
26099   ---------------------
26100   -- Initialize_1614 --
26101   ---------------------
26102
26103   procedure Initialize_1614 is
26104   begin
26105      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1614, (False, 0));
26106      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
26107       (Base + 1614,
26108        AMF.Internals.Tables.UML_String_Data_08.MS_08B2'Access);
26109      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1614, (False, AMF.CMOF.Public_Visibility));
26110   end Initialize_1614;
26111
26112   ---------------------
26113   -- Initialize_1615 --
26114   ---------------------
26115
26116   procedure Initialize_1615 is
26117   begin
26118      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1615, (False, 0));
26119      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
26120       (Base + 1615,
26121        AMF.Internals.Tables.UML_String_Data_04.MS_04EF'Access);
26122      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1615, (False, AMF.CMOF.Public_Visibility));
26123   end Initialize_1615;
26124
26125   ---------------------
26126   -- Initialize_1616 --
26127   ---------------------
26128
26129   procedure Initialize_1616 is
26130   begin
26131      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1616, (False, 0));
26132      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
26133       (Base + 1616,
26134        AMF.Internals.Tables.UML_String_Data_06.MS_0620'Access);
26135      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1616, (False, AMF.CMOF.Public_Visibility));
26136   end Initialize_1616;
26137
26138   ---------------------
26139   -- Initialize_1617 --
26140   ---------------------
26141
26142   procedure Initialize_1617 is
26143   begin
26144      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1617, (False, 0));
26145      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
26146       (Base + 1617,
26147        AMF.Internals.Tables.UML_String_Data_01.MS_016E'Access);
26148      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1617, (False, AMF.CMOF.Public_Visibility));
26149   end Initialize_1617;
26150
26151   ---------------------
26152   -- Initialize_1618 --
26153   ---------------------
26154
26155   procedure Initialize_1618 is
26156   begin
26157      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1618, (False, 0));
26158      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
26159       (Base + 1618,
26160        AMF.Internals.Tables.UML_String_Data_06.MS_06CB'Access);
26161      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1618, (False, (Unlimited => True)));
26162      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1618, (False, AMF.CMOF.Public_Visibility));
26163   end Initialize_1618;
26164
26165   ---------------------
26166   -- Initialize_1619 --
26167   ---------------------
26168
26169   procedure Initialize_1619 is
26170   begin
26171      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1619, (False, 0));
26172      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
26173       (Base + 1619,
26174        AMF.Internals.Tables.UML_String_Data_04.MS_04EE'Access);
26175      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1619, (False, AMF.CMOF.Public_Visibility));
26176   end Initialize_1619;
26177
26178   ---------------------
26179   -- Initialize_1620 --
26180   ---------------------
26181
26182   procedure Initialize_1620 is
26183   begin
26184      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1620, (False, 0));
26185      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
26186       (Base + 1620,
26187        AMF.Internals.Tables.UML_String_Data_0A.MS_0A81'Access);
26188      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1620, (False, AMF.CMOF.Public_Visibility));
26189   end Initialize_1620;
26190
26191   ---------------------
26192   -- Initialize_1621 --
26193   ---------------------
26194
26195   procedure Initialize_1621 is
26196   begin
26197      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26198       (Base + 1621,
26199        AMF.Internals.Tables.UML_String_Data_0C.MS_0C2E'Access);
26200   end Initialize_1621;
26201
26202   ---------------------
26203   -- Initialize_1622 --
26204   ---------------------
26205
26206   procedure Initialize_1622 is
26207   begin
26208      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26209       (Base + 1622,
26210        AMF.Internals.Tables.UML_String_Data_00.MS_001C'Access);
26211   end Initialize_1622;
26212
26213   ---------------------
26214   -- Initialize_1623 --
26215   ---------------------
26216
26217   procedure Initialize_1623 is
26218   begin
26219      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26220       (Base + 1623,
26221        AMF.Internals.Tables.UML_String_Data_0A.MS_0A27'Access);
26222   end Initialize_1623;
26223
26224   ---------------------
26225   -- Initialize_1624 --
26226   ---------------------
26227
26228   procedure Initialize_1624 is
26229   begin
26230      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
26231       (Base + 1624,
26232        AMF.Internals.Tables.UML_String_Data_08.MS_0853'Access);
26233      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1624, (Is_Empty => True));
26234   end Initialize_1624;
26235
26236   ---------------------
26237   -- Initialize_1625 --
26238   ---------------------
26239
26240   procedure Initialize_1625 is
26241   begin
26242      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26243       (Base + 1625,
26244        AMF.Internals.Tables.UML_String_Data_09.MS_096B'Access);
26245   end Initialize_1625;
26246
26247   ---------------------
26248   -- Initialize_1626 --
26249   ---------------------
26250
26251   procedure Initialize_1626 is
26252   begin
26253      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1626, (Is_Empty => True));
26254   end Initialize_1626;
26255
26256   ---------------------
26257   -- Initialize_1627 --
26258   ---------------------
26259
26260   procedure Initialize_1627 is
26261   begin
26262      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
26263       (Base + 1627,
26264        AMF.Internals.Tables.UML_String_Data_00.MS_00DA'Access);
26265      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1627, (Is_Empty => True));
26266   end Initialize_1627;
26267
26268   ---------------------
26269   -- Initialize_1628 --
26270   ---------------------
26271
26272   procedure Initialize_1628 is
26273   begin
26274      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26275       (Base + 1628,
26276        AMF.Internals.Tables.UML_String_Data_07.MS_07B6'Access);
26277   end Initialize_1628;
26278
26279   ---------------------
26280   -- Initialize_1629 --
26281   ---------------------
26282
26283   procedure Initialize_1629 is
26284   begin
26285      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1629, (Is_Empty => True));
26286   end Initialize_1629;
26287
26288   ---------------------
26289   -- Initialize_1630 --
26290   ---------------------
26291
26292   procedure Initialize_1630 is
26293   begin
26294      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
26295       (Base + 1630,
26296        AMF.Internals.Tables.UML_String_Data_08.MS_0873'Access);
26297      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1630, (Is_Empty => True));
26298   end Initialize_1630;
26299
26300   ---------------------
26301   -- Initialize_1631 --
26302   ---------------------
26303
26304   procedure Initialize_1631 is
26305   begin
26306      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26307       (Base + 1631,
26308        AMF.Internals.Tables.UML_String_Data_02.MS_021C'Access);
26309   end Initialize_1631;
26310
26311   ---------------------
26312   -- Initialize_1632 --
26313   ---------------------
26314
26315   procedure Initialize_1632 is
26316   begin
26317      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1632, (Is_Empty => True));
26318   end Initialize_1632;
26319
26320   ---------------------
26321   -- Initialize_1633 --
26322   ---------------------
26323
26324   procedure Initialize_1633 is
26325   begin
26326      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26327       (Base + 1633,
26328        AMF.Internals.Tables.UML_String_Data_09.MS_09CC'Access);
26329   end Initialize_1633;
26330
26331   ---------------------
26332   -- Initialize_1634 --
26333   ---------------------
26334
26335   procedure Initialize_1634 is
26336   begin
26337      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26338       (Base + 1634,
26339        AMF.Internals.Tables.UML_String_Data_05.MS_0584'Access);
26340   end Initialize_1634;
26341
26342   ---------------------
26343   -- Initialize_1635 --
26344   ---------------------
26345
26346   procedure Initialize_1635 is
26347   begin
26348      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
26349       (Base + 1635,
26350        AMF.Internals.Tables.UML_String_Data_09.MS_098C'Access);
26351      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1635, (Is_Empty => True));
26352   end Initialize_1635;
26353
26354   ---------------------
26355   -- Initialize_1636 --
26356   ---------------------
26357
26358   procedure Initialize_1636 is
26359   begin
26360      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26361       (Base + 1636,
26362        AMF.Internals.Tables.UML_String_Data_0C.MS_0C6B'Access);
26363   end Initialize_1636;
26364
26365   ---------------------
26366   -- Initialize_1637 --
26367   ---------------------
26368
26369   procedure Initialize_1637 is
26370   begin
26371      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1637, (Is_Empty => True));
26372   end Initialize_1637;
26373
26374   ---------------------
26375   -- Initialize_1638 --
26376   ---------------------
26377
26378   procedure Initialize_1638 is
26379   begin
26380      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
26381       (Base + 1638,
26382        AMF.Internals.Tables.UML_String_Data_08.MS_0864'Access);
26383      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1638, (Is_Empty => True));
26384   end Initialize_1638;
26385
26386   ---------------------
26387   -- Initialize_1639 --
26388   ---------------------
26389
26390   procedure Initialize_1639 is
26391   begin
26392      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26393       (Base + 1639,
26394        AMF.Internals.Tables.UML_String_Data_00.MS_0098'Access);
26395   end Initialize_1639;
26396
26397   ---------------------
26398   -- Initialize_1640 --
26399   ---------------------
26400
26401   procedure Initialize_1640 is
26402   begin
26403      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1640, (Is_Empty => True));
26404   end Initialize_1640;
26405
26406   ---------------------
26407   -- Initialize_1641 --
26408   ---------------------
26409
26410   procedure Initialize_1641 is
26411   begin
26412      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
26413       (Base + 1641,
26414        AMF.Internals.Tables.UML_String_Data_03.MS_03E2'Access);
26415      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1641, (Is_Empty => True));
26416   end Initialize_1641;
26417
26418   ---------------------
26419   -- Initialize_1642 --
26420   ---------------------
26421
26422   procedure Initialize_1642 is
26423   begin
26424      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26425       (Base + 1642,
26426        AMF.Internals.Tables.UML_String_Data_09.MS_09B5'Access);
26427   end Initialize_1642;
26428
26429   ---------------------
26430   -- Initialize_1643 --
26431   ---------------------
26432
26433   procedure Initialize_1643 is
26434   begin
26435      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1643, (Is_Empty => True));
26436   end Initialize_1643;
26437
26438   ---------------------
26439   -- Initialize_1644 --
26440   ---------------------
26441
26442   procedure Initialize_1644 is
26443   begin
26444      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
26445       (Base + 1644,
26446        AMF.Internals.Tables.UML_String_Data_02.MS_0255'Access);
26447      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1644, (Is_Empty => True));
26448   end Initialize_1644;
26449
26450   ---------------------
26451   -- Initialize_1645 --
26452   ---------------------
26453
26454   procedure Initialize_1645 is
26455   begin
26456      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26457       (Base + 1645,
26458        AMF.Internals.Tables.UML_String_Data_0B.MS_0B21'Access);
26459   end Initialize_1645;
26460
26461   ---------------------
26462   -- Initialize_1646 --
26463   ---------------------
26464
26465   procedure Initialize_1646 is
26466   begin
26467      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1646, (Is_Empty => True));
26468   end Initialize_1646;
26469
26470   ---------------------
26471   -- Initialize_1647 --
26472   ---------------------
26473
26474   procedure Initialize_1647 is
26475   begin
26476      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26477       (Base + 1647,
26478        AMF.Internals.Tables.UML_String_Data_0A.MS_0A69'Access);
26479   end Initialize_1647;
26480
26481   ---------------------
26482   -- Initialize_1648 --
26483   ---------------------
26484
26485   procedure Initialize_1648 is
26486   begin
26487      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26488       (Base + 1648,
26489        AMF.Internals.Tables.UML_String_Data_07.MS_07A1'Access);
26490   end Initialize_1648;
26491
26492   ---------------------
26493   -- Initialize_1649 --
26494   ---------------------
26495
26496   procedure Initialize_1649 is
26497   begin
26498      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26499       (Base + 1649,
26500        AMF.Internals.Tables.UML_String_Data_05.MS_05B9'Access);
26501   end Initialize_1649;
26502
26503   ---------------------
26504   -- Initialize_1650 --
26505   ---------------------
26506
26507   procedure Initialize_1650 is
26508   begin
26509      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26510       (Base + 1650,
26511        AMF.Internals.Tables.UML_String_Data_00.MS_0078'Access);
26512   end Initialize_1650;
26513
26514   ---------------------
26515   -- Initialize_1651 --
26516   ---------------------
26517
26518   procedure Initialize_1651 is
26519   begin
26520      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26521       (Base + 1651,
26522        AMF.Internals.Tables.UML_String_Data_06.MS_0652'Access);
26523   end Initialize_1651;
26524
26525   ---------------------
26526   -- Initialize_1652 --
26527   ---------------------
26528
26529   procedure Initialize_1652 is
26530   begin
26531      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26532       (Base + 1652,
26533        AMF.Internals.Tables.UML_String_Data_0B.MS_0B47'Access);
26534   end Initialize_1652;
26535
26536   ---------------------
26537   -- Initialize_1653 --
26538   ---------------------
26539
26540   procedure Initialize_1653 is
26541   begin
26542      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26543       (Base + 1653,
26544        AMF.Internals.Tables.UML_String_Data_0B.MS_0BFA'Access);
26545   end Initialize_1653;
26546
26547   ---------------------
26548   -- Initialize_1654 --
26549   ---------------------
26550
26551   procedure Initialize_1654 is
26552   begin
26553      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26554       (Base + 1654,
26555        AMF.Internals.Tables.UML_String_Data_0B.MS_0B9B'Access);
26556   end Initialize_1654;
26557
26558   ---------------------
26559   -- Initialize_1655 --
26560   ---------------------
26561
26562   procedure Initialize_1655 is
26563   begin
26564      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26565       (Base + 1655,
26566        AMF.Internals.Tables.UML_String_Data_06.MS_06A6'Access);
26567   end Initialize_1655;
26568
26569   ---------------------
26570   -- Initialize_1656 --
26571   ---------------------
26572
26573   procedure Initialize_1656 is
26574   begin
26575      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26576       (Base + 1656,
26577        AMF.Internals.Tables.UML_String_Data_04.MS_04DA'Access);
26578   end Initialize_1656;
26579
26580   ---------------------
26581   -- Initialize_1657 --
26582   ---------------------
26583
26584   procedure Initialize_1657 is
26585   begin
26586      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26587       (Base + 1657,
26588        AMF.Internals.Tables.UML_String_Data_00.MS_00F7'Access);
26589   end Initialize_1657;
26590
26591   ---------------------
26592   -- Initialize_1658 --
26593   ---------------------
26594
26595   procedure Initialize_1658 is
26596   begin
26597      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26598       (Base + 1658,
26599        AMF.Internals.Tables.UML_String_Data_06.MS_0665'Access);
26600   end Initialize_1658;
26601
26602   ---------------------
26603   -- Initialize_1659 --
26604   ---------------------
26605
26606   procedure Initialize_1659 is
26607   begin
26608      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 1659, True);
26609      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
26610       (Base + 1659,
26611        AMF.Internals.Tables.UML_String_Data_03.MS_03DB'Access);
26612      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1659, (False, AMF.CMOF.Public_Visibility));
26613   end Initialize_1659;
26614
26615   ---------------------
26616   -- Initialize_1660 --
26617   ---------------------
26618
26619   procedure Initialize_1660 is
26620   begin
26621      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26622       (Base + 1660,
26623        AMF.Internals.Tables.UML_String_Data_06.MS_0687'Access);
26624   end Initialize_1660;
26625
26626   ---------------------
26627   -- Initialize_1661 --
26628   ---------------------
26629
26630   procedure Initialize_1661 is
26631   begin
26632      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
26633       (Base + 1661,
26634        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
26635      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1661, (Is_Empty => True));
26636   end Initialize_1661;
26637
26638   ---------------------
26639   -- Initialize_1662 --
26640   ---------------------
26641
26642   procedure Initialize_1662 is
26643   begin
26644      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1662, (Is_Empty => True));
26645   end Initialize_1662;
26646
26647   ---------------------
26648   -- Initialize_1663 --
26649   ---------------------
26650
26651   procedure Initialize_1663 is
26652   begin
26653      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 1663, AMF.CMOF.Return_Parameter);
26654      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1663, (False, 0));
26655      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
26656       (Base + 1663,
26657        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
26658      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1663, (False, AMF.CMOF.Public_Visibility));
26659   end Initialize_1663;
26660
26661   ---------------------
26662   -- Initialize_1664 --
26663   ---------------------
26664
26665   procedure Initialize_1664 is
26666   begin
26667      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26668       (Base + 1664,
26669        AMF.Internals.Tables.UML_String_Data_0B.MS_0B0F'Access);
26670   end Initialize_1664;
26671
26672   ---------------------
26673   -- Initialize_1665 --
26674   ---------------------
26675
26676   procedure Initialize_1665 is
26677   begin
26678      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
26679       (Base + 1665,
26680        AMF.Internals.Tables.UML_String_Data_07.MS_0708'Access);
26681      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1665, (Is_Empty => True));
26682   end Initialize_1665;
26683
26684   ---------------------
26685   -- Initialize_1666 --
26686   ---------------------
26687
26688   procedure Initialize_1666 is
26689   begin
26690      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26691       (Base + 1666,
26692        AMF.Internals.Tables.UML_String_Data_02.MS_02A3'Access);
26693   end Initialize_1666;
26694
26695   ---------------------
26696   -- Initialize_1667 --
26697   ---------------------
26698
26699   procedure Initialize_1667 is
26700   begin
26701      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1667, (Is_Empty => True));
26702   end Initialize_1667;
26703
26704   ---------------------
26705   -- Initialize_1668 --
26706   ---------------------
26707
26708   procedure Initialize_1668 is
26709   begin
26710      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26711       (Base + 1668,
26712        AMF.Internals.Tables.UML_String_Data_09.MS_096A'Access);
26713   end Initialize_1668;
26714
26715   ---------------------
26716   -- Initialize_1669 --
26717   ---------------------
26718
26719   procedure Initialize_1669 is
26720   begin
26721      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26722       (Base + 1669,
26723        AMF.Internals.Tables.UML_String_Data_05.MS_0506'Access);
26724   end Initialize_1669;
26725
26726   ---------------------
26727   -- Initialize_1670 --
26728   ---------------------
26729
26730   procedure Initialize_1670 is
26731   begin
26732      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
26733       (Base + 1670,
26734        AMF.Internals.Tables.UML_String_Data_01.MS_01DA'Access);
26735      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1670, (Is_Empty => True));
26736   end Initialize_1670;
26737
26738   ---------------------
26739   -- Initialize_1671 --
26740   ---------------------
26741
26742   procedure Initialize_1671 is
26743   begin
26744      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26745       (Base + 1671,
26746        AMF.Internals.Tables.UML_String_Data_09.MS_0921'Access);
26747   end Initialize_1671;
26748
26749   ---------------------
26750   -- Initialize_1672 --
26751   ---------------------
26752
26753   procedure Initialize_1672 is
26754   begin
26755      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1672, (Is_Empty => True));
26756   end Initialize_1672;
26757
26758   ---------------------
26759   -- Initialize_1673 --
26760   ---------------------
26761
26762   procedure Initialize_1673 is
26763   begin
26764      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
26765       (Base + 1673,
26766        AMF.Internals.Tables.UML_String_Data_03.MS_039E'Access);
26767      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1673, (Is_Empty => True));
26768   end Initialize_1673;
26769
26770   ---------------------
26771   -- Initialize_1674 --
26772   ---------------------
26773
26774   procedure Initialize_1674 is
26775   begin
26776      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26777       (Base + 1674,
26778        AMF.Internals.Tables.UML_String_Data_0C.MS_0C16'Access);
26779   end Initialize_1674;
26780
26781   ---------------------
26782   -- Initialize_1675 --
26783   ---------------------
26784
26785   procedure Initialize_1675 is
26786   begin
26787      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1675, (Is_Empty => True));
26788   end Initialize_1675;
26789
26790   ---------------------
26791   -- Initialize_1676 --
26792   ---------------------
26793
26794   procedure Initialize_1676 is
26795   begin
26796      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
26797       (Base + 1676,
26798        AMF.Internals.Tables.UML_String_Data_05.MS_05E7'Access);
26799      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1676, (Is_Empty => True));
26800   end Initialize_1676;
26801
26802   ---------------------
26803   -- Initialize_1677 --
26804   ---------------------
26805
26806   procedure Initialize_1677 is
26807   begin
26808      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26809       (Base + 1677,
26810        AMF.Internals.Tables.UML_String_Data_07.MS_0794'Access);
26811   end Initialize_1677;
26812
26813   ---------------------
26814   -- Initialize_1678 --
26815   ---------------------
26816
26817   procedure Initialize_1678 is
26818   begin
26819      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1678, (Is_Empty => True));
26820   end Initialize_1678;
26821
26822   ---------------------
26823   -- Initialize_1679 --
26824   ---------------------
26825
26826   procedure Initialize_1679 is
26827   begin
26828      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26829       (Base + 1679,
26830        AMF.Internals.Tables.UML_String_Data_00.MS_00B7'Access);
26831   end Initialize_1679;
26832
26833   ---------------------
26834   -- Initialize_1680 --
26835   ---------------------
26836
26837   procedure Initialize_1680 is
26838   begin
26839      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26840       (Base + 1680,
26841        AMF.Internals.Tables.UML_String_Data_06.MS_0628'Access);
26842   end Initialize_1680;
26843
26844   ---------------------
26845   -- Initialize_1681 --
26846   ---------------------
26847
26848   procedure Initialize_1681 is
26849   begin
26850      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
26851       (Base + 1681,
26852        AMF.Internals.Tables.UML_String_Data_0A.MS_0AA4'Access);
26853      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1681, (Is_Empty => True));
26854   end Initialize_1681;
26855
26856   ---------------------
26857   -- Initialize_1682 --
26858   ---------------------
26859
26860   procedure Initialize_1682 is
26861   begin
26862      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26863       (Base + 1682,
26864        AMF.Internals.Tables.UML_String_Data_04.MS_0492'Access);
26865   end Initialize_1682;
26866
26867   ---------------------
26868   -- Initialize_1683 --
26869   ---------------------
26870
26871   procedure Initialize_1683 is
26872   begin
26873      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1683, (Is_Empty => True));
26874   end Initialize_1683;
26875
26876   ---------------------
26877   -- Initialize_1684 --
26878   ---------------------
26879
26880   procedure Initialize_1684 is
26881   begin
26882      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
26883       (Base + 1684,
26884        AMF.Internals.Tables.UML_String_Data_09.MS_09EA'Access);
26885      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1684, (Is_Empty => True));
26886   end Initialize_1684;
26887
26888   ---------------------
26889   -- Initialize_1685 --
26890   ---------------------
26891
26892   procedure Initialize_1685 is
26893   begin
26894      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26895       (Base + 1685,
26896        AMF.Internals.Tables.UML_String_Data_0C.MS_0C72'Access);
26897   end Initialize_1685;
26898
26899   ---------------------
26900   -- Initialize_1686 --
26901   ---------------------
26902
26903   procedure Initialize_1686 is
26904   begin
26905      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1686, (Is_Empty => True));
26906   end Initialize_1686;
26907
26908   ---------------------
26909   -- Initialize_1687 --
26910   ---------------------
26911
26912   procedure Initialize_1687 is
26913   begin
26914      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
26915       (Base + 1687,
26916        AMF.Internals.Tables.UML_String_Data_0C.MS_0C44'Access);
26917      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1687, (Is_Empty => True));
26918   end Initialize_1687;
26919
26920   ---------------------
26921   -- Initialize_1688 --
26922   ---------------------
26923
26924   procedure Initialize_1688 is
26925   begin
26926      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26927       (Base + 1688,
26928        AMF.Internals.Tables.UML_String_Data_0B.MS_0B4B'Access);
26929   end Initialize_1688;
26930
26931   ---------------------
26932   -- Initialize_1689 --
26933   ---------------------
26934
26935   procedure Initialize_1689 is
26936   begin
26937      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1689, (Is_Empty => True));
26938   end Initialize_1689;
26939
26940   ---------------------
26941   -- Initialize_1690 --
26942   ---------------------
26943
26944   procedure Initialize_1690 is
26945   begin
26946      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26947       (Base + 1690,
26948        AMF.Internals.Tables.UML_String_Data_05.MS_05B1'Access);
26949   end Initialize_1690;
26950
26951   ---------------------
26952   -- Initialize_1691 --
26953   ---------------------
26954
26955   procedure Initialize_1691 is
26956   begin
26957      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26958       (Base + 1691,
26959        AMF.Internals.Tables.UML_String_Data_03.MS_03F6'Access);
26960   end Initialize_1691;
26961
26962   ---------------------
26963   -- Initialize_1692 --
26964   ---------------------
26965
26966   procedure Initialize_1692 is
26967   begin
26968      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26969       (Base + 1692,
26970        AMF.Internals.Tables.UML_String_Data_00.MS_0081'Access);
26971   end Initialize_1692;
26972
26973   ---------------------
26974   -- Initialize_1693 --
26975   ---------------------
26976
26977   procedure Initialize_1693 is
26978   begin
26979      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26980       (Base + 1693,
26981        AMF.Internals.Tables.UML_String_Data_0B.MS_0B15'Access);
26982   end Initialize_1693;
26983
26984   ---------------------
26985   -- Initialize_1694 --
26986   ---------------------
26987
26988   procedure Initialize_1694 is
26989   begin
26990      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
26991       (Base + 1694,
26992        AMF.Internals.Tables.UML_String_Data_0C.MS_0C2B'Access);
26993   end Initialize_1694;
26994
26995   ---------------------
26996   -- Initialize_1695 --
26997   ---------------------
26998
26999   procedure Initialize_1695 is
27000   begin
27001      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27002       (Base + 1695,
27003        AMF.Internals.Tables.UML_String_Data_07.MS_07A6'Access);
27004   end Initialize_1695;
27005
27006   ---------------------
27007   -- Initialize_1696 --
27008   ---------------------
27009
27010   procedure Initialize_1696 is
27011   begin
27012      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27013       (Base + 1696,
27014        AMF.Internals.Tables.UML_String_Data_05.MS_0517'Access);
27015   end Initialize_1696;
27016
27017   ---------------------
27018   -- Initialize_1697 --
27019   ---------------------
27020
27021   procedure Initialize_1697 is
27022   begin
27023      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27024       (Base + 1697,
27025        AMF.Internals.Tables.UML_String_Data_0B.MS_0B3C'Access);
27026   end Initialize_1697;
27027
27028   ---------------------
27029   -- Initialize_1698 --
27030   ---------------------
27031
27032   procedure Initialize_1698 is
27033   begin
27034      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 1698, True);
27035      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
27036       (Base + 1698,
27037        AMF.Internals.Tables.UML_String_Data_06.MS_0676'Access);
27038      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1698, (False, AMF.CMOF.Public_Visibility));
27039   end Initialize_1698;
27040
27041   ---------------------
27042   -- Initialize_1699 --
27043   ---------------------
27044
27045   procedure Initialize_1699 is
27046   begin
27047      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27048       (Base + 1699,
27049        AMF.Internals.Tables.UML_String_Data_04.MS_04C4'Access);
27050   end Initialize_1699;
27051
27052   ---------------------
27053   -- Initialize_1700 --
27054   ---------------------
27055
27056   procedure Initialize_1700 is
27057   begin
27058      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
27059       (Base + 1700,
27060        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
27061      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1700, (Is_Empty => True));
27062   end Initialize_1700;
27063
27064   ---------------------
27065   -- Initialize_1701 --
27066   ---------------------
27067
27068   procedure Initialize_1701 is
27069   begin
27070      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1701, (Is_Empty => True));
27071   end Initialize_1701;
27072
27073   ---------------------
27074   -- Initialize_1702 --
27075   ---------------------
27076
27077   procedure Initialize_1702 is
27078   begin
27079      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 1702, AMF.CMOF.Return_Parameter);
27080      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1702, (False, 0));
27081      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
27082       (Base + 1702,
27083        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
27084      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1702, (False, (Unlimited => True)));
27085      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1702, (False, AMF.CMOF.Public_Visibility));
27086   end Initialize_1702;
27087
27088   ---------------------
27089   -- Initialize_1703 --
27090   ---------------------
27091
27092   procedure Initialize_1703 is
27093   begin
27094      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27095       (Base + 1703,
27096        AMF.Internals.Tables.UML_String_Data_00.MS_00F4'Access);
27097   end Initialize_1703;
27098
27099   ---------------------
27100   -- Initialize_1704 --
27101   ---------------------
27102
27103   procedure Initialize_1704 is
27104   begin
27105      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27106       (Base + 1704,
27107        AMF.Internals.Tables.UML_String_Data_06.MS_0661'Access);
27108   end Initialize_1704;
27109
27110   ---------------------
27111   -- Initialize_1705 --
27112   ---------------------
27113
27114   procedure Initialize_1705 is
27115   begin
27116      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
27117       (Base + 1705,
27118        AMF.Internals.Tables.UML_String_Data_01.MS_0153'Access);
27119      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1705, (Is_Empty => True));
27120   end Initialize_1705;
27121
27122   ---------------------
27123   -- Initialize_1706 --
27124   ---------------------
27125
27126   procedure Initialize_1706 is
27127   begin
27128      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27129       (Base + 1706,
27130        AMF.Internals.Tables.UML_String_Data_03.MS_03D9'Access);
27131   end Initialize_1706;
27132
27133   ---------------------
27134   -- Initialize_1707 --
27135   ---------------------
27136
27137   procedure Initialize_1707 is
27138   begin
27139      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1707, (Is_Empty => True));
27140   end Initialize_1707;
27141
27142   ---------------------
27143   -- Initialize_1708 --
27144   ---------------------
27145
27146   procedure Initialize_1708 is
27147   begin
27148      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
27149       (Base + 1708,
27150        AMF.Internals.Tables.UML_String_Data_0C.MS_0C77'Access);
27151      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1708, (Is_Empty => True));
27152   end Initialize_1708;
27153
27154   ---------------------
27155   -- Initialize_1709 --
27156   ---------------------
27157
27158   procedure Initialize_1709 is
27159   begin
27160      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27161       (Base + 1709,
27162        AMF.Internals.Tables.UML_String_Data_05.MS_0581'Access);
27163   end Initialize_1709;
27164
27165   ---------------------
27166   -- Initialize_1710 --
27167   ---------------------
27168
27169   procedure Initialize_1710 is
27170   begin
27171      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1710, (Is_Empty => True));
27172   end Initialize_1710;
27173
27174   ---------------------
27175   -- Initialize_1711 --
27176   ---------------------
27177
27178   procedure Initialize_1711 is
27179   begin
27180      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
27181       (Base + 1711,
27182        AMF.Internals.Tables.UML_String_Data_0C.MS_0C4F'Access);
27183      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1711, (Is_Empty => True));
27184   end Initialize_1711;
27185
27186   ---------------------
27187   -- Initialize_1712 --
27188   ---------------------
27189
27190   procedure Initialize_1712 is
27191   begin
27192      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27193       (Base + 1712,
27194        AMF.Internals.Tables.UML_String_Data_05.MS_05F5'Access);
27195   end Initialize_1712;
27196
27197   ---------------------
27198   -- Initialize_1713 --
27199   ---------------------
27200
27201   procedure Initialize_1713 is
27202   begin
27203      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1713, (Is_Empty => True));
27204   end Initialize_1713;
27205
27206   ---------------------
27207   -- Initialize_1714 --
27208   ---------------------
27209
27210   procedure Initialize_1714 is
27211   begin
27212      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27213       (Base + 1714,
27214        AMF.Internals.Tables.UML_String_Data_08.MS_08E9'Access);
27215   end Initialize_1714;
27216
27217   ---------------------
27218   -- Initialize_1715 --
27219   ---------------------
27220
27221   procedure Initialize_1715 is
27222   begin
27223      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27224       (Base + 1715,
27225        AMF.Internals.Tables.UML_String_Data_08.MS_0885'Access);
27226   end Initialize_1715;
27227
27228   ---------------------
27229   -- Initialize_1716 --
27230   ---------------------
27231
27232   procedure Initialize_1716 is
27233   begin
27234      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27235       (Base + 1716,
27236        AMF.Internals.Tables.UML_String_Data_0C.MS_0C87'Access);
27237   end Initialize_1716;
27238
27239   ---------------------
27240   -- Initialize_1717 --
27241   ---------------------
27242
27243   procedure Initialize_1717 is
27244   begin
27245      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27246       (Base + 1717,
27247        AMF.Internals.Tables.UML_String_Data_09.MS_096E'Access);
27248   end Initialize_1717;
27249
27250   ---------------------
27251   -- Initialize_1718 --
27252   ---------------------
27253
27254   procedure Initialize_1718 is
27255   begin
27256      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27257       (Base + 1718,
27258        AMF.Internals.Tables.UML_String_Data_00.MS_0029'Access);
27259   end Initialize_1718;
27260
27261   ---------------------
27262   -- Initialize_1719 --
27263   ---------------------
27264
27265   procedure Initialize_1719 is
27266   begin
27267      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27268       (Base + 1719,
27269        AMF.Internals.Tables.UML_String_Data_06.MS_06F2'Access);
27270   end Initialize_1719;
27271
27272   ---------------------
27273   -- Initialize_1720 --
27274   ---------------------
27275
27276   procedure Initialize_1720 is
27277   begin
27278      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27279       (Base + 1720,
27280        AMF.Internals.Tables.UML_String_Data_08.MS_08D2'Access);
27281   end Initialize_1720;
27282
27283   ---------------------
27284   -- Initialize_1721 --
27285   ---------------------
27286
27287   procedure Initialize_1721 is
27288   begin
27289      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27290       (Base + 1721,
27291        AMF.Internals.Tables.UML_String_Data_07.MS_0761'Access);
27292   end Initialize_1721;
27293
27294   ---------------------
27295   -- Initialize_1722 --
27296   ---------------------
27297
27298   procedure Initialize_1722 is
27299   begin
27300      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27301       (Base + 1722,
27302        AMF.Internals.Tables.UML_String_Data_02.MS_02B8'Access);
27303   end Initialize_1722;
27304
27305   ---------------------
27306   -- Initialize_1723 --
27307   ---------------------
27308
27309   procedure Initialize_1723 is
27310   begin
27311      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27312       (Base + 1723,
27313        AMF.Internals.Tables.UML_String_Data_0A.MS_0A6D'Access);
27314   end Initialize_1723;
27315
27316   ---------------------
27317   -- Initialize_1724 --
27318   ---------------------
27319
27320   procedure Initialize_1724 is
27321   begin
27322      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27323       (Base + 1724,
27324        AMF.Internals.Tables.UML_String_Data_00.MS_0073'Access);
27325   end Initialize_1724;
27326
27327   ---------------------
27328   -- Initialize_1725 --
27329   ---------------------
27330
27331   procedure Initialize_1725 is
27332   begin
27333      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27334       (Base + 1725,
27335        AMF.Internals.Tables.UML_String_Data_0B.MS_0B10'Access);
27336   end Initialize_1725;
27337
27338   ---------------------
27339   -- Initialize_1726 --
27340   ---------------------
27341
27342   procedure Initialize_1726 is
27343   begin
27344      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
27345       (Base + 1726,
27346        AMF.Internals.Tables.UML_String_Data_05.MS_05C0'Access);
27347      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1726, (Is_Empty => True));
27348   end Initialize_1726;
27349
27350   ---------------------
27351   -- Initialize_1727 --
27352   ---------------------
27353
27354   procedure Initialize_1727 is
27355   begin
27356      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27357       (Base + 1727,
27358        AMF.Internals.Tables.UML_String_Data_06.MS_0616'Access);
27359   end Initialize_1727;
27360
27361   ---------------------
27362   -- Initialize_1728 --
27363   ---------------------
27364
27365   procedure Initialize_1728 is
27366   begin
27367      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1728, (Is_Empty => True));
27368   end Initialize_1728;
27369
27370   ---------------------
27371   -- Initialize_1729 --
27372   ---------------------
27373
27374   procedure Initialize_1729 is
27375   begin
27376      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
27377       (Base + 1729,
27378        AMF.Internals.Tables.UML_String_Data_04.MS_044C'Access);
27379      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1729, (Is_Empty => True));
27380   end Initialize_1729;
27381
27382   ---------------------
27383   -- Initialize_1730 --
27384   ---------------------
27385
27386   procedure Initialize_1730 is
27387   begin
27388      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27389       (Base + 1730,
27390        AMF.Internals.Tables.UML_String_Data_0B.MS_0BA3'Access);
27391   end Initialize_1730;
27392
27393   ---------------------
27394   -- Initialize_1731 --
27395   ---------------------
27396
27397   procedure Initialize_1731 is
27398   begin
27399      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1731, (Is_Empty => True));
27400   end Initialize_1731;
27401
27402   ---------------------
27403   -- Initialize_1732 --
27404   ---------------------
27405
27406   procedure Initialize_1732 is
27407   begin
27408      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
27409       (Base + 1732,
27410        AMF.Internals.Tables.UML_String_Data_07.MS_0737'Access);
27411      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1732, (Is_Empty => True));
27412   end Initialize_1732;
27413
27414   ---------------------
27415   -- Initialize_1733 --
27416   ---------------------
27417
27418   procedure Initialize_1733 is
27419   begin
27420      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27421       (Base + 1733,
27422        AMF.Internals.Tables.UML_String_Data_02.MS_0246'Access);
27423   end Initialize_1733;
27424
27425   ---------------------
27426   -- Initialize_1734 --
27427   ---------------------
27428
27429   procedure Initialize_1734 is
27430   begin
27431      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1734, (Is_Empty => True));
27432   end Initialize_1734;
27433
27434   ---------------------
27435   -- Initialize_1735 --
27436   ---------------------
27437
27438   procedure Initialize_1735 is
27439   begin
27440      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27441       (Base + 1735,
27442        AMF.Internals.Tables.UML_String_Data_09.MS_09DA'Access);
27443   end Initialize_1735;
27444
27445   ---------------------
27446   -- Initialize_1736 --
27447   ---------------------
27448
27449   procedure Initialize_1736 is
27450   begin
27451      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27452       (Base + 1736,
27453        AMF.Internals.Tables.UML_String_Data_01.MS_0124'Access);
27454   end Initialize_1736;
27455
27456   ---------------------
27457   -- Initialize_1737 --
27458   ---------------------
27459
27460   procedure Initialize_1737 is
27461   begin
27462      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27463       (Base + 1737,
27464        AMF.Internals.Tables.UML_String_Data_09.MS_094B'Access);
27465   end Initialize_1737;
27466
27467   ---------------------
27468   -- Initialize_1738 --
27469   ---------------------
27470
27471   procedure Initialize_1738 is
27472   begin
27473      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27474       (Base + 1738,
27475        AMF.Internals.Tables.UML_String_Data_03.MS_0372'Access);
27476   end Initialize_1738;
27477
27478   ---------------------
27479   -- Initialize_1739 --
27480   ---------------------
27481
27482   procedure Initialize_1739 is
27483   begin
27484      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27485       (Base + 1739,
27486        AMF.Internals.Tables.UML_String_Data_01.MS_0187'Access);
27487   end Initialize_1739;
27488
27489   ---------------------
27490   -- Initialize_1740 --
27491   ---------------------
27492
27493   procedure Initialize_1740 is
27494   begin
27495      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27496       (Base + 1740,
27497        AMF.Internals.Tables.UML_String_Data_06.MS_0624'Access);
27498   end Initialize_1740;
27499
27500   ---------------------
27501   -- Initialize_1741 --
27502   ---------------------
27503
27504   procedure Initialize_1741 is
27505   begin
27506      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
27507       (Base + 1741,
27508        AMF.Internals.Tables.UML_String_Data_01.MS_0153'Access);
27509      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1741, (Is_Empty => True));
27510   end Initialize_1741;
27511
27512   ---------------------
27513   -- Initialize_1742 --
27514   ---------------------
27515
27516   procedure Initialize_1742 is
27517   begin
27518      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27519       (Base + 1742,
27520        AMF.Internals.Tables.UML_String_Data_06.MS_068E'Access);
27521   end Initialize_1742;
27522
27523   ---------------------
27524   -- Initialize_1743 --
27525   ---------------------
27526
27527   procedure Initialize_1743 is
27528   begin
27529      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1743, (Is_Empty => True));
27530   end Initialize_1743;
27531
27532   ---------------------
27533   -- Initialize_1744 --
27534   ---------------------
27535
27536   procedure Initialize_1744 is
27537   begin
27538      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
27539       (Base + 1744,
27540        AMF.Internals.Tables.UML_String_Data_04.MS_0468'Access);
27541      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1744, (Is_Empty => True));
27542   end Initialize_1744;
27543
27544   ---------------------
27545   -- Initialize_1745 --
27546   ---------------------
27547
27548   procedure Initialize_1745 is
27549   begin
27550      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27551       (Base + 1745,
27552        AMF.Internals.Tables.UML_String_Data_05.MS_059F'Access);
27553   end Initialize_1745;
27554
27555   ---------------------
27556   -- Initialize_1746 --
27557   ---------------------
27558
27559   procedure Initialize_1746 is
27560   begin
27561      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1746, (Is_Empty => True));
27562   end Initialize_1746;
27563
27564   ---------------------
27565   -- Initialize_1747 --
27566   ---------------------
27567
27568   procedure Initialize_1747 is
27569   begin
27570      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27571       (Base + 1747,
27572        AMF.Internals.Tables.UML_String_Data_0A.MS_0AC4'Access);
27573   end Initialize_1747;
27574
27575   ---------------------
27576   -- Initialize_1748 --
27577   ---------------------
27578
27579   procedure Initialize_1748 is
27580   begin
27581      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27582       (Base + 1748,
27583        AMF.Internals.Tables.UML_String_Data_02.MS_0269'Access);
27584   end Initialize_1748;
27585
27586   ---------------------
27587   -- Initialize_1749 --
27588   ---------------------
27589
27590   procedure Initialize_1749 is
27591   begin
27592      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27593       (Base + 1749,
27594        AMF.Internals.Tables.UML_String_Data_0A.MS_0A7E'Access);
27595   end Initialize_1749;
27596
27597   ---------------------
27598   -- Initialize_1750 --
27599   ---------------------
27600
27601   procedure Initialize_1750 is
27602   begin
27603      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27604       (Base + 1750,
27605        AMF.Internals.Tables.UML_String_Data_04.MS_04C5'Access);
27606   end Initialize_1750;
27607
27608   ---------------------
27609   -- Initialize_1751 --
27610   ---------------------
27611
27612   procedure Initialize_1751 is
27613   begin
27614      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27615       (Base + 1751,
27616        AMF.Internals.Tables.UML_String_Data_02.MS_0206'Access);
27617   end Initialize_1751;
27618
27619   ---------------------
27620   -- Initialize_1752 --
27621   ---------------------
27622
27623   procedure Initialize_1752 is
27624   begin
27625      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27626       (Base + 1752,
27627        AMF.Internals.Tables.UML_String_Data_09.MS_09C1'Access);
27628   end Initialize_1752;
27629
27630   ---------------------
27631   -- Initialize_1753 --
27632   ---------------------
27633
27634   procedure Initialize_1753 is
27635   begin
27636      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27637       (Base + 1753,
27638        AMF.Internals.Tables.UML_String_Data_05.MS_050C'Access);
27639   end Initialize_1753;
27640
27641   ---------------------
27642   -- Initialize_1754 --
27643   ---------------------
27644
27645   procedure Initialize_1754 is
27646   begin
27647      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27648       (Base + 1754,
27649        AMF.Internals.Tables.UML_String_Data_03.MS_03BB'Access);
27650   end Initialize_1754;
27651
27652   ---------------------
27653   -- Initialize_1755 --
27654   ---------------------
27655
27656   procedure Initialize_1755 is
27657   begin
27658      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27659       (Base + 1755,
27660        AMF.Internals.Tables.UML_String_Data_08.MS_088A'Access);
27661   end Initialize_1755;
27662
27663   ---------------------
27664   -- Initialize_1756 --
27665   ---------------------
27666
27667   procedure Initialize_1756 is
27668   begin
27669      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
27670       (Base + 1756,
27671        AMF.Internals.Tables.UML_String_Data_01.MS_01E0'Access);
27672      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1756, (Is_Empty => True));
27673   end Initialize_1756;
27674
27675   ---------------------
27676   -- Initialize_1757 --
27677   ---------------------
27678
27679   procedure Initialize_1757 is
27680   begin
27681      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27682       (Base + 1757,
27683        AMF.Internals.Tables.UML_String_Data_06.MS_06EF'Access);
27684   end Initialize_1757;
27685
27686   ---------------------
27687   -- Initialize_1758 --
27688   ---------------------
27689
27690   procedure Initialize_1758 is
27691   begin
27692      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1758, (Is_Empty => True));
27693   end Initialize_1758;
27694
27695   ---------------------
27696   -- Initialize_1759 --
27697   ---------------------
27698
27699   procedure Initialize_1759 is
27700   begin
27701      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
27702       (Base + 1759,
27703        AMF.Internals.Tables.UML_String_Data_03.MS_0312'Access);
27704      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1759, (Is_Empty => True));
27705   end Initialize_1759;
27706
27707   ---------------------
27708   -- Initialize_1760 --
27709   ---------------------
27710
27711   procedure Initialize_1760 is
27712   begin
27713      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27714       (Base + 1760,
27715        AMF.Internals.Tables.UML_String_Data_01.MS_0164'Access);
27716   end Initialize_1760;
27717
27718   ---------------------
27719   -- Initialize_1761 --
27720   ---------------------
27721
27722   procedure Initialize_1761 is
27723   begin
27724      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1761, (Is_Empty => True));
27725   end Initialize_1761;
27726
27727   ---------------------
27728   -- Initialize_1762 --
27729   ---------------------
27730
27731   procedure Initialize_1762 is
27732   begin
27733      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
27734       (Base + 1762,
27735        AMF.Internals.Tables.UML_String_Data_06.MS_06AA'Access);
27736      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1762, (Is_Empty => True));
27737   end Initialize_1762;
27738
27739   ---------------------
27740   -- Initialize_1763 --
27741   ---------------------
27742
27743   procedure Initialize_1763 is
27744   begin
27745      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27746       (Base + 1763,
27747        AMF.Internals.Tables.UML_String_Data_07.MS_0741'Access);
27748   end Initialize_1763;
27749
27750   ---------------------
27751   -- Initialize_1764 --
27752   ---------------------
27753
27754   procedure Initialize_1764 is
27755   begin
27756      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1764, (Is_Empty => True));
27757   end Initialize_1764;
27758
27759   ---------------------
27760   -- Initialize_1765 --
27761   ---------------------
27762
27763   procedure Initialize_1765 is
27764   begin
27765      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
27766       (Base + 1765,
27767        AMF.Internals.Tables.UML_String_Data_0A.MS_0AE9'Access);
27768      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1765, (Is_Empty => True));
27769   end Initialize_1765;
27770
27771   ---------------------
27772   -- Initialize_1766 --
27773   ---------------------
27774
27775   procedure Initialize_1766 is
27776   begin
27777      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27778       (Base + 1766,
27779        AMF.Internals.Tables.UML_String_Data_08.MS_08BD'Access);
27780   end Initialize_1766;
27781
27782   ---------------------
27783   -- Initialize_1767 --
27784   ---------------------
27785
27786   procedure Initialize_1767 is
27787   begin
27788      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1767, (Is_Empty => True));
27789   end Initialize_1767;
27790
27791   ---------------------
27792   -- Initialize_1768 --
27793   ---------------------
27794
27795   procedure Initialize_1768 is
27796   begin
27797      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
27798       (Base + 1768,
27799        AMF.Internals.Tables.UML_String_Data_08.MS_0860'Access);
27800      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1768, (Is_Empty => True));
27801   end Initialize_1768;
27802
27803   ---------------------
27804   -- Initialize_1769 --
27805   ---------------------
27806
27807   procedure Initialize_1769 is
27808   begin
27809      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27810       (Base + 1769,
27811        AMF.Internals.Tables.UML_String_Data_07.MS_0783'Access);
27812   end Initialize_1769;
27813
27814   ---------------------
27815   -- Initialize_1770 --
27816   ---------------------
27817
27818   procedure Initialize_1770 is
27819   begin
27820      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1770, (Is_Empty => True));
27821   end Initialize_1770;
27822
27823   ---------------------
27824   -- Initialize_1771 --
27825   ---------------------
27826
27827   procedure Initialize_1771 is
27828   begin
27829      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
27830       (Base + 1771,
27831        AMF.Internals.Tables.UML_String_Data_00.MS_0090'Access);
27832      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1771, (Is_Empty => True));
27833   end Initialize_1771;
27834
27835   ---------------------
27836   -- Initialize_1772 --
27837   ---------------------
27838
27839   procedure Initialize_1772 is
27840   begin
27841      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27842       (Base + 1772,
27843        AMF.Internals.Tables.UML_String_Data_04.MS_0443'Access);
27844   end Initialize_1772;
27845
27846   ---------------------
27847   -- Initialize_1773 --
27848   ---------------------
27849
27850   procedure Initialize_1773 is
27851   begin
27852      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1773, (Is_Empty => True));
27853   end Initialize_1773;
27854
27855   ---------------------
27856   -- Initialize_1774 --
27857   ---------------------
27858
27859   procedure Initialize_1774 is
27860   begin
27861      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
27862       (Base + 1774,
27863        AMF.Internals.Tables.UML_String_Data_03.MS_0347'Access);
27864      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1774, (Is_Empty => True));
27865   end Initialize_1774;
27866
27867   ---------------------
27868   -- Initialize_1775 --
27869   ---------------------
27870
27871   procedure Initialize_1775 is
27872   begin
27873      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27874       (Base + 1775,
27875        AMF.Internals.Tables.UML_String_Data_05.MS_057D'Access);
27876   end Initialize_1775;
27877
27878   ---------------------
27879   -- Initialize_1776 --
27880   ---------------------
27881
27882   procedure Initialize_1776 is
27883   begin
27884      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1776, (Is_Empty => True));
27885   end Initialize_1776;
27886
27887   ---------------------
27888   -- Initialize_1777 --
27889   ---------------------
27890
27891   procedure Initialize_1777 is
27892   begin
27893      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27894       (Base + 1777,
27895        AMF.Internals.Tables.UML_String_Data_00.MS_00AA'Access);
27896   end Initialize_1777;
27897
27898   ---------------------
27899   -- Initialize_1778 --
27900   ---------------------
27901
27902   procedure Initialize_1778 is
27903   begin
27904      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27905       (Base + 1778,
27906        AMF.Internals.Tables.UML_String_Data_07.MS_0721'Access);
27907   end Initialize_1778;
27908
27909   ---------------------
27910   -- Initialize_1779 --
27911   ---------------------
27912
27913   procedure Initialize_1779 is
27914   begin
27915      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
27916       (Base + 1779,
27917        AMF.Internals.Tables.UML_String_Data_0A.MS_0AF4'Access);
27918      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1779, (Is_Empty => True));
27919   end Initialize_1779;
27920
27921   ---------------------
27922   -- Initialize_1780 --
27923   ---------------------
27924
27925   procedure Initialize_1780 is
27926   begin
27927      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27928       (Base + 1780,
27929        AMF.Internals.Tables.UML_String_Data_01.MS_015C'Access);
27930   end Initialize_1780;
27931
27932   ---------------------
27933   -- Initialize_1781 --
27934   ---------------------
27935
27936   procedure Initialize_1781 is
27937   begin
27938      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1781, (Is_Empty => True));
27939   end Initialize_1781;
27940
27941   ---------------------
27942   -- Initialize_1782 --
27943   ---------------------
27944
27945   procedure Initialize_1782 is
27946   begin
27947      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
27948       (Base + 1782,
27949        AMF.Internals.Tables.UML_String_Data_02.MS_0286'Access);
27950      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1782, (Is_Empty => True));
27951   end Initialize_1782;
27952
27953   ---------------------
27954   -- Initialize_1783 --
27955   ---------------------
27956
27957   procedure Initialize_1783 is
27958   begin
27959      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27960       (Base + 1783,
27961        AMF.Internals.Tables.UML_String_Data_02.MS_02D1'Access);
27962   end Initialize_1783;
27963
27964   ---------------------
27965   -- Initialize_1784 --
27966   ---------------------
27967
27968   procedure Initialize_1784 is
27969   begin
27970      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1784, (Is_Empty => True));
27971   end Initialize_1784;
27972
27973   ---------------------
27974   -- Initialize_1785 --
27975   ---------------------
27976
27977   procedure Initialize_1785 is
27978   begin
27979      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
27980       (Base + 1785,
27981        AMF.Internals.Tables.UML_String_Data_08.MS_0869'Access);
27982      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1785, (Is_Empty => True));
27983   end Initialize_1785;
27984
27985   ---------------------
27986   -- Initialize_1786 --
27987   ---------------------
27988
27989   procedure Initialize_1786 is
27990   begin
27991      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
27992       (Base + 1786,
27993        AMF.Internals.Tables.UML_String_Data_00.MS_007A'Access);
27994   end Initialize_1786;
27995
27996   ---------------------
27997   -- Initialize_1787 --
27998   ---------------------
27999
28000   procedure Initialize_1787 is
28001   begin
28002      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1787, (Is_Empty => True));
28003   end Initialize_1787;
28004
28005   ---------------------
28006   -- Initialize_1788 --
28007   ---------------------
28008
28009   procedure Initialize_1788 is
28010   begin
28011      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
28012       (Base + 1788,
28013        AMF.Internals.Tables.UML_String_Data_0C.MS_0C08'Access);
28014      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1788, (Is_Empty => True));
28015   end Initialize_1788;
28016
28017   ---------------------
28018   -- Initialize_1789 --
28019   ---------------------
28020
28021   procedure Initialize_1789 is
28022   begin
28023      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28024       (Base + 1789,
28025        AMF.Internals.Tables.UML_String_Data_0B.MS_0B91'Access);
28026   end Initialize_1789;
28027
28028   ---------------------
28029   -- Initialize_1790 --
28030   ---------------------
28031
28032   procedure Initialize_1790 is
28033   begin
28034      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1790, (Is_Empty => True));
28035   end Initialize_1790;
28036
28037   ---------------------
28038   -- Initialize_1791 --
28039   ---------------------
28040
28041   procedure Initialize_1791 is
28042   begin
28043      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28044       (Base + 1791,
28045        AMF.Internals.Tables.UML_String_Data_09.MS_09DA'Access);
28046   end Initialize_1791;
28047
28048   ---------------------
28049   -- Initialize_1792 --
28050   ---------------------
28051
28052   procedure Initialize_1792 is
28053   begin
28054      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28055       (Base + 1792,
28056        AMF.Internals.Tables.UML_String_Data_08.MS_0895'Access);
28057   end Initialize_1792;
28058
28059   ---------------------
28060   -- Initialize_1793 --
28061   ---------------------
28062
28063   procedure Initialize_1793 is
28064   begin
28065      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28066       (Base + 1793,
28067        AMF.Internals.Tables.UML_String_Data_01.MS_0170'Access);
28068   end Initialize_1793;
28069
28070   ---------------------
28071   -- Initialize_1794 --
28072   ---------------------
28073
28074   procedure Initialize_1794 is
28075   begin
28076      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28077       (Base + 1794,
28078        AMF.Internals.Tables.UML_String_Data_01.MS_0124'Access);
28079   end Initialize_1794;
28080
28081   ---------------------
28082   -- Initialize_1795 --
28083   ---------------------
28084
28085   procedure Initialize_1795 is
28086   begin
28087      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28088       (Base + 1795,
28089        AMF.Internals.Tables.UML_String_Data_09.MS_09DC'Access);
28090   end Initialize_1795;
28091
28092   ---------------------
28093   -- Initialize_1796 --
28094   ---------------------
28095
28096   procedure Initialize_1796 is
28097   begin
28098      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28099       (Base + 1796,
28100        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD0'Access);
28101   end Initialize_1796;
28102
28103   ---------------------
28104   -- Initialize_1797 --
28105   ---------------------
28106
28107   procedure Initialize_1797 is
28108   begin
28109      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28110       (Base + 1797,
28111        AMF.Internals.Tables.UML_String_Data_0B.MS_0BB5'Access);
28112   end Initialize_1797;
28113
28114   ---------------------
28115   -- Initialize_1798 --
28116   ---------------------
28117
28118   procedure Initialize_1798 is
28119   begin
28120      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28121       (Base + 1798,
28122        AMF.Internals.Tables.UML_String_Data_0A.MS_0A24'Access);
28123   end Initialize_1798;
28124
28125   ---------------------
28126   -- Initialize_1799 --
28127   ---------------------
28128
28129   procedure Initialize_1799 is
28130   begin
28131      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
28132       (Base + 1799,
28133        AMF.Internals.Tables.UML_String_Data_03.MS_03F7'Access);
28134      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1799, (Is_Empty => True));
28135   end Initialize_1799;
28136
28137   ---------------------
28138   -- Initialize_1800 --
28139   ---------------------
28140
28141   procedure Initialize_1800 is
28142   begin
28143      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28144       (Base + 1800,
28145        AMF.Internals.Tables.UML_String_Data_03.MS_03E8'Access);
28146   end Initialize_1800;
28147
28148   ---------------------
28149   -- Initialize_1801 --
28150   ---------------------
28151
28152   procedure Initialize_1801 is
28153   begin
28154      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1801, (Is_Empty => True));
28155   end Initialize_1801;
28156
28157   ---------------------
28158   -- Initialize_1802 --
28159   ---------------------
28160
28161   procedure Initialize_1802 is
28162   begin
28163      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
28164       (Base + 1802,
28165        AMF.Internals.Tables.UML_String_Data_00.MS_00B4'Access);
28166      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1802, (Is_Empty => True));
28167   end Initialize_1802;
28168
28169   ---------------------
28170   -- Initialize_1803 --
28171   ---------------------
28172
28173   procedure Initialize_1803 is
28174   begin
28175      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28176       (Base + 1803,
28177        AMF.Internals.Tables.UML_String_Data_01.MS_01E9'Access);
28178   end Initialize_1803;
28179
28180   ---------------------
28181   -- Initialize_1804 --
28182   ---------------------
28183
28184   procedure Initialize_1804 is
28185   begin
28186      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1804, (Is_Empty => True));
28187   end Initialize_1804;
28188
28189   ---------------------
28190   -- Initialize_1805 --
28191   ---------------------
28192
28193   procedure Initialize_1805 is
28194   begin
28195      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28196       (Base + 1805,
28197        AMF.Internals.Tables.UML_String_Data_01.MS_01E4'Access);
28198   end Initialize_1805;
28199
28200   ---------------------
28201   -- Initialize_1806 --
28202   ---------------------
28203
28204   procedure Initialize_1806 is
28205   begin
28206      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
28207       (Base + 1806,
28208        AMF.Internals.Tables.UML_String_Data_00.MS_001B'Access);
28209      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1806, (Is_Empty => True));
28210   end Initialize_1806;
28211
28212   ---------------------
28213   -- Initialize_1807 --
28214   ---------------------
28215
28216   procedure Initialize_1807 is
28217   begin
28218      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28219       (Base + 1807,
28220        AMF.Internals.Tables.UML_String_Data_0A.MS_0A7D'Access);
28221   end Initialize_1807;
28222
28223   ---------------------
28224   -- Initialize_1808 --
28225   ---------------------
28226
28227   procedure Initialize_1808 is
28228   begin
28229      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1808, (Is_Empty => True));
28230   end Initialize_1808;
28231
28232   ---------------------
28233   -- Initialize_1809 --
28234   ---------------------
28235
28236   procedure Initialize_1809 is
28237   begin
28238      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
28239       (Base + 1809,
28240        AMF.Internals.Tables.UML_String_Data_06.MS_06B3'Access);
28241      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1809, (Is_Empty => True));
28242   end Initialize_1809;
28243
28244   ---------------------
28245   -- Initialize_1810 --
28246   ---------------------
28247
28248   procedure Initialize_1810 is
28249   begin
28250      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28251       (Base + 1810,
28252        AMF.Internals.Tables.UML_String_Data_0B.MS_0B95'Access);
28253   end Initialize_1810;
28254
28255   ---------------------
28256   -- Initialize_1811 --
28257   ---------------------
28258
28259   procedure Initialize_1811 is
28260   begin
28261      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1811, (Is_Empty => True));
28262   end Initialize_1811;
28263
28264   ---------------------
28265   -- Initialize_1812 --
28266   ---------------------
28267
28268   procedure Initialize_1812 is
28269   begin
28270      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28271       (Base + 1812,
28272        AMF.Internals.Tables.UML_String_Data_08.MS_08E3'Access);
28273   end Initialize_1812;
28274
28275   ---------------------
28276   -- Initialize_1813 --
28277   ---------------------
28278
28279   procedure Initialize_1813 is
28280   begin
28281      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28282       (Base + 1813,
28283        AMF.Internals.Tables.UML_String_Data_01.MS_015F'Access);
28284   end Initialize_1813;
28285
28286   ---------------------
28287   -- Initialize_1814 --
28288   ---------------------
28289
28290   procedure Initialize_1814 is
28291   begin
28292      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28293       (Base + 1814,
28294        AMF.Internals.Tables.UML_String_Data_07.MS_0703'Access);
28295   end Initialize_1814;
28296
28297   ---------------------
28298   -- Initialize_1815 --
28299   ---------------------
28300
28301   procedure Initialize_1815 is
28302   begin
28303      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
28304       (Base + 1815,
28305        AMF.Internals.Tables.UML_String_Data_00.MS_001B'Access);
28306      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1815, (Is_Empty => True));
28307   end Initialize_1815;
28308
28309   ---------------------
28310   -- Initialize_1816 --
28311   ---------------------
28312
28313   procedure Initialize_1816 is
28314   begin
28315      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28316       (Base + 1816,
28317        AMF.Internals.Tables.UML_String_Data_0A.MS_0A7D'Access);
28318   end Initialize_1816;
28319
28320   ---------------------
28321   -- Initialize_1817 --
28322   ---------------------
28323
28324   procedure Initialize_1817 is
28325   begin
28326      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1817, (Is_Empty => True));
28327   end Initialize_1817;
28328
28329   ---------------------
28330   -- Initialize_1818 --
28331   ---------------------
28332
28333   procedure Initialize_1818 is
28334   begin
28335      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
28336       (Base + 1818,
28337        AMF.Internals.Tables.UML_String_Data_0A.MS_0A96'Access);
28338      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1818, (Is_Empty => True));
28339   end Initialize_1818;
28340
28341   ---------------------
28342   -- Initialize_1819 --
28343   ---------------------
28344
28345   procedure Initialize_1819 is
28346   begin
28347      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28348       (Base + 1819,
28349        AMF.Internals.Tables.UML_String_Data_04.MS_04D8'Access);
28350   end Initialize_1819;
28351
28352   ---------------------
28353   -- Initialize_1820 --
28354   ---------------------
28355
28356   procedure Initialize_1820 is
28357   begin
28358      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1820, (Is_Empty => True));
28359   end Initialize_1820;
28360
28361   ---------------------
28362   -- Initialize_1821 --
28363   ---------------------
28364
28365   procedure Initialize_1821 is
28366   begin
28367      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28368       (Base + 1821,
28369        AMF.Internals.Tables.UML_String_Data_02.MS_02E7'Access);
28370   end Initialize_1821;
28371
28372   ---------------------
28373   -- Initialize_1822 --
28374   ---------------------
28375
28376   procedure Initialize_1822 is
28377   begin
28378      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28379       (Base + 1822,
28380        AMF.Internals.Tables.UML_String_Data_05.MS_0569'Access);
28381   end Initialize_1822;
28382
28383   ---------------------
28384   -- Initialize_1823 --
28385   ---------------------
28386
28387   procedure Initialize_1823 is
28388   begin
28389      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28390       (Base + 1823,
28391        AMF.Internals.Tables.UML_String_Data_0C.MS_0C63'Access);
28392   end Initialize_1823;
28393
28394   ---------------------
28395   -- Initialize_1824 --
28396   ---------------------
28397
28398   procedure Initialize_1824 is
28399   begin
28400      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28401       (Base + 1824,
28402        AMF.Internals.Tables.UML_String_Data_05.MS_059B'Access);
28403   end Initialize_1824;
28404
28405   ---------------------
28406   -- Initialize_1825 --
28407   ---------------------
28408
28409   procedure Initialize_1825 is
28410   begin
28411      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28412       (Base + 1825,
28413        AMF.Internals.Tables.UML_String_Data_02.MS_020D'Access);
28414   end Initialize_1825;
28415
28416   ---------------------
28417   -- Initialize_1826 --
28418   ---------------------
28419
28420   procedure Initialize_1826 is
28421   begin
28422      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28423       (Base + 1826,
28424        AMF.Internals.Tables.UML_String_Data_01.MS_011A'Access);
28425   end Initialize_1826;
28426
28427   ---------------------
28428   -- Initialize_1827 --
28429   ---------------------
28430
28431   procedure Initialize_1827 is
28432   begin
28433      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28434       (Base + 1827,
28435        AMF.Internals.Tables.UML_String_Data_0B.MS_0B93'Access);
28436   end Initialize_1827;
28437
28438   ---------------------
28439   -- Initialize_1828 --
28440   ---------------------
28441
28442   procedure Initialize_1828 is
28443   begin
28444      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28445       (Base + 1828,
28446        AMF.Internals.Tables.UML_String_Data_03.MS_032E'Access);
28447   end Initialize_1828;
28448
28449   ---------------------
28450   -- Initialize_1829 --
28451   ---------------------
28452
28453   procedure Initialize_1829 is
28454   begin
28455      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28456       (Base + 1829,
28457        AMF.Internals.Tables.UML_String_Data_05.MS_05D4'Access);
28458   end Initialize_1829;
28459
28460   ---------------------
28461   -- Initialize_1830 --
28462   ---------------------
28463
28464   procedure Initialize_1830 is
28465   begin
28466      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28467       (Base + 1830,
28468        AMF.Internals.Tables.UML_String_Data_08.MS_080C'Access);
28469   end Initialize_1830;
28470
28471   ---------------------
28472   -- Initialize_1831 --
28473   ---------------------
28474
28475   procedure Initialize_1831 is
28476   begin
28477      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28478       (Base + 1831,
28479        AMF.Internals.Tables.UML_String_Data_02.MS_02B1'Access);
28480   end Initialize_1831;
28481
28482   ---------------------
28483   -- Initialize_1832 --
28484   ---------------------
28485
28486   procedure Initialize_1832 is
28487   begin
28488      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28489       (Base + 1832,
28490        AMF.Internals.Tables.UML_String_Data_0A.MS_0A98'Access);
28491   end Initialize_1832;
28492
28493   ---------------------
28494   -- Initialize_1833 --
28495   ---------------------
28496
28497   procedure Initialize_1833 is
28498   begin
28499      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
28500       (Base + 1833,
28501        AMF.Internals.Tables.UML_String_Data_04.MS_0413'Access);
28502      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1833, (Is_Empty => True));
28503   end Initialize_1833;
28504
28505   ---------------------
28506   -- Initialize_1834 --
28507   ---------------------
28508
28509   procedure Initialize_1834 is
28510   begin
28511      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28512       (Base + 1834,
28513        AMF.Internals.Tables.UML_String_Data_06.MS_0671'Access);
28514   end Initialize_1834;
28515
28516   ---------------------
28517   -- Initialize_1835 --
28518   ---------------------
28519
28520   procedure Initialize_1835 is
28521   begin
28522      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1835, (Is_Empty => True));
28523   end Initialize_1835;
28524
28525   ---------------------
28526   -- Initialize_1836 --
28527   ---------------------
28528
28529   procedure Initialize_1836 is
28530   begin
28531      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
28532       (Base + 1836,
28533        AMF.Internals.Tables.UML_String_Data_0A.MS_0AF5'Access);
28534      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1836, (Is_Empty => True));
28535   end Initialize_1836;
28536
28537   ---------------------
28538   -- Initialize_1837 --
28539   ---------------------
28540
28541   procedure Initialize_1837 is
28542   begin
28543      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28544       (Base + 1837,
28545        AMF.Internals.Tables.UML_String_Data_03.MS_0383'Access);
28546   end Initialize_1837;
28547
28548   ---------------------
28549   -- Initialize_1838 --
28550   ---------------------
28551
28552   procedure Initialize_1838 is
28553   begin
28554      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1838, (Is_Empty => True));
28555   end Initialize_1838;
28556
28557   ---------------------
28558   -- Initialize_1839 --
28559   ---------------------
28560
28561   procedure Initialize_1839 is
28562   begin
28563      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
28564       (Base + 1839,
28565        AMF.Internals.Tables.UML_String_Data_04.MS_0404'Access);
28566      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1839, (Is_Empty => True));
28567   end Initialize_1839;
28568
28569   ---------------------
28570   -- Initialize_1840 --
28571   ---------------------
28572
28573   procedure Initialize_1840 is
28574   begin
28575      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28576       (Base + 1840,
28577        AMF.Internals.Tables.UML_String_Data_05.MS_05C4'Access);
28578   end Initialize_1840;
28579
28580   ---------------------
28581   -- Initialize_1841 --
28582   ---------------------
28583
28584   procedure Initialize_1841 is
28585   begin
28586      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1841, (Is_Empty => True));
28587   end Initialize_1841;
28588
28589   ---------------------
28590   -- Initialize_1842 --
28591   ---------------------
28592
28593   procedure Initialize_1842 is
28594   begin
28595      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
28596       (Base + 1842,
28597        AMF.Internals.Tables.UML_String_Data_09.MS_09D1'Access);
28598      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1842, (Is_Empty => True));
28599   end Initialize_1842;
28600
28601   ---------------------
28602   -- Initialize_1843 --
28603   ---------------------
28604
28605   procedure Initialize_1843 is
28606   begin
28607      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28608       (Base + 1843,
28609        AMF.Internals.Tables.UML_String_Data_0B.MS_0B7C'Access);
28610   end Initialize_1843;
28611
28612   ---------------------
28613   -- Initialize_1844 --
28614   ---------------------
28615
28616   procedure Initialize_1844 is
28617   begin
28618      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1844, (Is_Empty => True));
28619   end Initialize_1844;
28620
28621   ---------------------
28622   -- Initialize_1845 --
28623   ---------------------
28624
28625   procedure Initialize_1845 is
28626   begin
28627      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28628       (Base + 1845,
28629        AMF.Internals.Tables.UML_String_Data_02.MS_0234'Access);
28630   end Initialize_1845;
28631
28632   ---------------------
28633   -- Initialize_1846 --
28634   ---------------------
28635
28636   procedure Initialize_1846 is
28637   begin
28638      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28639       (Base + 1846,
28640        AMF.Internals.Tables.UML_String_Data_0B.MS_0B41'Access);
28641   end Initialize_1846;
28642
28643   ---------------------
28644   -- Initialize_1847 --
28645   ---------------------
28646
28647   procedure Initialize_1847 is
28648   begin
28649      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28650       (Base + 1847,
28651        AMF.Internals.Tables.UML_String_Data_06.MS_06D1'Access);
28652   end Initialize_1847;
28653
28654   ---------------------
28655   -- Initialize_1848 --
28656   ---------------------
28657
28658   procedure Initialize_1848 is
28659   begin
28660      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28661       (Base + 1848,
28662        AMF.Internals.Tables.UML_String_Data_00.MS_006B'Access);
28663   end Initialize_1848;
28664
28665   ---------------------
28666   -- Initialize_1849 --
28667   ---------------------
28668
28669   procedure Initialize_1849 is
28670   begin
28671      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28672       (Base + 1849,
28673        AMF.Internals.Tables.UML_String_Data_05.MS_0588'Access);
28674   end Initialize_1849;
28675
28676   ---------------------
28677   -- Initialize_1850 --
28678   ---------------------
28679
28680   procedure Initialize_1850 is
28681   begin
28682      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 1850, True);
28683      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
28684       (Base + 1850,
28685        AMF.Internals.Tables.UML_String_Data_03.MS_03E7'Access);
28686      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1850, (False, AMF.CMOF.Public_Visibility));
28687   end Initialize_1850;
28688
28689   ---------------------
28690   -- Initialize_1851 --
28691   ---------------------
28692
28693   procedure Initialize_1851 is
28694   begin
28695      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28696       (Base + 1851,
28697        AMF.Internals.Tables.UML_String_Data_0B.MS_0B99'Access);
28698   end Initialize_1851;
28699
28700   ---------------------
28701   -- Initialize_1852 --
28702   ---------------------
28703
28704   procedure Initialize_1852 is
28705   begin
28706      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
28707       (Base + 1852,
28708        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
28709      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1852, (Is_Empty => True));
28710   end Initialize_1852;
28711
28712   ---------------------
28713   -- Initialize_1853 --
28714   ---------------------
28715
28716   procedure Initialize_1853 is
28717   begin
28718      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1853, (Is_Empty => True));
28719   end Initialize_1853;
28720
28721   ---------------------
28722   -- Initialize_1854 --
28723   ---------------------
28724
28725   procedure Initialize_1854 is
28726   begin
28727      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 1854, AMF.CMOF.Return_Parameter);
28728      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 1854, True);
28729      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1854, (False, 0));
28730      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
28731       (Base + 1854,
28732        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
28733      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1854, (False, (Unlimited => True)));
28734      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1854, (False, AMF.CMOF.Public_Visibility));
28735   end Initialize_1854;
28736
28737   ---------------------
28738   -- Initialize_1855 --
28739   ---------------------
28740
28741   procedure Initialize_1855 is
28742   begin
28743      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28744       (Base + 1855,
28745        AMF.Internals.Tables.UML_String_Data_01.MS_016D'Access);
28746   end Initialize_1855;
28747
28748   ---------------------
28749   -- Initialize_1856 --
28750   ---------------------
28751
28752   procedure Initialize_1856 is
28753   begin
28754      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
28755       (Base + 1856,
28756        AMF.Internals.Tables.UML_String_Data_08.MS_0825'Access);
28757      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1856, (Is_Empty => True));
28758   end Initialize_1856;
28759
28760   ---------------------
28761   -- Initialize_1857 --
28762   ---------------------
28763
28764   procedure Initialize_1857 is
28765   begin
28766      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28767       (Base + 1857,
28768        AMF.Internals.Tables.UML_String_Data_03.MS_0316'Access);
28769   end Initialize_1857;
28770
28771   ---------------------
28772   -- Initialize_1858 --
28773   ---------------------
28774
28775   procedure Initialize_1858 is
28776   begin
28777      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1858, (Is_Empty => True));
28778   end Initialize_1858;
28779
28780   ---------------------
28781   -- Initialize_1859 --
28782   ---------------------
28783
28784   procedure Initialize_1859 is
28785   begin
28786      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
28787       (Base + 1859,
28788        AMF.Internals.Tables.UML_String_Data_05.MS_054F'Access);
28789      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1859, (Is_Empty => True));
28790   end Initialize_1859;
28791
28792   ---------------------
28793   -- Initialize_1860 --
28794   ---------------------
28795
28796   procedure Initialize_1860 is
28797   begin
28798      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28799       (Base + 1860,
28800        AMF.Internals.Tables.UML_String_Data_09.MS_09A7'Access);
28801   end Initialize_1860;
28802
28803   ---------------------
28804   -- Initialize_1861 --
28805   ---------------------
28806
28807   procedure Initialize_1861 is
28808   begin
28809      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1861, (Is_Empty => True));
28810   end Initialize_1861;
28811
28812   ---------------------
28813   -- Initialize_1862 --
28814   ---------------------
28815
28816   procedure Initialize_1862 is
28817   begin
28818      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28819       (Base + 1862,
28820        AMF.Internals.Tables.UML_String_Data_0B.MS_0BEE'Access);
28821   end Initialize_1862;
28822
28823   ---------------------
28824   -- Initialize_1863 --
28825   ---------------------
28826
28827   procedure Initialize_1863 is
28828   begin
28829      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28830       (Base + 1863,
28831        AMF.Internals.Tables.UML_String_Data_0A.MS_0AAC'Access);
28832   end Initialize_1863;
28833
28834   ---------------------
28835   -- Initialize_1864 --
28836   ---------------------
28837
28838   procedure Initialize_1864 is
28839   begin
28840      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
28841       (Base + 1864,
28842        AMF.Internals.Tables.UML_String_Data_00.MS_0002'Access);
28843      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1864, (Is_Empty => True));
28844   end Initialize_1864;
28845
28846   ---------------------
28847   -- Initialize_1865 --
28848   ---------------------
28849
28850   procedure Initialize_1865 is
28851   begin
28852      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28853       (Base + 1865,
28854        AMF.Internals.Tables.UML_String_Data_0B.MS_0B56'Access);
28855   end Initialize_1865;
28856
28857   ---------------------
28858   -- Initialize_1866 --
28859   ---------------------
28860
28861   procedure Initialize_1866 is
28862   begin
28863      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1866, (Is_Empty => True));
28864   end Initialize_1866;
28865
28866   ---------------------
28867   -- Initialize_1867 --
28868   ---------------------
28869
28870   procedure Initialize_1867 is
28871   begin
28872      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
28873       (Base + 1867,
28874        AMF.Internals.Tables.UML_String_Data_04.MS_0424'Access);
28875      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1867, (Is_Empty => True));
28876   end Initialize_1867;
28877
28878   ---------------------
28879   -- Initialize_1868 --
28880   ---------------------
28881
28882   procedure Initialize_1868 is
28883   begin
28884      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28885       (Base + 1868,
28886        AMF.Internals.Tables.UML_String_Data_00.MS_009F'Access);
28887   end Initialize_1868;
28888
28889   ---------------------
28890   -- Initialize_1869 --
28891   ---------------------
28892
28893   procedure Initialize_1869 is
28894   begin
28895      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1869, (Is_Empty => True));
28896   end Initialize_1869;
28897
28898   ---------------------
28899   -- Initialize_1870 --
28900   ---------------------
28901
28902   procedure Initialize_1870 is
28903   begin
28904      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
28905       (Base + 1870,
28906        AMF.Internals.Tables.UML_String_Data_05.MS_05B8'Access);
28907      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1870, (Is_Empty => True));
28908   end Initialize_1870;
28909
28910   ---------------------
28911   -- Initialize_1871 --
28912   ---------------------
28913
28914   procedure Initialize_1871 is
28915   begin
28916      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28917       (Base + 1871,
28918        AMF.Internals.Tables.UML_String_Data_09.MS_0910'Access);
28919   end Initialize_1871;
28920
28921   ---------------------
28922   -- Initialize_1872 --
28923   ---------------------
28924
28925   procedure Initialize_1872 is
28926   begin
28927      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1872, (Is_Empty => True));
28928   end Initialize_1872;
28929
28930   ---------------------
28931   -- Initialize_1873 --
28932   ---------------------
28933
28934   procedure Initialize_1873 is
28935   begin
28936      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
28937       (Base + 1873,
28938        AMF.Internals.Tables.UML_String_Data_09.MS_0990'Access);
28939      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1873, (Is_Empty => True));
28940   end Initialize_1873;
28941
28942   ---------------------
28943   -- Initialize_1874 --
28944   ---------------------
28945
28946   procedure Initialize_1874 is
28947   begin
28948      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28949       (Base + 1874,
28950        AMF.Internals.Tables.UML_String_Data_0B.MS_0B5F'Access);
28951   end Initialize_1874;
28952
28953   ---------------------
28954   -- Initialize_1875 --
28955   ---------------------
28956
28957   procedure Initialize_1875 is
28958   begin
28959      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1875, (Is_Empty => True));
28960   end Initialize_1875;
28961
28962   ---------------------
28963   -- Initialize_1876 --
28964   ---------------------
28965
28966   procedure Initialize_1876 is
28967   begin
28968      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28969       (Base + 1876,
28970        AMF.Internals.Tables.UML_String_Data_0C.MS_0C35'Access);
28971   end Initialize_1876;
28972
28973   ---------------------
28974   -- Initialize_1877 --
28975   ---------------------
28976
28977   procedure Initialize_1877 is
28978   begin
28979      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28980       (Base + 1877,
28981        AMF.Internals.Tables.UML_String_Data_02.MS_027F'Access);
28982   end Initialize_1877;
28983
28984   ---------------------
28985   -- Initialize_1878 --
28986   ---------------------
28987
28988   procedure Initialize_1878 is
28989   begin
28990      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
28991       (Base + 1878,
28992        AMF.Internals.Tables.UML_String_Data_0C.MS_0C6A'Access);
28993   end Initialize_1878;
28994
28995   ---------------------
28996   -- Initialize_1879 --
28997   ---------------------
28998
28999   procedure Initialize_1879 is
29000   begin
29001      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29002       (Base + 1879,
29003        AMF.Internals.Tables.UML_String_Data_07.MS_076D'Access);
29004   end Initialize_1879;
29005
29006   ---------------------
29007   -- Initialize_1880 --
29008   ---------------------
29009
29010   procedure Initialize_1880 is
29011   begin
29012      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29013       (Base + 1880,
29014        AMF.Internals.Tables.UML_String_Data_09.MS_0978'Access);
29015   end Initialize_1880;
29016
29017   ---------------------
29018   -- Initialize_1881 --
29019   ---------------------
29020
29021   procedure Initialize_1881 is
29022   begin
29023      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29024       (Base + 1881,
29025        AMF.Internals.Tables.UML_String_Data_08.MS_0817'Access);
29026   end Initialize_1881;
29027
29028   ---------------------
29029   -- Initialize_1882 --
29030   ---------------------
29031
29032   procedure Initialize_1882 is
29033   begin
29034      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29035       (Base + 1882,
29036        AMF.Internals.Tables.UML_String_Data_07.MS_079F'Access);
29037   end Initialize_1882;
29038
29039   ---------------------
29040   -- Initialize_1883 --
29041   ---------------------
29042
29043   procedure Initialize_1883 is
29044   begin
29045      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29046       (Base + 1883,
29047        AMF.Internals.Tables.UML_String_Data_07.MS_07D0'Access);
29048   end Initialize_1883;
29049
29050   ---------------------
29051   -- Initialize_1884 --
29052   ---------------------
29053
29054   procedure Initialize_1884 is
29055   begin
29056      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 1884, True);
29057      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
29058       (Base + 1884,
29059        AMF.Internals.Tables.UML_String_Data_03.MS_03DB'Access);
29060      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1884, (False, AMF.CMOF.Public_Visibility));
29061   end Initialize_1884;
29062
29063   ---------------------
29064   -- Initialize_1885 --
29065   ---------------------
29066
29067   procedure Initialize_1885 is
29068   begin
29069      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29070       (Base + 1885,
29071        AMF.Internals.Tables.UML_String_Data_0A.MS_0A12'Access);
29072   end Initialize_1885;
29073
29074   ---------------------
29075   -- Initialize_1886 --
29076   ---------------------
29077
29078   procedure Initialize_1886 is
29079   begin
29080      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
29081       (Base + 1886,
29082        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
29083      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1886, (Is_Empty => True));
29084   end Initialize_1886;
29085
29086   ---------------------
29087   -- Initialize_1887 --
29088   ---------------------
29089
29090   procedure Initialize_1887 is
29091   begin
29092      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1887, (Is_Empty => True));
29093   end Initialize_1887;
29094
29095   ---------------------
29096   -- Initialize_1888 --
29097   ---------------------
29098
29099   procedure Initialize_1888 is
29100   begin
29101      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 1888, AMF.CMOF.Return_Parameter);
29102      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1888, (False, 0));
29103      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
29104       (Base + 1888,
29105        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
29106      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1888, (False, AMF.CMOF.Public_Visibility));
29107   end Initialize_1888;
29108
29109   ---------------------
29110   -- Initialize_1889 --
29111   ---------------------
29112
29113   procedure Initialize_1889 is
29114   begin
29115      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29116       (Base + 1889,
29117        AMF.Internals.Tables.UML_String_Data_06.MS_06F7'Access);
29118   end Initialize_1889;
29119
29120   ---------------------
29121   -- Initialize_1890 --
29122   ---------------------
29123
29124   procedure Initialize_1890 is
29125   begin
29126      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29127       (Base + 1890,
29128        AMF.Internals.Tables.UML_String_Data_08.MS_08A5'Access);
29129   end Initialize_1890;
29130
29131   ---------------------
29132   -- Initialize_1891 --
29133   ---------------------
29134
29135   procedure Initialize_1891 is
29136   begin
29137      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29138       (Base + 1891,
29139        AMF.Internals.Tables.UML_String_Data_00.MS_007E'Access);
29140   end Initialize_1891;
29141
29142   ---------------------
29143   -- Initialize_1892 --
29144   ---------------------
29145
29146   procedure Initialize_1892 is
29147   begin
29148      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29149       (Base + 1892,
29150        AMF.Internals.Tables.UML_String_Data_08.MS_088F'Access);
29151   end Initialize_1892;
29152
29153   ---------------------
29154   -- Initialize_1893 --
29155   ---------------------
29156
29157   procedure Initialize_1893 is
29158   begin
29159      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29160       (Base + 1893,
29161        AMF.Internals.Tables.UML_String_Data_05.MS_0593'Access);
29162   end Initialize_1893;
29163
29164   ---------------------
29165   -- Initialize_1894 --
29166   ---------------------
29167
29168   procedure Initialize_1894 is
29169   begin
29170      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29171       (Base + 1894,
29172        AMF.Internals.Tables.UML_String_Data_03.MS_033B'Access);
29173   end Initialize_1894;
29174
29175   ---------------------
29176   -- Initialize_1895 --
29177   ---------------------
29178
29179   procedure Initialize_1895 is
29180   begin
29181      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29182       (Base + 1895,
29183        AMF.Internals.Tables.UML_String_Data_00.MS_0012'Access);
29184   end Initialize_1895;
29185
29186   ---------------------
29187   -- Initialize_1896 --
29188   ---------------------
29189
29190   procedure Initialize_1896 is
29191   begin
29192      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29193       (Base + 1896,
29194        AMF.Internals.Tables.UML_String_Data_06.MS_06C4'Access);
29195   end Initialize_1896;
29196
29197   ---------------------
29198   -- Initialize_1897 --
29199   ---------------------
29200
29201   procedure Initialize_1897 is
29202   begin
29203      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29204       (Base + 1897,
29205        AMF.Internals.Tables.UML_String_Data_07.MS_0742'Access);
29206   end Initialize_1897;
29207
29208   ---------------------
29209   -- Initialize_1898 --
29210   ---------------------
29211
29212   procedure Initialize_1898 is
29213   begin
29214      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29215       (Base + 1898,
29216        AMF.Internals.Tables.UML_String_Data_02.MS_0214'Access);
29217   end Initialize_1898;
29218
29219   ---------------------
29220   -- Initialize_1899 --
29221   ---------------------
29222
29223   procedure Initialize_1899 is
29224   begin
29225      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29226       (Base + 1899,
29227        AMF.Internals.Tables.UML_String_Data_00.MS_00C9'Access);
29228   end Initialize_1899;
29229
29230   ---------------------
29231   -- Initialize_1900 --
29232   ---------------------
29233
29234   procedure Initialize_1900 is
29235   begin
29236      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 1900, True);
29237      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
29238       (Base + 1900,
29239        AMF.Internals.Tables.UML_String_Data_04.MS_0400'Access);
29240      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1900, (False, AMF.CMOF.Public_Visibility));
29241   end Initialize_1900;
29242
29243   ---------------------
29244   -- Initialize_1901 --
29245   ---------------------
29246
29247   procedure Initialize_1901 is
29248   begin
29249      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29250       (Base + 1901,
29251        AMF.Internals.Tables.UML_String_Data_0C.MS_0C2A'Access);
29252   end Initialize_1901;
29253
29254   ---------------------
29255   -- Initialize_1902 --
29256   ---------------------
29257
29258   procedure Initialize_1902 is
29259   begin
29260      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
29261       (Base + 1902,
29262        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
29263      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1902, (Is_Empty => True));
29264   end Initialize_1902;
29265
29266   ---------------------
29267   -- Initialize_1903 --
29268   ---------------------
29269
29270   procedure Initialize_1903 is
29271   begin
29272      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1903, (Is_Empty => True));
29273   end Initialize_1903;
29274
29275   ---------------------
29276   -- Initialize_1904 --
29277   ---------------------
29278
29279   procedure Initialize_1904 is
29280   begin
29281      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 1904, AMF.CMOF.Return_Parameter);
29282      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
29283       (Base + 1904,
29284        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
29285      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1904, (False, AMF.CMOF.Public_Visibility));
29286   end Initialize_1904;
29287
29288   ---------------------
29289   -- Initialize_1905 --
29290   ---------------------
29291
29292   procedure Initialize_1905 is
29293   begin
29294      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 1905, AMF.CMOF.In_Parameter);
29295      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
29296       (Base + 1905,
29297        AMF.Internals.Tables.UML_String_Data_0B.MS_0BA8'Access);
29298      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1905, (False, AMF.CMOF.Public_Visibility));
29299   end Initialize_1905;
29300
29301   ---------------------
29302   -- Initialize_1906 --
29303   ---------------------
29304
29305   procedure Initialize_1906 is
29306   begin
29307      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 1906, AMF.CMOF.In_Parameter);
29308      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
29309       (Base + 1906,
29310        AMF.Internals.Tables.UML_String_Data_02.MS_0242'Access);
29311      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1906, (False, AMF.CMOF.Public_Visibility));
29312   end Initialize_1906;
29313
29314   ---------------------
29315   -- Initialize_1907 --
29316   ---------------------
29317
29318   procedure Initialize_1907 is
29319   begin
29320      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29321       (Base + 1907,
29322        AMF.Internals.Tables.UML_String_Data_00.MS_00FC'Access);
29323   end Initialize_1907;
29324
29325   ---------------------
29326   -- Initialize_1908 --
29327   ---------------------
29328
29329   procedure Initialize_1908 is
29330   begin
29331      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29332       (Base + 1908,
29333        AMF.Internals.Tables.UML_String_Data_04.MS_048B'Access);
29334   end Initialize_1908;
29335
29336   ---------------------
29337   -- Initialize_1909 --
29338   ---------------------
29339
29340   procedure Initialize_1909 is
29341   begin
29342      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
29343       (Base + 1909,
29344        AMF.Internals.Tables.UML_String_Data_0A.MS_0AE1'Access);
29345      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1909, (Is_Empty => True));
29346   end Initialize_1909;
29347
29348   ---------------------
29349   -- Initialize_1910 --
29350   ---------------------
29351
29352   procedure Initialize_1910 is
29353   begin
29354      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29355       (Base + 1910,
29356        AMF.Internals.Tables.UML_String_Data_00.MS_0093'Access);
29357   end Initialize_1910;
29358
29359   ---------------------
29360   -- Initialize_1911 --
29361   ---------------------
29362
29363   procedure Initialize_1911 is
29364   begin
29365      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1911, (Is_Empty => True));
29366   end Initialize_1911;
29367
29368   ---------------------
29369   -- Initialize_1912 --
29370   ---------------------
29371
29372   procedure Initialize_1912 is
29373   begin
29374      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29375       (Base + 1912,
29376        AMF.Internals.Tables.UML_String_Data_00.MS_00C6'Access);
29377   end Initialize_1912;
29378
29379   ---------------------
29380   -- Initialize_1913 --
29381   ---------------------
29382
29383   procedure Initialize_1913 is
29384   begin
29385      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29386       (Base + 1913,
29387        AMF.Internals.Tables.UML_String_Data_06.MS_06F9'Access);
29388   end Initialize_1913;
29389
29390   ---------------------
29391   -- Initialize_1914 --
29392   ---------------------
29393
29394   procedure Initialize_1914 is
29395   begin
29396      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29397       (Base + 1914,
29398        AMF.Internals.Tables.UML_String_Data_03.MS_0301'Access);
29399   end Initialize_1914;
29400
29401   ---------------------
29402   -- Initialize_1915 --
29403   ---------------------
29404
29405   procedure Initialize_1915 is
29406   begin
29407      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29408       (Base + 1915,
29409        AMF.Internals.Tables.UML_String_Data_09.MS_0959'Access);
29410   end Initialize_1915;
29411
29412   ---------------------
29413   -- Initialize_1916 --
29414   ---------------------
29415
29416   procedure Initialize_1916 is
29417   begin
29418      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
29419       (Base + 1916,
29420        AMF.Internals.Tables.UML_String_Data_07.MS_0784'Access);
29421      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1916, (Is_Empty => True));
29422   end Initialize_1916;
29423
29424   ---------------------
29425   -- Initialize_1917 --
29426   ---------------------
29427
29428   procedure Initialize_1917 is
29429   begin
29430      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29431       (Base + 1917,
29432        AMF.Internals.Tables.UML_String_Data_0A.MS_0A5C'Access);
29433   end Initialize_1917;
29434
29435   ---------------------
29436   -- Initialize_1918 --
29437   ---------------------
29438
29439   procedure Initialize_1918 is
29440   begin
29441      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1918, (Is_Empty => True));
29442   end Initialize_1918;
29443
29444   ---------------------
29445   -- Initialize_1919 --
29446   ---------------------
29447
29448   procedure Initialize_1919 is
29449   begin
29450      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
29451       (Base + 1919,
29452        AMF.Internals.Tables.UML_String_Data_06.MS_0604'Access);
29453      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1919, (Is_Empty => True));
29454   end Initialize_1919;
29455
29456   ---------------------
29457   -- Initialize_1920 --
29458   ---------------------
29459
29460   procedure Initialize_1920 is
29461   begin
29462      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29463       (Base + 1920,
29464        AMF.Internals.Tables.UML_String_Data_01.MS_01B7'Access);
29465   end Initialize_1920;
29466
29467   ---------------------
29468   -- Initialize_1921 --
29469   ---------------------
29470
29471   procedure Initialize_1921 is
29472   begin
29473      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1921, (Is_Empty => True));
29474   end Initialize_1921;
29475
29476   ---------------------
29477   -- Initialize_1922 --
29478   ---------------------
29479
29480   procedure Initialize_1922 is
29481   begin
29482      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29483       (Base + 1922,
29484        AMF.Internals.Tables.UML_String_Data_09.MS_0968'Access);
29485   end Initialize_1922;
29486
29487   ---------------------
29488   -- Initialize_1923 --
29489   ---------------------
29490
29491   procedure Initialize_1923 is
29492   begin
29493      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29494       (Base + 1923,
29495        AMF.Internals.Tables.UML_String_Data_09.MS_095D'Access);
29496   end Initialize_1923;
29497
29498   ---------------------
29499   -- Initialize_1924 --
29500   ---------------------
29501
29502   procedure Initialize_1924 is
29503   begin
29504      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
29505       (Base + 1924,
29506        AMF.Internals.Tables.UML_String_Data_06.MS_0604'Access);
29507      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1924, (Is_Empty => True));
29508   end Initialize_1924;
29509
29510   ---------------------
29511   -- Initialize_1925 --
29512   ---------------------
29513
29514   procedure Initialize_1925 is
29515   begin
29516      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29517       (Base + 1925,
29518        AMF.Internals.Tables.UML_String_Data_09.MS_0992'Access);
29519   end Initialize_1925;
29520
29521   ---------------------
29522   -- Initialize_1926 --
29523   ---------------------
29524
29525   procedure Initialize_1926 is
29526   begin
29527      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1926, (Is_Empty => True));
29528   end Initialize_1926;
29529
29530   ---------------------
29531   -- Initialize_1927 --
29532   ---------------------
29533
29534   procedure Initialize_1927 is
29535   begin
29536      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
29537       (Base + 1927,
29538        AMF.Internals.Tables.UML_String_Data_07.MS_0784'Access);
29539      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1927, (Is_Empty => True));
29540   end Initialize_1927;
29541
29542   ---------------------
29543   -- Initialize_1928 --
29544   ---------------------
29545
29546   procedure Initialize_1928 is
29547   begin
29548      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29549       (Base + 1928,
29550        AMF.Internals.Tables.UML_String_Data_00.MS_00EF'Access);
29551   end Initialize_1928;
29552
29553   ---------------------
29554   -- Initialize_1929 --
29555   ---------------------
29556
29557   procedure Initialize_1929 is
29558   begin
29559      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1929, (Is_Empty => True));
29560   end Initialize_1929;
29561
29562   ---------------------
29563   -- Initialize_1930 --
29564   ---------------------
29565
29566   procedure Initialize_1930 is
29567   begin
29568      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
29569       (Base + 1930,
29570        AMF.Internals.Tables.UML_String_Data_07.MS_07AE'Access);
29571      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1930, (Is_Empty => True));
29572   end Initialize_1930;
29573
29574   ---------------------
29575   -- Initialize_1931 --
29576   ---------------------
29577
29578   procedure Initialize_1931 is
29579   begin
29580      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29581       (Base + 1931,
29582        AMF.Internals.Tables.UML_String_Data_08.MS_08A7'Access);
29583   end Initialize_1931;
29584
29585   ---------------------
29586   -- Initialize_1932 --
29587   ---------------------
29588
29589   procedure Initialize_1932 is
29590   begin
29591      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1932, (Is_Empty => True));
29592   end Initialize_1932;
29593
29594   ---------------------
29595   -- Initialize_1933 --
29596   ---------------------
29597
29598   procedure Initialize_1933 is
29599   begin
29600      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29601       (Base + 1933,
29602        AMF.Internals.Tables.UML_String_Data_0B.MS_0BDF'Access);
29603   end Initialize_1933;
29604
29605   ---------------------
29606   -- Initialize_1934 --
29607   ---------------------
29608
29609   procedure Initialize_1934 is
29610   begin
29611      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29612       (Base + 1934,
29613        AMF.Internals.Tables.UML_String_Data_0B.MS_0B2A'Access);
29614   end Initialize_1934;
29615
29616   ---------------------
29617   -- Initialize_1935 --
29618   ---------------------
29619
29620   procedure Initialize_1935 is
29621   begin
29622      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29623       (Base + 1935,
29624        AMF.Internals.Tables.UML_String_Data_02.MS_025A'Access);
29625   end Initialize_1935;
29626
29627   ---------------------
29628   -- Initialize_1936 --
29629   ---------------------
29630
29631   procedure Initialize_1936 is
29632   begin
29633      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
29634       (Base + 1936,
29635        AMF.Internals.Tables.UML_String_Data_09.MS_09B2'Access);
29636      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1936, (Is_Empty => True));
29637   end Initialize_1936;
29638
29639   ---------------------
29640   -- Initialize_1937 --
29641   ---------------------
29642
29643   procedure Initialize_1937 is
29644   begin
29645      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29646       (Base + 1937,
29647        AMF.Internals.Tables.UML_String_Data_09.MS_0999'Access);
29648   end Initialize_1937;
29649
29650   ---------------------
29651   -- Initialize_1938 --
29652   ---------------------
29653
29654   procedure Initialize_1938 is
29655   begin
29656      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1938, (Is_Empty => True));
29657   end Initialize_1938;
29658
29659   ---------------------
29660   -- Initialize_1939 --
29661   ---------------------
29662
29663   procedure Initialize_1939 is
29664   begin
29665      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
29666       (Base + 1939,
29667        AMF.Internals.Tables.UML_String_Data_06.MS_0604'Access);
29668      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1939, (Is_Empty => True));
29669   end Initialize_1939;
29670
29671   ---------------------
29672   -- Initialize_1940 --
29673   ---------------------
29674
29675   procedure Initialize_1940 is
29676   begin
29677      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29678       (Base + 1940,
29679        AMF.Internals.Tables.UML_String_Data_0B.MS_0B7F'Access);
29680   end Initialize_1940;
29681
29682   ---------------------
29683   -- Initialize_1941 --
29684   ---------------------
29685
29686   procedure Initialize_1941 is
29687   begin
29688      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1941, (Is_Empty => True));
29689   end Initialize_1941;
29690
29691   ---------------------
29692   -- Initialize_1942 --
29693   ---------------------
29694
29695   procedure Initialize_1942 is
29696   begin
29697      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
29698       (Base + 1942,
29699        AMF.Internals.Tables.UML_String_Data_04.MS_0416'Access);
29700      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1942, (Is_Empty => True));
29701   end Initialize_1942;
29702
29703   ---------------------
29704   -- Initialize_1943 --
29705   ---------------------
29706
29707   procedure Initialize_1943 is
29708   begin
29709      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29710       (Base + 1943,
29711        AMF.Internals.Tables.UML_String_Data_0C.MS_0C54'Access);
29712   end Initialize_1943;
29713
29714   ---------------------
29715   -- Initialize_1944 --
29716   ---------------------
29717
29718   procedure Initialize_1944 is
29719   begin
29720      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1944, (Is_Empty => True));
29721   end Initialize_1944;
29722
29723   ---------------------
29724   -- Initialize_1945 --
29725   ---------------------
29726
29727   procedure Initialize_1945 is
29728   begin
29729      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29730       (Base + 1945,
29731        AMF.Internals.Tables.UML_String_Data_0C.MS_0C9A'Access);
29732   end Initialize_1945;
29733
29734   ---------------------
29735   -- Initialize_1946 --
29736   ---------------------
29737
29738   procedure Initialize_1946 is
29739   begin
29740      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29741       (Base + 1946,
29742        AMF.Internals.Tables.UML_String_Data_07.MS_0720'Access);
29743   end Initialize_1946;
29744
29745   ---------------------
29746   -- Initialize_1947 --
29747   ---------------------
29748
29749   procedure Initialize_1947 is
29750   begin
29751      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29752       (Base + 1947,
29753        AMF.Internals.Tables.UML_String_Data_00.MS_009D'Access);
29754   end Initialize_1947;
29755
29756   ---------------------
29757   -- Initialize_1948 --
29758   ---------------------
29759
29760   procedure Initialize_1948 is
29761   begin
29762      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29763       (Base + 1948,
29764        AMF.Internals.Tables.UML_String_Data_0A.MS_0AA9'Access);
29765   end Initialize_1948;
29766
29767   ---------------------
29768   -- Initialize_1949 --
29769   ---------------------
29770
29771   procedure Initialize_1949 is
29772   begin
29773      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
29774       (Base + 1949,
29775        AMF.Internals.Tables.UML_String_Data_06.MS_0604'Access);
29776      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1949, (Is_Empty => True));
29777   end Initialize_1949;
29778
29779   ---------------------
29780   -- Initialize_1950 --
29781   ---------------------
29782
29783   procedure Initialize_1950 is
29784   begin
29785      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29786       (Base + 1950,
29787        AMF.Internals.Tables.UML_String_Data_03.MS_0396'Access);
29788   end Initialize_1950;
29789
29790   ---------------------
29791   -- Initialize_1951 --
29792   ---------------------
29793
29794   procedure Initialize_1951 is
29795   begin
29796      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1951, (Is_Empty => True));
29797   end Initialize_1951;
29798
29799   ---------------------
29800   -- Initialize_1952 --
29801   ---------------------
29802
29803   procedure Initialize_1952 is
29804   begin
29805      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
29806       (Base + 1952,
29807        AMF.Internals.Tables.UML_String_Data_02.MS_021E'Access);
29808      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1952, (Is_Empty => True));
29809   end Initialize_1952;
29810
29811   ---------------------
29812   -- Initialize_1953 --
29813   ---------------------
29814
29815   procedure Initialize_1953 is
29816   begin
29817      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29818       (Base + 1953,
29819        AMF.Internals.Tables.UML_String_Data_03.MS_0335'Access);
29820   end Initialize_1953;
29821
29822   ---------------------
29823   -- Initialize_1954 --
29824   ---------------------
29825
29826   procedure Initialize_1954 is
29827   begin
29828      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1954, (Is_Empty => True));
29829   end Initialize_1954;
29830
29831   ---------------------
29832   -- Initialize_1955 --
29833   ---------------------
29834
29835   procedure Initialize_1955 is
29836   begin
29837      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
29838       (Base + 1955,
29839        AMF.Internals.Tables.UML_String_Data_04.MS_0416'Access);
29840      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1955, (Is_Empty => True));
29841   end Initialize_1955;
29842
29843   ---------------------
29844   -- Initialize_1956 --
29845   ---------------------
29846
29847   procedure Initialize_1956 is
29848   begin
29849      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29850       (Base + 1956,
29851        AMF.Internals.Tables.UML_String_Data_03.MS_037B'Access);
29852   end Initialize_1956;
29853
29854   ---------------------
29855   -- Initialize_1957 --
29856   ---------------------
29857
29858   procedure Initialize_1957 is
29859   begin
29860      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1957, (Is_Empty => True));
29861   end Initialize_1957;
29862
29863   ---------------------
29864   -- Initialize_1958 --
29865   ---------------------
29866
29867   procedure Initialize_1958 is
29868   begin
29869      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
29870       (Base + 1958,
29871        AMF.Internals.Tables.UML_String_Data_09.MS_09B2'Access);
29872      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1958, (Is_Empty => True));
29873   end Initialize_1958;
29874
29875   ---------------------
29876   -- Initialize_1959 --
29877   ---------------------
29878
29879   procedure Initialize_1959 is
29880   begin
29881      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29882       (Base + 1959,
29883        AMF.Internals.Tables.UML_String_Data_03.MS_0356'Access);
29884   end Initialize_1959;
29885
29886   ---------------------
29887   -- Initialize_1960 --
29888   ---------------------
29889
29890   procedure Initialize_1960 is
29891   begin
29892      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1960, (Is_Empty => True));
29893   end Initialize_1960;
29894
29895   ---------------------
29896   -- Initialize_1961 --
29897   ---------------------
29898
29899   procedure Initialize_1961 is
29900   begin
29901      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29902       (Base + 1961,
29903        AMF.Internals.Tables.UML_String_Data_01.MS_01A6'Access);
29904   end Initialize_1961;
29905
29906   ---------------------
29907   -- Initialize_1962 --
29908   ---------------------
29909
29910   procedure Initialize_1962 is
29911   begin
29912      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29913       (Base + 1962,
29914        AMF.Internals.Tables.UML_String_Data_06.MS_060B'Access);
29915   end Initialize_1962;
29916
29917   ---------------------
29918   -- Initialize_1963 --
29919   ---------------------
29920
29921   procedure Initialize_1963 is
29922   begin
29923      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29924       (Base + 1963,
29925        AMF.Internals.Tables.UML_String_Data_04.MS_0417'Access);
29926   end Initialize_1963;
29927
29928   ---------------------
29929   -- Initialize_1964 --
29930   ---------------------
29931
29932   procedure Initialize_1964 is
29933   begin
29934      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29935       (Base + 1964,
29936        AMF.Internals.Tables.UML_String_Data_08.MS_08C0'Access);
29937   end Initialize_1964;
29938
29939   ---------------------
29940   -- Initialize_1965 --
29941   ---------------------
29942
29943   procedure Initialize_1965 is
29944   begin
29945      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29946       (Base + 1965,
29947        AMF.Internals.Tables.UML_String_Data_05.MS_056F'Access);
29948   end Initialize_1965;
29949
29950   ---------------------
29951   -- Initialize_1966 --
29952   ---------------------
29953
29954   procedure Initialize_1966 is
29955   begin
29956      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29957       (Base + 1966,
29958        AMF.Internals.Tables.UML_String_Data_04.MS_0495'Access);
29959   end Initialize_1966;
29960
29961   ---------------------
29962   -- Initialize_1967 --
29963   ---------------------
29964
29965   procedure Initialize_1967 is
29966   begin
29967      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29968       (Base + 1967,
29969        AMF.Internals.Tables.UML_String_Data_06.MS_06A1'Access);
29970   end Initialize_1967;
29971
29972   ---------------------
29973   -- Initialize_1968 --
29974   ---------------------
29975
29976   procedure Initialize_1968 is
29977   begin
29978      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29979       (Base + 1968,
29980        AMF.Internals.Tables.UML_String_Data_0B.MS_0B64'Access);
29981   end Initialize_1968;
29982
29983   ---------------------
29984   -- Initialize_1969 --
29985   ---------------------
29986
29987   procedure Initialize_1969 is
29988   begin
29989      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
29990       (Base + 1969,
29991        AMF.Internals.Tables.UML_String_Data_03.MS_0307'Access);
29992   end Initialize_1969;
29993
29994   ---------------------
29995   -- Initialize_1970 --
29996   ---------------------
29997
29998   procedure Initialize_1970 is
29999   begin
30000      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
30001       (Base + 1970,
30002        AMF.Internals.Tables.UML_String_Data_08.MS_0852'Access);
30003      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1970, (Is_Empty => True));
30004   end Initialize_1970;
30005
30006   ---------------------
30007   -- Initialize_1971 --
30008   ---------------------
30009
30010   procedure Initialize_1971 is
30011   begin
30012      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30013       (Base + 1971,
30014        AMF.Internals.Tables.UML_String_Data_09.MS_09A1'Access);
30015   end Initialize_1971;
30016
30017   ---------------------
30018   -- Initialize_1972 --
30019   ---------------------
30020
30021   procedure Initialize_1972 is
30022   begin
30023      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1972, (Is_Empty => True));
30024   end Initialize_1972;
30025
30026   ---------------------
30027   -- Initialize_1973 --
30028   ---------------------
30029
30030   procedure Initialize_1973 is
30031   begin
30032      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30033       (Base + 1973,
30034        AMF.Internals.Tables.UML_String_Data_02.MS_02BF'Access);
30035   end Initialize_1973;
30036
30037   ---------------------
30038   -- Initialize_1974 --
30039   ---------------------
30040
30041   procedure Initialize_1974 is
30042   begin
30043      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30044       (Base + 1974,
30045        AMF.Internals.Tables.UML_String_Data_08.MS_08F8'Access);
30046   end Initialize_1974;
30047
30048   ---------------------
30049   -- Initialize_1975 --
30050   ---------------------
30051
30052   procedure Initialize_1975 is
30053   begin
30054      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30055       (Base + 1975,
30056        AMF.Internals.Tables.UML_String_Data_07.MS_0711'Access);
30057   end Initialize_1975;
30058
30059   ---------------------
30060   -- Initialize_1976 --
30061   ---------------------
30062
30063   procedure Initialize_1976 is
30064   begin
30065      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30066       (Base + 1976,
30067        AMF.Internals.Tables.UML_String_Data_03.MS_034F'Access);
30068   end Initialize_1976;
30069
30070   ---------------------
30071   -- Initialize_1977 --
30072   ---------------------
30073
30074   procedure Initialize_1977 is
30075   begin
30076      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30077       (Base + 1977,
30078        AMF.Internals.Tables.UML_String_Data_06.MS_069C'Access);
30079   end Initialize_1977;
30080
30081   ---------------------
30082   -- Initialize_1978 --
30083   ---------------------
30084
30085   procedure Initialize_1978 is
30086   begin
30087      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30088       (Base + 1978,
30089        AMF.Internals.Tables.UML_String_Data_09.MS_09BD'Access);
30090   end Initialize_1978;
30091
30092   ---------------------
30093   -- Initialize_1979 --
30094   ---------------------
30095
30096   procedure Initialize_1979 is
30097   begin
30098      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30099       (Base + 1979,
30100        AMF.Internals.Tables.UML_String_Data_07.MS_07B9'Access);
30101   end Initialize_1979;
30102
30103   ---------------------
30104   -- Initialize_1980 --
30105   ---------------------
30106
30107   procedure Initialize_1980 is
30108   begin
30109      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30110       (Base + 1980,
30111        AMF.Internals.Tables.UML_String_Data_03.MS_03A3'Access);
30112   end Initialize_1980;
30113
30114   ---------------------
30115   -- Initialize_1981 --
30116   ---------------------
30117
30118   procedure Initialize_1981 is
30119   begin
30120      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30121       (Base + 1981,
30122        AMF.Internals.Tables.UML_String_Data_07.MS_07DB'Access);
30123   end Initialize_1981;
30124
30125   ---------------------
30126   -- Initialize_1982 --
30127   ---------------------
30128
30129   procedure Initialize_1982 is
30130   begin
30131      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 1982, True);
30132      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
30133       (Base + 1982,
30134        AMF.Internals.Tables.UML_String_Data_02.MS_0202'Access);
30135      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1982, (False, AMF.CMOF.Public_Visibility));
30136   end Initialize_1982;
30137
30138   ---------------------
30139   -- Initialize_1983 --
30140   ---------------------
30141
30142   procedure Initialize_1983 is
30143   begin
30144      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30145       (Base + 1983,
30146        AMF.Internals.Tables.UML_String_Data_09.MS_09CA'Access);
30147   end Initialize_1983;
30148
30149   ---------------------
30150   -- Initialize_1984 --
30151   ---------------------
30152
30153   procedure Initialize_1984 is
30154   begin
30155      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
30156       (Base + 1984,
30157        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
30158      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1984, (Is_Empty => True));
30159   end Initialize_1984;
30160
30161   ---------------------
30162   -- Initialize_1985 --
30163   ---------------------
30164
30165   procedure Initialize_1985 is
30166   begin
30167      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1985, (Is_Empty => True));
30168   end Initialize_1985;
30169
30170   ---------------------
30171   -- Initialize_1986 --
30172   ---------------------
30173
30174   procedure Initialize_1986 is
30175   begin
30176      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 1986, AMF.CMOF.Return_Parameter);
30177      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1986, (False, 0));
30178      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
30179       (Base + 1986,
30180        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
30181      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1986, (False, (Unlimited => True)));
30182      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1986, (False, AMF.CMOF.Public_Visibility));
30183   end Initialize_1986;
30184
30185   ---------------------
30186   -- Initialize_1987 --
30187   ---------------------
30188
30189   procedure Initialize_1987 is
30190   begin
30191      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 1987, True);
30192      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
30193       (Base + 1987,
30194        AMF.Internals.Tables.UML_String_Data_01.MS_010B'Access);
30195      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1987, (False, AMF.CMOF.Public_Visibility));
30196   end Initialize_1987;
30197
30198   ---------------------
30199   -- Initialize_1988 --
30200   ---------------------
30201
30202   procedure Initialize_1988 is
30203   begin
30204      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30205       (Base + 1988,
30206        AMF.Internals.Tables.UML_String_Data_06.MS_067B'Access);
30207   end Initialize_1988;
30208
30209   ---------------------
30210   -- Initialize_1989 --
30211   ---------------------
30212
30213   procedure Initialize_1989 is
30214   begin
30215      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
30216       (Base + 1989,
30217        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
30218      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1989, (Is_Empty => True));
30219   end Initialize_1989;
30220
30221   ---------------------
30222   -- Initialize_1990 --
30223   ---------------------
30224
30225   procedure Initialize_1990 is
30226   begin
30227      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1990, (Is_Empty => True));
30228   end Initialize_1990;
30229
30230   ---------------------
30231   -- Initialize_1991 --
30232   ---------------------
30233
30234   procedure Initialize_1991 is
30235   begin
30236      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 1991, AMF.CMOF.Return_Parameter);
30237      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1991, (False, 0));
30238      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
30239       (Base + 1991,
30240        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
30241      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1991, (False, (Unlimited => True)));
30242      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1991, (False, AMF.CMOF.Public_Visibility));
30243   end Initialize_1991;
30244
30245   ---------------------
30246   -- Initialize_1992 --
30247   ---------------------
30248
30249   procedure Initialize_1992 is
30250   begin
30251      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 1992, AMF.CMOF.In_Parameter);
30252      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1992, (False, 0));
30253      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
30254       (Base + 1992,
30255        AMF.Internals.Tables.UML_String_Data_06.MS_06FF'Access);
30256      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1992, (False, (Unlimited => True)));
30257      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1992, (False, AMF.CMOF.Public_Visibility));
30258   end Initialize_1992;
30259
30260   ---------------------
30261   -- Initialize_1993 --
30262   ---------------------
30263
30264   procedure Initialize_1993 is
30265   begin
30266      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 1993, True);
30267      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
30268       (Base + 1993,
30269        AMF.Internals.Tables.UML_String_Data_09.MS_091E'Access);
30270      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1993, (False, AMF.CMOF.Public_Visibility));
30271   end Initialize_1993;
30272
30273   ---------------------
30274   -- Initialize_1994 --
30275   ---------------------
30276
30277   procedure Initialize_1994 is
30278   begin
30279      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30280       (Base + 1994,
30281        AMF.Internals.Tables.UML_String_Data_04.MS_04BA'Access);
30282   end Initialize_1994;
30283
30284   ---------------------
30285   -- Initialize_1995 --
30286   ---------------------
30287
30288   procedure Initialize_1995 is
30289   begin
30290      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
30291       (Base + 1995,
30292        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
30293      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1995, (Is_Empty => True));
30294   end Initialize_1995;
30295
30296   ---------------------
30297   -- Initialize_1996 --
30298   ---------------------
30299
30300   procedure Initialize_1996 is
30301   begin
30302      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1996, (Is_Empty => True));
30303   end Initialize_1996;
30304
30305   ---------------------
30306   -- Initialize_1997 --
30307   ---------------------
30308
30309   procedure Initialize_1997 is
30310   begin
30311      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 1997, AMF.CMOF.Return_Parameter);
30312      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 1997, (False, 0));
30313      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
30314       (Base + 1997,
30315        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
30316      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 1997, (False, (Unlimited => True)));
30317      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 1997, (False, AMF.CMOF.Public_Visibility));
30318   end Initialize_1997;
30319
30320   ---------------------
30321   -- Initialize_1998 --
30322   ---------------------
30323
30324   procedure Initialize_1998 is
30325   begin
30326      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30327       (Base + 1998,
30328        AMF.Internals.Tables.UML_String_Data_06.MS_0691'Access);
30329   end Initialize_1998;
30330
30331   ---------------------
30332   -- Initialize_1999 --
30333   ---------------------
30334
30335   procedure Initialize_1999 is
30336   begin
30337      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30338       (Base + 1999,
30339        AMF.Internals.Tables.UML_String_Data_06.MS_063F'Access);
30340   end Initialize_1999;
30341
30342   ---------------------
30343   -- Initialize_2000 --
30344   ---------------------
30345
30346   procedure Initialize_2000 is
30347   begin
30348      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30349       (Base + 2000,
30350        AMF.Internals.Tables.UML_String_Data_03.MS_0326'Access);
30351   end Initialize_2000;
30352
30353   ---------------------
30354   -- Initialize_2001 --
30355   ---------------------
30356
30357   procedure Initialize_2001 is
30358   begin
30359      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30360       (Base + 2001,
30361        AMF.Internals.Tables.UML_String_Data_01.MS_012C'Access);
30362   end Initialize_2001;
30363
30364   ---------------------
30365   -- Initialize_2002 --
30366   ---------------------
30367
30368   procedure Initialize_2002 is
30369   begin
30370      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
30371       (Base + 2002,
30372        AMF.Internals.Tables.UML_String_Data_06.MS_06C9'Access);
30373      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2002, (Is_Empty => True));
30374   end Initialize_2002;
30375
30376   ---------------------
30377   -- Initialize_2003 --
30378   ---------------------
30379
30380   procedure Initialize_2003 is
30381   begin
30382      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30383       (Base + 2003,
30384        AMF.Internals.Tables.UML_String_Data_08.MS_08BA'Access);
30385   end Initialize_2003;
30386
30387   ---------------------
30388   -- Initialize_2004 --
30389   ---------------------
30390
30391   procedure Initialize_2004 is
30392   begin
30393      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2004, (Is_Empty => True));
30394   end Initialize_2004;
30395
30396   ---------------------
30397   -- Initialize_2005 --
30398   ---------------------
30399
30400   procedure Initialize_2005 is
30401   begin
30402      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
30403       (Base + 2005,
30404        AMF.Internals.Tables.UML_String_Data_08.MS_0823'Access);
30405      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2005, (Is_Empty => True));
30406   end Initialize_2005;
30407
30408   ---------------------
30409   -- Initialize_2006 --
30410   ---------------------
30411
30412   procedure Initialize_2006 is
30413   begin
30414      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30415       (Base + 2006,
30416        AMF.Internals.Tables.UML_String_Data_09.MS_092D'Access);
30417   end Initialize_2006;
30418
30419   ---------------------
30420   -- Initialize_2007 --
30421   ---------------------
30422
30423   procedure Initialize_2007 is
30424   begin
30425      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2007, (Is_Empty => True));
30426   end Initialize_2007;
30427
30428   ---------------------
30429   -- Initialize_2008 --
30430   ---------------------
30431
30432   procedure Initialize_2008 is
30433   begin
30434      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
30435       (Base + 2008,
30436        AMF.Internals.Tables.UML_String_Data_09.MS_09A6'Access);
30437      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2008, (Is_Empty => True));
30438   end Initialize_2008;
30439
30440   ---------------------
30441   -- Initialize_2009 --
30442   ---------------------
30443
30444   procedure Initialize_2009 is
30445   begin
30446      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30447       (Base + 2009,
30448        AMF.Internals.Tables.UML_String_Data_07.MS_074D'Access);
30449   end Initialize_2009;
30450
30451   ---------------------
30452   -- Initialize_2010 --
30453   ---------------------
30454
30455   procedure Initialize_2010 is
30456   begin
30457      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2010, (Is_Empty => True));
30458   end Initialize_2010;
30459
30460   ---------------------
30461   -- Initialize_2011 --
30462   ---------------------
30463
30464   procedure Initialize_2011 is
30465   begin
30466      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
30467       (Base + 2011,
30468        AMF.Internals.Tables.UML_String_Data_02.MS_02E9'Access);
30469      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2011, (Is_Empty => True));
30470   end Initialize_2011;
30471
30472   ---------------------
30473   -- Initialize_2012 --
30474   ---------------------
30475
30476   procedure Initialize_2012 is
30477   begin
30478      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30479       (Base + 2012,
30480        AMF.Internals.Tables.UML_String_Data_03.MS_0361'Access);
30481   end Initialize_2012;
30482
30483   ---------------------
30484   -- Initialize_2013 --
30485   ---------------------
30486
30487   procedure Initialize_2013 is
30488   begin
30489      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2013, (Is_Empty => True));
30490   end Initialize_2013;
30491
30492   ---------------------
30493   -- Initialize_2014 --
30494   ---------------------
30495
30496   procedure Initialize_2014 is
30497   begin
30498      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30499       (Base + 2014,
30500        AMF.Internals.Tables.UML_String_Data_09.MS_09E1'Access);
30501   end Initialize_2014;
30502
30503   ---------------------
30504   -- Initialize_2015 --
30505   ---------------------
30506
30507   procedure Initialize_2015 is
30508   begin
30509      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30510       (Base + 2015,
30511        AMF.Internals.Tables.UML_String_Data_00.MS_00CC'Access);
30512   end Initialize_2015;
30513
30514   ---------------------
30515   -- Initialize_2016 --
30516   ---------------------
30517
30518   procedure Initialize_2016 is
30519   begin
30520      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30521       (Base + 2016,
30522        AMF.Internals.Tables.UML_String_Data_04.MS_048A'Access);
30523   end Initialize_2016;
30524
30525   ---------------------
30526   -- Initialize_2017 --
30527   ---------------------
30528
30529   procedure Initialize_2017 is
30530   begin
30531      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30532       (Base + 2017,
30533        AMF.Internals.Tables.UML_String_Data_02.MS_020C'Access);
30534   end Initialize_2017;
30535
30536   ---------------------
30537   -- Initialize_2018 --
30538   ---------------------
30539
30540   procedure Initialize_2018 is
30541   begin
30542      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30543       (Base + 2018,
30544        AMF.Internals.Tables.UML_String_Data_03.MS_03F0'Access);
30545   end Initialize_2018;
30546
30547   ---------------------
30548   -- Initialize_2019 --
30549   ---------------------
30550
30551   procedure Initialize_2019 is
30552   begin
30553      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30554       (Base + 2019,
30555        AMF.Internals.Tables.UML_String_Data_0C.MS_0C3E'Access);
30556   end Initialize_2019;
30557
30558   ---------------------
30559   -- Initialize_2020 --
30560   ---------------------
30561
30562   procedure Initialize_2020 is
30563   begin
30564      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30565       (Base + 2020,
30566        AMF.Internals.Tables.UML_String_Data_09.MS_0958'Access);
30567   end Initialize_2020;
30568
30569   ---------------------
30570   -- Initialize_2021 --
30571   ---------------------
30572
30573   procedure Initialize_2021 is
30574   begin
30575      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30576       (Base + 2021,
30577        AMF.Internals.Tables.UML_String_Data_07.MS_0776'Access);
30578   end Initialize_2021;
30579
30580   ---------------------
30581   -- Initialize_2022 --
30582   ---------------------
30583
30584   procedure Initialize_2022 is
30585   begin
30586      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30587       (Base + 2022,
30588        AMF.Internals.Tables.UML_String_Data_07.MS_0711'Access);
30589   end Initialize_2022;
30590
30591   ---------------------
30592   -- Initialize_2023 --
30593   ---------------------
30594
30595   procedure Initialize_2023 is
30596   begin
30597      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30598       (Base + 2023,
30599        AMF.Internals.Tables.UML_String_Data_07.MS_076E'Access);
30600   end Initialize_2023;
30601
30602   ---------------------
30603   -- Initialize_2024 --
30604   ---------------------
30605
30606   procedure Initialize_2024 is
30607   begin
30608      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30609       (Base + 2024,
30610        AMF.Internals.Tables.UML_String_Data_07.MS_0754'Access);
30611   end Initialize_2024;
30612
30613   ---------------------
30614   -- Initialize_2025 --
30615   ---------------------
30616
30617   procedure Initialize_2025 is
30618   begin
30619      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30620       (Base + 2025,
30621        AMF.Internals.Tables.UML_String_Data_07.MS_07DC'Access);
30622   end Initialize_2025;
30623
30624   ---------------------
30625   -- Initialize_2026 --
30626   ---------------------
30627
30628   procedure Initialize_2026 is
30629   begin
30630      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30631       (Base + 2026,
30632        AMF.Internals.Tables.UML_String_Data_02.MS_02AB'Access);
30633   end Initialize_2026;
30634
30635   ---------------------
30636   -- Initialize_2027 --
30637   ---------------------
30638
30639   procedure Initialize_2027 is
30640   begin
30641      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30642       (Base + 2027,
30643        AMF.Internals.Tables.UML_String_Data_03.MS_0328'Access);
30644   end Initialize_2027;
30645
30646   ---------------------
30647   -- Initialize_2028 --
30648   ---------------------
30649
30650   procedure Initialize_2028 is
30651   begin
30652      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30653       (Base + 2028,
30654        AMF.Internals.Tables.UML_String_Data_0A.MS_0A23'Access);
30655   end Initialize_2028;
30656
30657   ---------------------
30658   -- Initialize_2029 --
30659   ---------------------
30660
30661   procedure Initialize_2029 is
30662   begin
30663      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30664       (Base + 2029,
30665        AMF.Internals.Tables.UML_String_Data_0A.MS_0A20'Access);
30666   end Initialize_2029;
30667
30668   ---------------------
30669   -- Initialize_2030 --
30670   ---------------------
30671
30672   procedure Initialize_2030 is
30673   begin
30674      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30675       (Base + 2030,
30676        AMF.Internals.Tables.UML_String_Data_07.MS_07A5'Access);
30677   end Initialize_2030;
30678
30679   ---------------------
30680   -- Initialize_2031 --
30681   ---------------------
30682
30683   procedure Initialize_2031 is
30684   begin
30685      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30686       (Base + 2031,
30687        AMF.Internals.Tables.UML_String_Data_04.MS_046B'Access);
30688   end Initialize_2031;
30689
30690   ---------------------
30691   -- Initialize_2032 --
30692   ---------------------
30693
30694   procedure Initialize_2032 is
30695   begin
30696      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2032, True);
30697      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
30698       (Base + 2032,
30699        AMF.Internals.Tables.UML_String_Data_02.MS_0298'Access);
30700      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2032, (False, AMF.CMOF.Public_Visibility));
30701   end Initialize_2032;
30702
30703   ---------------------
30704   -- Initialize_2033 --
30705   ---------------------
30706
30707   procedure Initialize_2033 is
30708   begin
30709      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30710       (Base + 2033,
30711        AMF.Internals.Tables.UML_String_Data_07.MS_0768'Access);
30712   end Initialize_2033;
30713
30714   ---------------------
30715   -- Initialize_2034 --
30716   ---------------------
30717
30718   procedure Initialize_2034 is
30719   begin
30720      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
30721       (Base + 2034,
30722        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
30723      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2034, (Is_Empty => True));
30724   end Initialize_2034;
30725
30726   ---------------------
30727   -- Initialize_2035 --
30728   ---------------------
30729
30730   procedure Initialize_2035 is
30731   begin
30732      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2035, (Is_Empty => True));
30733   end Initialize_2035;
30734
30735   ---------------------
30736   -- Initialize_2036 --
30737   ---------------------
30738
30739   procedure Initialize_2036 is
30740   begin
30741      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2036, AMF.CMOF.Return_Parameter);
30742      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 2036, (False, 0));
30743      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
30744       (Base + 2036,
30745        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
30746      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 2036, (False, (Unlimited => True)));
30747      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2036, (False, AMF.CMOF.Public_Visibility));
30748   end Initialize_2036;
30749
30750   ---------------------
30751   -- Initialize_2037 --
30752   ---------------------
30753
30754   procedure Initialize_2037 is
30755   begin
30756      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2037, True);
30757      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
30758       (Base + 2037,
30759        AMF.Internals.Tables.UML_String_Data_01.MS_0121'Access);
30760      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2037, (False, AMF.CMOF.Public_Visibility));
30761   end Initialize_2037;
30762
30763   ---------------------
30764   -- Initialize_2038 --
30765   ---------------------
30766
30767   procedure Initialize_2038 is
30768   begin
30769      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30770       (Base + 2038,
30771        AMF.Internals.Tables.UML_String_Data_03.MS_03F2'Access);
30772   end Initialize_2038;
30773
30774   ---------------------
30775   -- Initialize_2039 --
30776   ---------------------
30777
30778   procedure Initialize_2039 is
30779   begin
30780      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
30781       (Base + 2039,
30782        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
30783      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2039, (Is_Empty => True));
30784   end Initialize_2039;
30785
30786   ---------------------
30787   -- Initialize_2040 --
30788   ---------------------
30789
30790   procedure Initialize_2040 is
30791   begin
30792      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2040, (Is_Empty => True));
30793   end Initialize_2040;
30794
30795   ---------------------
30796   -- Initialize_2041 --
30797   ---------------------
30798
30799   procedure Initialize_2041 is
30800   begin
30801      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2041, AMF.CMOF.Return_Parameter);
30802      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 2041, (False, 0));
30803      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
30804       (Base + 2041,
30805        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
30806      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 2041, (False, (Unlimited => True)));
30807      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2041, (False, AMF.CMOF.Public_Visibility));
30808   end Initialize_2041;
30809
30810   ---------------------
30811   -- Initialize_2042 --
30812   ---------------------
30813
30814   procedure Initialize_2042 is
30815   begin
30816      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2042, True);
30817      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
30818       (Base + 2042,
30819        AMF.Internals.Tables.UML_String_Data_06.MS_061B'Access);
30820      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2042, (False, AMF.CMOF.Public_Visibility));
30821   end Initialize_2042;
30822
30823   ---------------------
30824   -- Initialize_2043 --
30825   ---------------------
30826
30827   procedure Initialize_2043 is
30828   begin
30829      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30830       (Base + 2043,
30831        AMF.Internals.Tables.UML_String_Data_07.MS_0700'Access);
30832   end Initialize_2043;
30833
30834   ---------------------
30835   -- Initialize_2044 --
30836   ---------------------
30837
30838   procedure Initialize_2044 is
30839   begin
30840      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
30841       (Base + 2044,
30842        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
30843      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2044, (Is_Empty => True));
30844   end Initialize_2044;
30845
30846   ---------------------
30847   -- Initialize_2045 --
30848   ---------------------
30849
30850   procedure Initialize_2045 is
30851   begin
30852      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2045, (Is_Empty => True));
30853   end Initialize_2045;
30854
30855   ---------------------
30856   -- Initialize_2046 --
30857   ---------------------
30858
30859   procedure Initialize_2046 is
30860   begin
30861      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2046, AMF.CMOF.Return_Parameter);
30862      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
30863       (Base + 2046,
30864        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
30865      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2046, (False, AMF.CMOF.Public_Visibility));
30866   end Initialize_2046;
30867
30868   ---------------------
30869   -- Initialize_2047 --
30870   ---------------------
30871
30872   procedure Initialize_2047 is
30873   begin
30874      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2047, AMF.CMOF.In_Parameter);
30875      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
30876       (Base + 2047,
30877        AMF.Internals.Tables.UML_String_Data_00.MS_008C'Access);
30878      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2047, (False, AMF.CMOF.Public_Visibility));
30879   end Initialize_2047;
30880
30881   ---------------------
30882   -- Initialize_2048 --
30883   ---------------------
30884
30885   procedure Initialize_2048 is
30886   begin
30887      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2048, True);
30888      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
30889       (Base + 2048,
30890        AMF.Internals.Tables.UML_String_Data_05.MS_0598'Access);
30891      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2048, (False, AMF.CMOF.Public_Visibility));
30892   end Initialize_2048;
30893
30894   ---------------------
30895   -- Initialize_2049 --
30896   ---------------------
30897
30898   procedure Initialize_2049 is
30899   begin
30900      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30901       (Base + 2049,
30902        AMF.Internals.Tables.UML_String_Data_01.MS_01D7'Access);
30903   end Initialize_2049;
30904
30905   ---------------------
30906   -- Initialize_2050 --
30907   ---------------------
30908
30909   procedure Initialize_2050 is
30910   begin
30911      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
30912       (Base + 2050,
30913        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
30914      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2050, (Is_Empty => True));
30915   end Initialize_2050;
30916
30917   ---------------------
30918   -- Initialize_2051 --
30919   ---------------------
30920
30921   procedure Initialize_2051 is
30922   begin
30923      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2051, (Is_Empty => True));
30924   end Initialize_2051;
30925
30926   ---------------------
30927   -- Initialize_2052 --
30928   ---------------------
30929
30930   procedure Initialize_2052 is
30931   begin
30932      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2052, AMF.CMOF.Return_Parameter);
30933      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 2052, (False, 0));
30934      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
30935       (Base + 2052,
30936        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
30937      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 2052, (False, (Unlimited => True)));
30938      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2052, (False, AMF.CMOF.Public_Visibility));
30939   end Initialize_2052;
30940
30941   ---------------------
30942   -- Initialize_2053 --
30943   ---------------------
30944
30945   procedure Initialize_2053 is
30946   begin
30947      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2053, True);
30948      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
30949       (Base + 2053,
30950        AMF.Internals.Tables.UML_String_Data_03.MS_036F'Access);
30951      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2053, (False, AMF.CMOF.Public_Visibility));
30952   end Initialize_2053;
30953
30954   ---------------------
30955   -- Initialize_2054 --
30956   ---------------------
30957
30958   procedure Initialize_2054 is
30959   begin
30960      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
30961       (Base + 2054,
30962        AMF.Internals.Tables.UML_String_Data_0B.MS_0BDD'Access);
30963   end Initialize_2054;
30964
30965   ---------------------
30966   -- Initialize_2055 --
30967   ---------------------
30968
30969   procedure Initialize_2055 is
30970   begin
30971      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
30972       (Base + 2055,
30973        AMF.Internals.Tables.UML_String_Data_0B.MS_0BFB'Access);
30974      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2055, (Is_Empty => True));
30975   end Initialize_2055;
30976
30977   ---------------------
30978   -- Initialize_2056 --
30979   ---------------------
30980
30981   procedure Initialize_2056 is
30982   begin
30983      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2056, (Is_Empty => True));
30984   end Initialize_2056;
30985
30986   ---------------------
30987   -- Initialize_2057 --
30988   ---------------------
30989
30990   procedure Initialize_2057 is
30991   begin
30992      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
30993       (Base + 2057,
30994        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
30995      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2057, (Is_Empty => True));
30996   end Initialize_2057;
30997
30998   ---------------------
30999   -- Initialize_2058 --
31000   ---------------------
31001
31002   procedure Initialize_2058 is
31003   begin
31004      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2058, (Is_Empty => True));
31005   end Initialize_2058;
31006
31007   ---------------------
31008   -- Initialize_2059 --
31009   ---------------------
31010
31011   procedure Initialize_2059 is
31012   begin
31013      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2059, AMF.CMOF.Return_Parameter);
31014      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
31015       (Base + 2059,
31016        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
31017      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2059, (False, AMF.CMOF.Public_Visibility));
31018   end Initialize_2059;
31019
31020   ---------------------
31021   -- Initialize_2060 --
31022   ---------------------
31023
31024   procedure Initialize_2060 is
31025   begin
31026      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2060, AMF.CMOF.In_Parameter);
31027      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
31028       (Base + 2060,
31029        AMF.Internals.Tables.UML_String_Data_0B.MS_0BA8'Access);
31030      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2060, (False, AMF.CMOF.Public_Visibility));
31031   end Initialize_2060;
31032
31033   ---------------------
31034   -- Initialize_2061 --
31035   ---------------------
31036
31037   procedure Initialize_2061 is
31038   begin
31039      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2061, True);
31040      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
31041       (Base + 2061,
31042        AMF.Internals.Tables.UML_String_Data_01.MS_010B'Access);
31043      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2061, (False, AMF.CMOF.Public_Visibility));
31044   end Initialize_2061;
31045
31046   ---------------------
31047   -- Initialize_2062 --
31048   ---------------------
31049
31050   procedure Initialize_2062 is
31051   begin
31052      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31053       (Base + 2062,
31054        AMF.Internals.Tables.UML_String_Data_08.MS_0815'Access);
31055   end Initialize_2062;
31056
31057   ---------------------
31058   -- Initialize_2063 --
31059   ---------------------
31060
31061   procedure Initialize_2063 is
31062   begin
31063      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31064       (Base + 2063,
31065        AMF.Internals.Tables.UML_String_Data_06.MS_067B'Access);
31066   end Initialize_2063;
31067
31068   ---------------------
31069   -- Initialize_2064 --
31070   ---------------------
31071
31072   procedure Initialize_2064 is
31073   begin
31074      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
31075       (Base + 2064,
31076        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
31077      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2064, (Is_Empty => True));
31078   end Initialize_2064;
31079
31080   ---------------------
31081   -- Initialize_2065 --
31082   ---------------------
31083
31084   procedure Initialize_2065 is
31085   begin
31086      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2065, (Is_Empty => True));
31087   end Initialize_2065;
31088
31089   ---------------------
31090   -- Initialize_2066 --
31091   ---------------------
31092
31093   procedure Initialize_2066 is
31094   begin
31095      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2066, AMF.CMOF.Return_Parameter);
31096      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 2066, (False, 0));
31097      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
31098       (Base + 2066,
31099        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
31100      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 2066, (False, (Unlimited => True)));
31101      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2066, (False, AMF.CMOF.Public_Visibility));
31102   end Initialize_2066;
31103
31104   ---------------------
31105   -- Initialize_2067 --
31106   ---------------------
31107
31108   procedure Initialize_2067 is
31109   begin
31110      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2067, AMF.CMOF.In_Parameter);
31111      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 2067, (False, 0));
31112      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
31113       (Base + 2067,
31114        AMF.Internals.Tables.UML_String_Data_06.MS_06FF'Access);
31115      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 2067, (False, (Unlimited => True)));
31116      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2067, (False, AMF.CMOF.Public_Visibility));
31117   end Initialize_2067;
31118
31119   ---------------------
31120   -- Initialize_2068 --
31121   ---------------------
31122
31123   procedure Initialize_2068 is
31124   begin
31125      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2068, True);
31126      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
31127       (Base + 2068,
31128        AMF.Internals.Tables.UML_String_Data_08.MS_087A'Access);
31129      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2068, (False, AMF.CMOF.Public_Visibility));
31130   end Initialize_2068;
31131
31132   ---------------------
31133   -- Initialize_2069 --
31134   ---------------------
31135
31136   procedure Initialize_2069 is
31137   begin
31138      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31139       (Base + 2069,
31140        AMF.Internals.Tables.UML_String_Data_02.MS_025D'Access);
31141   end Initialize_2069;
31142
31143   ---------------------
31144   -- Initialize_2070 --
31145   ---------------------
31146
31147   procedure Initialize_2070 is
31148   begin
31149      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
31150       (Base + 2070,
31151        AMF.Internals.Tables.UML_String_Data_0B.MS_0BFB'Access);
31152      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2070, (Is_Empty => True));
31153   end Initialize_2070;
31154
31155   ---------------------
31156   -- Initialize_2071 --
31157   ---------------------
31158
31159   procedure Initialize_2071 is
31160   begin
31161      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2071, (Is_Empty => True));
31162   end Initialize_2071;
31163
31164   ---------------------
31165   -- Initialize_2072 --
31166   ---------------------
31167
31168   procedure Initialize_2072 is
31169   begin
31170      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
31171       (Base + 2072,
31172        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
31173      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2072, (Is_Empty => True));
31174   end Initialize_2072;
31175
31176   ---------------------
31177   -- Initialize_2073 --
31178   ---------------------
31179
31180   procedure Initialize_2073 is
31181   begin
31182      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2073, (Is_Empty => True));
31183   end Initialize_2073;
31184
31185   ---------------------
31186   -- Initialize_2074 --
31187   ---------------------
31188
31189   procedure Initialize_2074 is
31190   begin
31191      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2074, AMF.CMOF.Return_Parameter);
31192      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 2074, (False, 0));
31193      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
31194       (Base + 2074,
31195        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
31196      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 2074, (False, (Unlimited => True)));
31197      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2074, (False, AMF.CMOF.Public_Visibility));
31198   end Initialize_2074;
31199
31200   ---------------------
31201   -- Initialize_2075 --
31202   ---------------------
31203
31204   procedure Initialize_2075 is
31205   begin
31206      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2075, AMF.CMOF.In_Parameter);
31207      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
31208       (Base + 2075,
31209        AMF.Internals.Tables.UML_String_Data_05.MS_0590'Access);
31210      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2075, (False, AMF.CMOF.Public_Visibility));
31211   end Initialize_2075;
31212
31213   ---------------------
31214   -- Initialize_2076 --
31215   ---------------------
31216
31217   procedure Initialize_2076 is
31218   begin
31219      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2076, True);
31220      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
31221       (Base + 2076,
31222        AMF.Internals.Tables.UML_String_Data_07.MS_07B4'Access);
31223      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2076, (False, AMF.CMOF.Public_Visibility));
31224   end Initialize_2076;
31225
31226   ---------------------
31227   -- Initialize_2077 --
31228   ---------------------
31229
31230   procedure Initialize_2077 is
31231   begin
31232      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31233       (Base + 2077,
31234        AMF.Internals.Tables.UML_String_Data_02.MS_02BB'Access);
31235   end Initialize_2077;
31236
31237   ---------------------
31238   -- Initialize_2078 --
31239   ---------------------
31240
31241   procedure Initialize_2078 is
31242   begin
31243      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31244       (Base + 2078,
31245        AMF.Internals.Tables.UML_String_Data_02.MS_02BB'Access);
31246   end Initialize_2078;
31247
31248   ---------------------
31249   -- Initialize_2079 --
31250   ---------------------
31251
31252   procedure Initialize_2079 is
31253   begin
31254      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
31255       (Base + 2079,
31256        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
31257      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2079, (Is_Empty => True));
31258   end Initialize_2079;
31259
31260   ---------------------
31261   -- Initialize_2080 --
31262   ---------------------
31263
31264   procedure Initialize_2080 is
31265   begin
31266      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2080, (Is_Empty => True));
31267   end Initialize_2080;
31268
31269   ---------------------
31270   -- Initialize_2081 --
31271   ---------------------
31272
31273   procedure Initialize_2081 is
31274   begin
31275      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2081, AMF.CMOF.Return_Parameter);
31276      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 2081, (False, 0));
31277      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
31278       (Base + 2081,
31279        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
31280      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 2081, (False, (Unlimited => True)));
31281      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2081, (False, AMF.CMOF.Public_Visibility));
31282   end Initialize_2081;
31283
31284   ---------------------
31285   -- Initialize_2082 --
31286   ---------------------
31287
31288   procedure Initialize_2082 is
31289   begin
31290      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2082, True);
31291      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
31292       (Base + 2082,
31293        AMF.Internals.Tables.UML_String_Data_01.MS_014E'Access);
31294      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2082, (False, AMF.CMOF.Public_Visibility));
31295   end Initialize_2082;
31296
31297   ---------------------
31298   -- Initialize_2083 --
31299   ---------------------
31300
31301   procedure Initialize_2083 is
31302   begin
31303      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31304       (Base + 2083,
31305        AMF.Internals.Tables.UML_String_Data_0B.MS_0BDB'Access);
31306   end Initialize_2083;
31307
31308   ---------------------
31309   -- Initialize_2084 --
31310   ---------------------
31311
31312   procedure Initialize_2084 is
31313   begin
31314      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
31315       (Base + 2084,
31316        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
31317      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2084, (Is_Empty => True));
31318   end Initialize_2084;
31319
31320   ---------------------
31321   -- Initialize_2085 --
31322   ---------------------
31323
31324   procedure Initialize_2085 is
31325   begin
31326      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2085, (Is_Empty => True));
31327   end Initialize_2085;
31328
31329   ---------------------
31330   -- Initialize_2086 --
31331   ---------------------
31332
31333   procedure Initialize_2086 is
31334   begin
31335      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2086, AMF.CMOF.Return_Parameter);
31336      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
31337       (Base + 2086,
31338        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
31339      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2086, (False, AMF.CMOF.Public_Visibility));
31340   end Initialize_2086;
31341
31342   ---------------------
31343   -- Initialize_2087 --
31344   ---------------------
31345
31346   procedure Initialize_2087 is
31347   begin
31348      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2087, True);
31349      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
31350       (Base + 2087,
31351        AMF.Internals.Tables.UML_String_Data_00.MS_00E2'Access);
31352      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2087, (False, AMF.CMOF.Public_Visibility));
31353   end Initialize_2087;
31354
31355   ---------------------
31356   -- Initialize_2088 --
31357   ---------------------
31358
31359   procedure Initialize_2088 is
31360   begin
31361      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31362       (Base + 2088,
31363        AMF.Internals.Tables.UML_String_Data_04.MS_0430'Access);
31364   end Initialize_2088;
31365
31366   ---------------------
31367   -- Initialize_2089 --
31368   ---------------------
31369
31370   procedure Initialize_2089 is
31371   begin
31372      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
31373       (Base + 2089,
31374        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
31375      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2089, (Is_Empty => True));
31376   end Initialize_2089;
31377
31378   ---------------------
31379   -- Initialize_2090 --
31380   ---------------------
31381
31382   procedure Initialize_2090 is
31383   begin
31384      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2090, (Is_Empty => True));
31385   end Initialize_2090;
31386
31387   ---------------------
31388   -- Initialize_2091 --
31389   ---------------------
31390
31391   procedure Initialize_2091 is
31392   begin
31393      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2091, AMF.CMOF.Return_Parameter);
31394      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
31395       (Base + 2091,
31396        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
31397      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2091, (False, AMF.CMOF.Public_Visibility));
31398   end Initialize_2091;
31399
31400   ---------------------
31401   -- Initialize_2092 --
31402   ---------------------
31403
31404   procedure Initialize_2092 is
31405   begin
31406      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2092, AMF.CMOF.In_Parameter);
31407      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
31408       (Base + 2092,
31409        AMF.Internals.Tables.UML_String_Data_05.MS_0590'Access);
31410      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2092, (False, AMF.CMOF.Public_Visibility));
31411   end Initialize_2092;
31412
31413   ---------------------
31414   -- Initialize_2093 --
31415   ---------------------
31416
31417   procedure Initialize_2093 is
31418   begin
31419      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2093, True);
31420      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
31421       (Base + 2093,
31422        AMF.Internals.Tables.UML_String_Data_08.MS_0830'Access);
31423      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2093, (False, AMF.CMOF.Public_Visibility));
31424   end Initialize_2093;
31425
31426   ---------------------
31427   -- Initialize_2094 --
31428   ---------------------
31429
31430   procedure Initialize_2094 is
31431   begin
31432      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31433       (Base + 2094,
31434        AMF.Internals.Tables.UML_String_Data_0B.MS_0B20'Access);
31435   end Initialize_2094;
31436
31437   ---------------------
31438   -- Initialize_2095 --
31439   ---------------------
31440
31441   procedure Initialize_2095 is
31442   begin
31443      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
31444       (Base + 2095,
31445        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
31446      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2095, (Is_Empty => True));
31447   end Initialize_2095;
31448
31449   ---------------------
31450   -- Initialize_2096 --
31451   ---------------------
31452
31453   procedure Initialize_2096 is
31454   begin
31455      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2096, (Is_Empty => True));
31456   end Initialize_2096;
31457
31458   ---------------------
31459   -- Initialize_2097 --
31460   ---------------------
31461
31462   procedure Initialize_2097 is
31463   begin
31464      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2097, AMF.CMOF.Return_Parameter);
31465      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 2097, (False, 0));
31466      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
31467       (Base + 2097,
31468        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
31469      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 2097, (False, (Unlimited => True)));
31470      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2097, (False, AMF.CMOF.Public_Visibility));
31471   end Initialize_2097;
31472
31473   ---------------------
31474   -- Initialize_2098 --
31475   ---------------------
31476
31477   procedure Initialize_2098 is
31478   begin
31479      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31480       (Base + 2098,
31481        AMF.Internals.Tables.UML_String_Data_03.MS_033C'Access);
31482   end Initialize_2098;
31483
31484   ---------------------
31485   -- Initialize_2099 --
31486   ---------------------
31487
31488   procedure Initialize_2099 is
31489   begin
31490      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
31491       (Base + 2099,
31492        AMF.Internals.Tables.UML_String_Data_03.MS_0311'Access);
31493      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2099, (Is_Empty => True));
31494   end Initialize_2099;
31495
31496   ---------------------
31497   -- Initialize_2100 --
31498   ---------------------
31499
31500   procedure Initialize_2100 is
31501   begin
31502      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31503       (Base + 2100,
31504        AMF.Internals.Tables.UML_String_Data_06.MS_064E'Access);
31505   end Initialize_2100;
31506
31507   ---------------------
31508   -- Initialize_2101 --
31509   ---------------------
31510
31511   procedure Initialize_2101 is
31512   begin
31513      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2101, (Is_Empty => True));
31514   end Initialize_2101;
31515
31516   ---------------------
31517   -- Initialize_2102 --
31518   ---------------------
31519
31520   procedure Initialize_2102 is
31521   begin
31522      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31523       (Base + 2102,
31524        AMF.Internals.Tables.UML_String_Data_06.MS_06A3'Access);
31525   end Initialize_2102;
31526
31527   ---------------------
31528   -- Initialize_2103 --
31529   ---------------------
31530
31531   procedure Initialize_2103 is
31532   begin
31533      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31534       (Base + 2103,
31535        AMF.Internals.Tables.UML_String_Data_04.MS_04B0'Access);
31536   end Initialize_2103;
31537
31538   ---------------------
31539   -- Initialize_2104 --
31540   ---------------------
31541
31542   procedure Initialize_2104 is
31543   begin
31544      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31545       (Base + 2104,
31546        AMF.Internals.Tables.UML_String_Data_05.MS_05C7'Access);
31547   end Initialize_2104;
31548
31549   ---------------------
31550   -- Initialize_2105 --
31551   ---------------------
31552
31553   procedure Initialize_2105 is
31554   begin
31555      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31556       (Base + 2105,
31557        AMF.Internals.Tables.UML_String_Data_06.MS_0693'Access);
31558   end Initialize_2105;
31559
31560   ---------------------
31561   -- Initialize_2106 --
31562   ---------------------
31563
31564   procedure Initialize_2106 is
31565   begin
31566      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
31567       (Base + 2106,
31568        AMF.Internals.Tables.UML_String_Data_0A.MS_0A58'Access);
31569      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2106, (Is_Empty => True));
31570   end Initialize_2106;
31571
31572   ---------------------
31573   -- Initialize_2107 --
31574   ---------------------
31575
31576   procedure Initialize_2107 is
31577   begin
31578      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31579       (Base + 2107,
31580        AMF.Internals.Tables.UML_String_Data_06.MS_0634'Access);
31581   end Initialize_2107;
31582
31583   ---------------------
31584   -- Initialize_2108 --
31585   ---------------------
31586
31587   procedure Initialize_2108 is
31588   begin
31589      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2108, (Is_Empty => True));
31590   end Initialize_2108;
31591
31592   ---------------------
31593   -- Initialize_2109 --
31594   ---------------------
31595
31596   procedure Initialize_2109 is
31597   begin
31598      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
31599       (Base + 2109,
31600        AMF.Internals.Tables.UML_String_Data_08.MS_08EA'Access);
31601      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2109, (Is_Empty => True));
31602   end Initialize_2109;
31603
31604   ---------------------
31605   -- Initialize_2110 --
31606   ---------------------
31607
31608   procedure Initialize_2110 is
31609   begin
31610      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31611       (Base + 2110,
31612        AMF.Internals.Tables.UML_String_Data_0B.MS_0BEC'Access);
31613   end Initialize_2110;
31614
31615   ---------------------
31616   -- Initialize_2111 --
31617   ---------------------
31618
31619   procedure Initialize_2111 is
31620   begin
31621      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2111, (Is_Empty => True));
31622   end Initialize_2111;
31623
31624   ---------------------
31625   -- Initialize_2112 --
31626   ---------------------
31627
31628   procedure Initialize_2112 is
31629   begin
31630      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
31631       (Base + 2112,
31632        AMF.Internals.Tables.UML_String_Data_09.MS_091D'Access);
31633      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2112, (Is_Empty => True));
31634   end Initialize_2112;
31635
31636   ---------------------
31637   -- Initialize_2113 --
31638   ---------------------
31639
31640   procedure Initialize_2113 is
31641   begin
31642      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31643       (Base + 2113,
31644        AMF.Internals.Tables.UML_String_Data_0C.MS_0C52'Access);
31645   end Initialize_2113;
31646
31647   ---------------------
31648   -- Initialize_2114 --
31649   ---------------------
31650
31651   procedure Initialize_2114 is
31652   begin
31653      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2114, (Is_Empty => True));
31654   end Initialize_2114;
31655
31656   ---------------------
31657   -- Initialize_2115 --
31658   ---------------------
31659
31660   procedure Initialize_2115 is
31661   begin
31662      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31663       (Base + 2115,
31664        AMF.Internals.Tables.UML_String_Data_0B.MS_0B8F'Access);
31665   end Initialize_2115;
31666
31667   ---------------------
31668   -- Initialize_2116 --
31669   ---------------------
31670
31671   procedure Initialize_2116 is
31672   begin
31673      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31674       (Base + 2116,
31675        AMF.Internals.Tables.UML_String_Data_04.MS_048F'Access);
31676   end Initialize_2116;
31677
31678   ---------------------
31679   -- Initialize_2117 --
31680   ---------------------
31681
31682   procedure Initialize_2117 is
31683   begin
31684      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31685       (Base + 2117,
31686        AMF.Internals.Tables.UML_String_Data_08.MS_088E'Access);
31687   end Initialize_2117;
31688
31689   ---------------------
31690   -- Initialize_2118 --
31691   ---------------------
31692
31693   procedure Initialize_2118 is
31694   begin
31695      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31696       (Base + 2118,
31697        AMF.Internals.Tables.UML_String_Data_02.MS_02C0'Access);
31698   end Initialize_2118;
31699
31700   ---------------------
31701   -- Initialize_2119 --
31702   ---------------------
31703
31704   procedure Initialize_2119 is
31705   begin
31706      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31707       (Base + 2119,
31708        AMF.Internals.Tables.UML_String_Data_07.MS_070B'Access);
31709   end Initialize_2119;
31710
31711   ---------------------
31712   -- Initialize_2120 --
31713   ---------------------
31714
31715   procedure Initialize_2120 is
31716   begin
31717      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31718       (Base + 2120,
31719        AMF.Internals.Tables.UML_String_Data_07.MS_079B'Access);
31720   end Initialize_2120;
31721
31722   ---------------------
31723   -- Initialize_2121 --
31724   ---------------------
31725
31726   procedure Initialize_2121 is
31727   begin
31728      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31729       (Base + 2121,
31730        AMF.Internals.Tables.UML_String_Data_08.MS_086A'Access);
31731   end Initialize_2121;
31732
31733   ---------------------
31734   -- Initialize_2122 --
31735   ---------------------
31736
31737   procedure Initialize_2122 is
31738   begin
31739      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
31740       (Base + 2122,
31741        AMF.Internals.Tables.UML_String_Data_04.MS_0441'Access);
31742      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2122, (Is_Empty => True));
31743   end Initialize_2122;
31744
31745   ---------------------
31746   -- Initialize_2123 --
31747   ---------------------
31748
31749   procedure Initialize_2123 is
31750   begin
31751      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31752       (Base + 2123,
31753        AMF.Internals.Tables.UML_String_Data_00.MS_009E'Access);
31754   end Initialize_2123;
31755
31756   ---------------------
31757   -- Initialize_2124 --
31758   ---------------------
31759
31760   procedure Initialize_2124 is
31761   begin
31762      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2124, (Is_Empty => True));
31763   end Initialize_2124;
31764
31765   ---------------------
31766   -- Initialize_2125 --
31767   ---------------------
31768
31769   procedure Initialize_2125 is
31770   begin
31771      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
31772       (Base + 2125,
31773        AMF.Internals.Tables.UML_String_Data_0A.MS_0AE9'Access);
31774      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2125, (Is_Empty => True));
31775   end Initialize_2125;
31776
31777   ---------------------
31778   -- Initialize_2126 --
31779   ---------------------
31780
31781   procedure Initialize_2126 is
31782   begin
31783      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31784       (Base + 2126,
31785        AMF.Internals.Tables.UML_String_Data_02.MS_02C1'Access);
31786   end Initialize_2126;
31787
31788   ---------------------
31789   -- Initialize_2127 --
31790   ---------------------
31791
31792   procedure Initialize_2127 is
31793   begin
31794      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2127, (Is_Empty => True));
31795   end Initialize_2127;
31796
31797   ---------------------
31798   -- Initialize_2128 --
31799   ---------------------
31800
31801   procedure Initialize_2128 is
31802   begin
31803      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31804       (Base + 2128,
31805        AMF.Internals.Tables.UML_String_Data_09.MS_093C'Access);
31806   end Initialize_2128;
31807
31808   ---------------------
31809   -- Initialize_2129 --
31810   ---------------------
31811
31812   procedure Initialize_2129 is
31813   begin
31814      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31815       (Base + 2129,
31816        AMF.Internals.Tables.UML_String_Data_05.MS_0521'Access);
31817   end Initialize_2129;
31818
31819   ---------------------
31820   -- Initialize_2130 --
31821   ---------------------
31822
31823   procedure Initialize_2130 is
31824   begin
31825      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31826       (Base + 2130,
31827        AMF.Internals.Tables.UML_String_Data_0B.MS_0B3D'Access);
31828   end Initialize_2130;
31829
31830   ---------------------
31831   -- Initialize_2131 --
31832   ---------------------
31833
31834   procedure Initialize_2131 is
31835   begin
31836      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
31837       (Base + 2131,
31838        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD3'Access);
31839      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2131, (Is_Empty => True));
31840   end Initialize_2131;
31841
31842   ---------------------
31843   -- Initialize_2132 --
31844   ---------------------
31845
31846   procedure Initialize_2132 is
31847   begin
31848      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31849       (Base + 2132,
31850        AMF.Internals.Tables.UML_String_Data_0A.MS_0A56'Access);
31851   end Initialize_2132;
31852
31853   ---------------------
31854   -- Initialize_2133 --
31855   ---------------------
31856
31857   procedure Initialize_2133 is
31858   begin
31859      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2133, (Is_Empty => True));
31860   end Initialize_2133;
31861
31862   ---------------------
31863   -- Initialize_2134 --
31864   ---------------------
31865
31866   procedure Initialize_2134 is
31867   begin
31868      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
31869       (Base + 2134,
31870        AMF.Internals.Tables.UML_String_Data_04.MS_04D9'Access);
31871      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2134, (Is_Empty => True));
31872   end Initialize_2134;
31873
31874   ---------------------
31875   -- Initialize_2135 --
31876   ---------------------
31877
31878   procedure Initialize_2135 is
31879   begin
31880      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31881       (Base + 2135,
31882        AMF.Internals.Tables.UML_String_Data_06.MS_06DF'Access);
31883   end Initialize_2135;
31884
31885   ---------------------
31886   -- Initialize_2136 --
31887   ---------------------
31888
31889   procedure Initialize_2136 is
31890   begin
31891      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2136, (Is_Empty => True));
31892   end Initialize_2136;
31893
31894   ---------------------
31895   -- Initialize_2137 --
31896   ---------------------
31897
31898   procedure Initialize_2137 is
31899   begin
31900      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31901       (Base + 2137,
31902        AMF.Internals.Tables.UML_String_Data_01.MS_01A2'Access);
31903   end Initialize_2137;
31904
31905   ---------------------
31906   -- Initialize_2138 --
31907   ---------------------
31908
31909   procedure Initialize_2138 is
31910   begin
31911      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31912       (Base + 2138,
31913        AMF.Internals.Tables.UML_String_Data_06.MS_0629'Access);
31914   end Initialize_2138;
31915
31916   ---------------------
31917   -- Initialize_2139 --
31918   ---------------------
31919
31920   procedure Initialize_2139 is
31921   begin
31922      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31923       (Base + 2139,
31924        AMF.Internals.Tables.UML_String_Data_09.MS_0936'Access);
31925   end Initialize_2139;
31926
31927   ---------------------
31928   -- Initialize_2140 --
31929   ---------------------
31930
31931   procedure Initialize_2140 is
31932   begin
31933      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31934       (Base + 2140,
31935        AMF.Internals.Tables.UML_String_Data_05.MS_05AE'Access);
31936   end Initialize_2140;
31937
31938   ---------------------
31939   -- Initialize_2141 --
31940   ---------------------
31941
31942   procedure Initialize_2141 is
31943   begin
31944      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31945       (Base + 2141,
31946        AMF.Internals.Tables.UML_String_Data_0B.MS_0B05'Access);
31947   end Initialize_2141;
31948
31949   ---------------------
31950   -- Initialize_2142 --
31951   ---------------------
31952
31953   procedure Initialize_2142 is
31954   begin
31955      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
31956       (Base + 2142,
31957        AMF.Internals.Tables.UML_String_Data_00.MS_0065'Access);
31958      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2142, (Is_Empty => True));
31959   end Initialize_2142;
31960
31961   ---------------------
31962   -- Initialize_2143 --
31963   ---------------------
31964
31965   procedure Initialize_2143 is
31966   begin
31967      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
31968       (Base + 2143,
31969        AMF.Internals.Tables.UML_String_Data_06.MS_06F4'Access);
31970   end Initialize_2143;
31971
31972   ---------------------
31973   -- Initialize_2144 --
31974   ---------------------
31975
31976   procedure Initialize_2144 is
31977   begin
31978      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2144, (Is_Empty => True));
31979   end Initialize_2144;
31980
31981   ---------------------
31982   -- Initialize_2145 --
31983   ---------------------
31984
31985   procedure Initialize_2145 is
31986   begin
31987      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
31988       (Base + 2145,
31989        AMF.Internals.Tables.UML_String_Data_05.MS_05F3'Access);
31990      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2145, (Is_Empty => True));
31991   end Initialize_2145;
31992
31993   ---------------------
31994   -- Initialize_2146 --
31995   ---------------------
31996
31997   procedure Initialize_2146 is
31998   begin
31999      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32000       (Base + 2146,
32001        AMF.Internals.Tables.UML_String_Data_0A.MS_0A89'Access);
32002   end Initialize_2146;
32003
32004   ---------------------
32005   -- Initialize_2147 --
32006   ---------------------
32007
32008   procedure Initialize_2147 is
32009   begin
32010      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2147, (Is_Empty => True));
32011   end Initialize_2147;
32012
32013   ---------------------
32014   -- Initialize_2148 --
32015   ---------------------
32016
32017   procedure Initialize_2148 is
32018   begin
32019      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
32020       (Base + 2148,
32021        AMF.Internals.Tables.UML_String_Data_08.MS_08F9'Access);
32022      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2148, (Is_Empty => True));
32023   end Initialize_2148;
32024
32025   ---------------------
32026   -- Initialize_2149 --
32027   ---------------------
32028
32029   procedure Initialize_2149 is
32030   begin
32031      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32032       (Base + 2149,
32033        AMF.Internals.Tables.UML_String_Data_04.MS_0482'Access);
32034   end Initialize_2149;
32035
32036   ---------------------
32037   -- Initialize_2150 --
32038   ---------------------
32039
32040   procedure Initialize_2150 is
32041   begin
32042      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2150, (Is_Empty => True));
32043   end Initialize_2150;
32044
32045   ---------------------
32046   -- Initialize_2151 --
32047   ---------------------
32048
32049   procedure Initialize_2151 is
32050   begin
32051      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32052       (Base + 2151,
32053        AMF.Internals.Tables.UML_String_Data_06.MS_06A2'Access);
32054   end Initialize_2151;
32055
32056   ---------------------
32057   -- Initialize_2152 --
32058   ---------------------
32059
32060   procedure Initialize_2152 is
32061   begin
32062      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32063       (Base + 2152,
32064        AMF.Internals.Tables.UML_String_Data_02.MS_02F3'Access);
32065   end Initialize_2152;
32066
32067   ---------------------
32068   -- Initialize_2153 --
32069   ---------------------
32070
32071   procedure Initialize_2153 is
32072   begin
32073      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32074       (Base + 2153,
32075        AMF.Internals.Tables.UML_String_Data_0B.MS_0BE1'Access);
32076   end Initialize_2153;
32077
32078   ---------------------
32079   -- Initialize_2154 --
32080   ---------------------
32081
32082   procedure Initialize_2154 is
32083   begin
32084      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
32085       (Base + 2154,
32086        AMF.Internals.Tables.UML_String_Data_02.MS_0291'Access);
32087      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2154, (Is_Empty => True));
32088   end Initialize_2154;
32089
32090   ---------------------
32091   -- Initialize_2155 --
32092   ---------------------
32093
32094   procedure Initialize_2155 is
32095   begin
32096      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32097       (Base + 2155,
32098        AMF.Internals.Tables.UML_String_Data_0C.MS_0C69'Access);
32099   end Initialize_2155;
32100
32101   ---------------------
32102   -- Initialize_2156 --
32103   ---------------------
32104
32105   procedure Initialize_2156 is
32106   begin
32107      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2156, (Is_Empty => True));
32108   end Initialize_2156;
32109
32110   ---------------------
32111   -- Initialize_2157 --
32112   ---------------------
32113
32114   procedure Initialize_2157 is
32115   begin
32116      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
32117       (Base + 2157,
32118        AMF.Internals.Tables.UML_String_Data_08.MS_0832'Access);
32119      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2157, (Is_Empty => True));
32120   end Initialize_2157;
32121
32122   ---------------------
32123   -- Initialize_2158 --
32124   ---------------------
32125
32126   procedure Initialize_2158 is
32127   begin
32128      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32129       (Base + 2158,
32130        AMF.Internals.Tables.UML_String_Data_03.MS_03F8'Access);
32131   end Initialize_2158;
32132
32133   ---------------------
32134   -- Initialize_2159 --
32135   ---------------------
32136
32137   procedure Initialize_2159 is
32138   begin
32139      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2159, (Is_Empty => True));
32140   end Initialize_2159;
32141
32142   ---------------------
32143   -- Initialize_2160 --
32144   ---------------------
32145
32146   procedure Initialize_2160 is
32147   begin
32148      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
32149       (Base + 2160,
32150        AMF.Internals.Tables.UML_String_Data_00.MS_0069'Access);
32151      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2160, (Is_Empty => True));
32152   end Initialize_2160;
32153
32154   ---------------------
32155   -- Initialize_2161 --
32156   ---------------------
32157
32158   procedure Initialize_2161 is
32159   begin
32160      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32161       (Base + 2161,
32162        AMF.Internals.Tables.UML_String_Data_04.MS_043E'Access);
32163   end Initialize_2161;
32164
32165   ---------------------
32166   -- Initialize_2162 --
32167   ---------------------
32168
32169   procedure Initialize_2162 is
32170   begin
32171      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2162, (Is_Empty => True));
32172   end Initialize_2162;
32173
32174   ---------------------
32175   -- Initialize_2163 --
32176   ---------------------
32177
32178   procedure Initialize_2163 is
32179   begin
32180      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
32181       (Base + 2163,
32182        AMF.Internals.Tables.UML_String_Data_07.MS_07C6'Access);
32183      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2163, (Is_Empty => True));
32184   end Initialize_2163;
32185
32186   ---------------------
32187   -- Initialize_2164 --
32188   ---------------------
32189
32190   procedure Initialize_2164 is
32191   begin
32192      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32193       (Base + 2164,
32194        AMF.Internals.Tables.UML_String_Data_09.MS_09BA'Access);
32195   end Initialize_2164;
32196
32197   ---------------------
32198   -- Initialize_2165 --
32199   ---------------------
32200
32201   procedure Initialize_2165 is
32202   begin
32203      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2165, (Is_Empty => True));
32204   end Initialize_2165;
32205
32206   ---------------------
32207   -- Initialize_2166 --
32208   ---------------------
32209
32210   procedure Initialize_2166 is
32211   begin
32212      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32213       (Base + 2166,
32214        AMF.Internals.Tables.UML_String_Data_08.MS_08E5'Access);
32215   end Initialize_2166;
32216
32217   ---------------------
32218   -- Initialize_2167 --
32219   ---------------------
32220
32221   procedure Initialize_2167 is
32222   begin
32223      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32224       (Base + 2167,
32225        AMF.Internals.Tables.UML_String_Data_02.MS_023F'Access);
32226   end Initialize_2167;
32227
32228   ---------------------
32229   -- Initialize_2168 --
32230   ---------------------
32231
32232   procedure Initialize_2168 is
32233   begin
32234      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32235       (Base + 2168,
32236        AMF.Internals.Tables.UML_String_Data_07.MS_0725'Access);
32237   end Initialize_2168;
32238
32239   ---------------------
32240   -- Initialize_2169 --
32241   ---------------------
32242
32243   procedure Initialize_2169 is
32244   begin
32245      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32246       (Base + 2169,
32247        AMF.Internals.Tables.UML_String_Data_03.MS_032C'Access);
32248   end Initialize_2169;
32249
32250   ---------------------
32251   -- Initialize_2170 --
32252   ---------------------
32253
32254   procedure Initialize_2170 is
32255   begin
32256      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32257       (Base + 2170,
32258        AMF.Internals.Tables.UML_String_Data_06.MS_067E'Access);
32259   end Initialize_2170;
32260
32261   ---------------------
32262   -- Initialize_2171 --
32263   ---------------------
32264
32265   procedure Initialize_2171 is
32266   begin
32267      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32268       (Base + 2171,
32269        AMF.Internals.Tables.UML_String_Data_02.MS_024B'Access);
32270   end Initialize_2171;
32271
32272   ---------------------
32273   -- Initialize_2172 --
32274   ---------------------
32275
32276   procedure Initialize_2172 is
32277   begin
32278      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32279       (Base + 2172,
32280        AMF.Internals.Tables.UML_String_Data_09.MS_09DF'Access);
32281   end Initialize_2172;
32282
32283   ---------------------
32284   -- Initialize_2173 --
32285   ---------------------
32286
32287   procedure Initialize_2173 is
32288   begin
32289      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
32290       (Base + 2173,
32291        AMF.Internals.Tables.UML_String_Data_09.MS_09D1'Access);
32292      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2173, (Is_Empty => True));
32293   end Initialize_2173;
32294
32295   ---------------------
32296   -- Initialize_2174 --
32297   ---------------------
32298
32299   procedure Initialize_2174 is
32300   begin
32301      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32302       (Base + 2174,
32303        AMF.Internals.Tables.UML_String_Data_0B.MS_0B71'Access);
32304   end Initialize_2174;
32305
32306   ---------------------
32307   -- Initialize_2175 --
32308   ---------------------
32309
32310   procedure Initialize_2175 is
32311   begin
32312      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2175, (Is_Empty => True));
32313   end Initialize_2175;
32314
32315   ---------------------
32316   -- Initialize_2176 --
32317   ---------------------
32318
32319   procedure Initialize_2176 is
32320   begin
32321      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32322       (Base + 2176,
32323        AMF.Internals.Tables.UML_String_Data_07.MS_072F'Access);
32324   end Initialize_2176;
32325
32326   ---------------------
32327   -- Initialize_2177 --
32328   ---------------------
32329
32330   procedure Initialize_2177 is
32331   begin
32332      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32333       (Base + 2177,
32334        AMF.Internals.Tables.UML_String_Data_07.MS_07D2'Access);
32335   end Initialize_2177;
32336
32337   ---------------------
32338   -- Initialize_2178 --
32339   ---------------------
32340
32341   procedure Initialize_2178 is
32342   begin
32343      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
32344       (Base + 2178,
32345        AMF.Internals.Tables.UML_String_Data_04.MS_049A'Access);
32346      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2178, (Is_Empty => True));
32347   end Initialize_2178;
32348
32349   ---------------------
32350   -- Initialize_2179 --
32351   ---------------------
32352
32353   procedure Initialize_2179 is
32354   begin
32355      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32356       (Base + 2179,
32357        AMF.Internals.Tables.UML_String_Data_05.MS_05B3'Access);
32358   end Initialize_2179;
32359
32360   ---------------------
32361   -- Initialize_2180 --
32362   ---------------------
32363
32364   procedure Initialize_2180 is
32365   begin
32366      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2180, (Is_Empty => True));
32367   end Initialize_2180;
32368
32369   ---------------------
32370   -- Initialize_2181 --
32371   ---------------------
32372
32373   procedure Initialize_2181 is
32374   begin
32375      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
32376       (Base + 2181,
32377        AMF.Internals.Tables.UML_String_Data_00.MS_0017'Access);
32378      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2181, (Is_Empty => True));
32379   end Initialize_2181;
32380
32381   ---------------------
32382   -- Initialize_2182 --
32383   ---------------------
32384
32385   procedure Initialize_2182 is
32386   begin
32387      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32388       (Base + 2182,
32389        AMF.Internals.Tables.UML_String_Data_01.MS_01E5'Access);
32390   end Initialize_2182;
32391
32392   ---------------------
32393   -- Initialize_2183 --
32394   ---------------------
32395
32396   procedure Initialize_2183 is
32397   begin
32398      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2183, (Is_Empty => True));
32399   end Initialize_2183;
32400
32401   ---------------------
32402   -- Initialize_2184 --
32403   ---------------------
32404
32405   procedure Initialize_2184 is
32406   begin
32407      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32408       (Base + 2184,
32409        AMF.Internals.Tables.UML_String_Data_08.MS_0814'Access);
32410   end Initialize_2184;
32411
32412   ---------------------
32413   -- Initialize_2185 --
32414   ---------------------
32415
32416   procedure Initialize_2185 is
32417   begin
32418      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32419       (Base + 2185,
32420        AMF.Internals.Tables.UML_String_Data_01.MS_01AE'Access);
32421   end Initialize_2185;
32422
32423   ---------------------
32424   -- Initialize_2186 --
32425   ---------------------
32426
32427   procedure Initialize_2186 is
32428   begin
32429      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32430       (Base + 2186,
32431        AMF.Internals.Tables.UML_String_Data_09.MS_092E'Access);
32432   end Initialize_2186;
32433
32434   ---------------------
32435   -- Initialize_2187 --
32436   ---------------------
32437
32438   procedure Initialize_2187 is
32439   begin
32440      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32441       (Base + 2187,
32442        AMF.Internals.Tables.UML_String_Data_00.MS_005C'Access);
32443   end Initialize_2187;
32444
32445   ---------------------
32446   -- Initialize_2188 --
32447   ---------------------
32448
32449   procedure Initialize_2188 is
32450   begin
32451      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32452       (Base + 2188,
32453        AMF.Internals.Tables.UML_String_Data_00.MS_000F'Access);
32454   end Initialize_2188;
32455
32456   ---------------------
32457   -- Initialize_2189 --
32458   ---------------------
32459
32460   procedure Initialize_2189 is
32461   begin
32462      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2189, True);
32463      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
32464       (Base + 2189,
32465        AMF.Internals.Tables.UML_String_Data_0B.MS_0B2C'Access);
32466      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2189, (False, AMF.CMOF.Public_Visibility));
32467   end Initialize_2189;
32468
32469   ---------------------
32470   -- Initialize_2190 --
32471   ---------------------
32472
32473   procedure Initialize_2190 is
32474   begin
32475      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32476       (Base + 2190,
32477        AMF.Internals.Tables.UML_String_Data_04.MS_0483'Access);
32478   end Initialize_2190;
32479
32480   ---------------------
32481   -- Initialize_2191 --
32482   ---------------------
32483
32484   procedure Initialize_2191 is
32485   begin
32486      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
32487       (Base + 2191,
32488        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
32489      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2191, (Is_Empty => True));
32490   end Initialize_2191;
32491
32492   ---------------------
32493   -- Initialize_2192 --
32494   ---------------------
32495
32496   procedure Initialize_2192 is
32497   begin
32498      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2192, (Is_Empty => True));
32499   end Initialize_2192;
32500
32501   ---------------------
32502   -- Initialize_2193 --
32503   ---------------------
32504
32505   procedure Initialize_2193 is
32506   begin
32507      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2193, AMF.CMOF.Return_Parameter);
32508      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 2193, (False, 0));
32509      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
32510       (Base + 2193,
32511        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
32512      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 2193, (False, (Unlimited => True)));
32513      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2193, (False, AMF.CMOF.Public_Visibility));
32514   end Initialize_2193;
32515
32516   ---------------------
32517   -- Initialize_2194 --
32518   ---------------------
32519
32520   procedure Initialize_2194 is
32521   begin
32522      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2194, True);
32523      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
32524       (Base + 2194,
32525        AMF.Internals.Tables.UML_String_Data_09.MS_09EC'Access);
32526      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2194, (False, AMF.CMOF.Public_Visibility));
32527   end Initialize_2194;
32528
32529   ---------------------
32530   -- Initialize_2195 --
32531   ---------------------
32532
32533   procedure Initialize_2195 is
32534   begin
32535      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32536       (Base + 2195,
32537        AMF.Internals.Tables.UML_String_Data_09.MS_09DE'Access);
32538   end Initialize_2195;
32539
32540   ---------------------
32541   -- Initialize_2196 --
32542   ---------------------
32543
32544   procedure Initialize_2196 is
32545   begin
32546      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
32547       (Base + 2196,
32548        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
32549      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2196, (Is_Empty => True));
32550   end Initialize_2196;
32551
32552   ---------------------
32553   -- Initialize_2197 --
32554   ---------------------
32555
32556   procedure Initialize_2197 is
32557   begin
32558      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2197, (Is_Empty => True));
32559   end Initialize_2197;
32560
32561   ---------------------
32562   -- Initialize_2198 --
32563   ---------------------
32564
32565   procedure Initialize_2198 is
32566   begin
32567      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2198, AMF.CMOF.Return_Parameter);
32568      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 2198, (False, 0));
32569      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
32570       (Base + 2198,
32571        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
32572      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 2198, (False, (Unlimited => True)));
32573      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2198, (False, AMF.CMOF.Public_Visibility));
32574   end Initialize_2198;
32575
32576   ---------------------
32577   -- Initialize_2199 --
32578   ---------------------
32579
32580   procedure Initialize_2199 is
32581   begin
32582      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2199, AMF.CMOF.In_Parameter);
32583      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
32584       (Base + 2199,
32585        AMF.Internals.Tables.UML_String_Data_03.MS_0321'Access);
32586      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2199, (False, AMF.CMOF.Public_Visibility));
32587   end Initialize_2199;
32588
32589   ---------------------
32590   -- Initialize_2200 --
32591   ---------------------
32592
32593   procedure Initialize_2200 is
32594   begin
32595      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2200, True);
32596      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
32597       (Base + 2200,
32598        AMF.Internals.Tables.UML_String_Data_01.MS_0108'Access);
32599      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2200, (False, AMF.CMOF.Public_Visibility));
32600   end Initialize_2200;
32601
32602   ---------------------
32603   -- Initialize_2201 --
32604   ---------------------
32605
32606   procedure Initialize_2201 is
32607   begin
32608      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32609       (Base + 2201,
32610        AMF.Internals.Tables.UML_String_Data_0B.MS_0B0B'Access);
32611   end Initialize_2201;
32612
32613   ---------------------
32614   -- Initialize_2202 --
32615   ---------------------
32616
32617   procedure Initialize_2202 is
32618   begin
32619      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
32620       (Base + 2202,
32621        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
32622      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2202, (Is_Empty => True));
32623   end Initialize_2202;
32624
32625   ---------------------
32626   -- Initialize_2203 --
32627   ---------------------
32628
32629   procedure Initialize_2203 is
32630   begin
32631      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2203, (Is_Empty => True));
32632   end Initialize_2203;
32633
32634   ---------------------
32635   -- Initialize_2204 --
32636   ---------------------
32637
32638   procedure Initialize_2204 is
32639   begin
32640      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2204, AMF.CMOF.Return_Parameter);
32641      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 2204, (False, 0));
32642      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
32643       (Base + 2204,
32644        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
32645      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 2204, (False, (Unlimited => True)));
32646      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2204, (False, AMF.CMOF.Public_Visibility));
32647   end Initialize_2204;
32648
32649   ---------------------
32650   -- Initialize_2205 --
32651   ---------------------
32652
32653   procedure Initialize_2205 is
32654   begin
32655      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2205, True);
32656      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
32657       (Base + 2205,
32658        AMF.Internals.Tables.UML_String_Data_08.MS_0849'Access);
32659      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2205, (False, AMF.CMOF.Public_Visibility));
32660   end Initialize_2205;
32661
32662   ---------------------
32663   -- Initialize_2206 --
32664   ---------------------
32665
32666   procedure Initialize_2206 is
32667   begin
32668      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32669       (Base + 2206,
32670        AMF.Internals.Tables.UML_String_Data_07.MS_0764'Access);
32671   end Initialize_2206;
32672
32673   ---------------------
32674   -- Initialize_2207 --
32675   ---------------------
32676
32677   procedure Initialize_2207 is
32678   begin
32679      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
32680       (Base + 2207,
32681        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
32682      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2207, (Is_Empty => True));
32683   end Initialize_2207;
32684
32685   ---------------------
32686   -- Initialize_2208 --
32687   ---------------------
32688
32689   procedure Initialize_2208 is
32690   begin
32691      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2208, (Is_Empty => True));
32692   end Initialize_2208;
32693
32694   ---------------------
32695   -- Initialize_2209 --
32696   ---------------------
32697
32698   procedure Initialize_2209 is
32699   begin
32700      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2209, AMF.CMOF.Return_Parameter);
32701      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 2209, (False, 0));
32702      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
32703       (Base + 2209,
32704        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
32705      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 2209, (False, (Unlimited => True)));
32706      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2209, (False, AMF.CMOF.Public_Visibility));
32707   end Initialize_2209;
32708
32709   ---------------------
32710   -- Initialize_2210 --
32711   ---------------------
32712
32713   procedure Initialize_2210 is
32714   begin
32715      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2210, AMF.CMOF.In_Parameter);
32716      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
32717       (Base + 2210,
32718        AMF.Internals.Tables.UML_String_Data_03.MS_0321'Access);
32719      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2210, (False, AMF.CMOF.Public_Visibility));
32720   end Initialize_2210;
32721
32722   ---------------------
32723   -- Initialize_2211 --
32724   ---------------------
32725
32726   procedure Initialize_2211 is
32727   begin
32728      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32729       (Base + 2211,
32730        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD2'Access);
32731   end Initialize_2211;
32732
32733   ---------------------
32734   -- Initialize_2212 --
32735   ---------------------
32736
32737   procedure Initialize_2212 is
32738   begin
32739      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32740       (Base + 2212,
32741        AMF.Internals.Tables.UML_String_Data_06.MS_0609'Access);
32742   end Initialize_2212;
32743
32744   ---------------------
32745   -- Initialize_2213 --
32746   ---------------------
32747
32748   procedure Initialize_2213 is
32749   begin
32750      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32751       (Base + 2213,
32752        AMF.Internals.Tables.UML_String_Data_01.MS_01A9'Access);
32753   end Initialize_2213;
32754
32755   ---------------------
32756   -- Initialize_2214 --
32757   ---------------------
32758
32759   procedure Initialize_2214 is
32760   begin
32761      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32762       (Base + 2214,
32763        AMF.Internals.Tables.UML_String_Data_0C.MS_0C38'Access);
32764   end Initialize_2214;
32765
32766   ---------------------
32767   -- Initialize_2215 --
32768   ---------------------
32769
32770   procedure Initialize_2215 is
32771   begin
32772      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
32773       (Base + 2215,
32774        AMF.Internals.Tables.UML_String_Data_05.MS_0549'Access);
32775      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2215, (Is_Empty => True));
32776   end Initialize_2215;
32777
32778   ---------------------
32779   -- Initialize_2216 --
32780   ---------------------
32781
32782   procedure Initialize_2216 is
32783   begin
32784      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32785       (Base + 2216,
32786        AMF.Internals.Tables.UML_String_Data_00.MS_0025'Access);
32787   end Initialize_2216;
32788
32789   ---------------------
32790   -- Initialize_2217 --
32791   ---------------------
32792
32793   procedure Initialize_2217 is
32794   begin
32795      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2217, (Is_Empty => True));
32796   end Initialize_2217;
32797
32798   ---------------------
32799   -- Initialize_2218 --
32800   ---------------------
32801
32802   procedure Initialize_2218 is
32803   begin
32804      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
32805       (Base + 2218,
32806        AMF.Internals.Tables.UML_String_Data_08.MS_0864'Access);
32807      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2218, (Is_Empty => True));
32808   end Initialize_2218;
32809
32810   ---------------------
32811   -- Initialize_2219 --
32812   ---------------------
32813
32814   procedure Initialize_2219 is
32815   begin
32816      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32817       (Base + 2219,
32818        AMF.Internals.Tables.UML_String_Data_0A.MS_0ADC'Access);
32819   end Initialize_2219;
32820
32821   ---------------------
32822   -- Initialize_2220 --
32823   ---------------------
32824
32825   procedure Initialize_2220 is
32826   begin
32827      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2220, (Is_Empty => True));
32828   end Initialize_2220;
32829
32830   ---------------------
32831   -- Initialize_2221 --
32832   ---------------------
32833
32834   procedure Initialize_2221 is
32835   begin
32836      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
32837       (Base + 2221,
32838        AMF.Internals.Tables.UML_String_Data_04.MS_0452'Access);
32839      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2221, (Is_Empty => True));
32840   end Initialize_2221;
32841
32842   ---------------------
32843   -- Initialize_2222 --
32844   ---------------------
32845
32846   procedure Initialize_2222 is
32847   begin
32848      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32849       (Base + 2222,
32850        AMF.Internals.Tables.UML_String_Data_02.MS_0235'Access);
32851   end Initialize_2222;
32852
32853   ---------------------
32854   -- Initialize_2223 --
32855   ---------------------
32856
32857   procedure Initialize_2223 is
32858   begin
32859      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2223, (Is_Empty => True));
32860   end Initialize_2223;
32861
32862   ---------------------
32863   -- Initialize_2224 --
32864   ---------------------
32865
32866   procedure Initialize_2224 is
32867   begin
32868      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
32869       (Base + 2224,
32870        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD5'Access);
32871      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2224, (Is_Empty => True));
32872   end Initialize_2224;
32873
32874   ---------------------
32875   -- Initialize_2225 --
32876   ---------------------
32877
32878   procedure Initialize_2225 is
32879   begin
32880      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32881       (Base + 2225,
32882        AMF.Internals.Tables.UML_String_Data_04.MS_0409'Access);
32883   end Initialize_2225;
32884
32885   ---------------------
32886   -- Initialize_2226 --
32887   ---------------------
32888
32889   procedure Initialize_2226 is
32890   begin
32891      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2226, (Is_Empty => True));
32892   end Initialize_2226;
32893
32894   ---------------------
32895   -- Initialize_2227 --
32896   ---------------------
32897
32898   procedure Initialize_2227 is
32899   begin
32900      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
32901       (Base + 2227,
32902        AMF.Internals.Tables.UML_String_Data_01.MS_01D5'Access);
32903      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2227, (Is_Empty => True));
32904   end Initialize_2227;
32905
32906   ---------------------
32907   -- Initialize_2228 --
32908   ---------------------
32909
32910   procedure Initialize_2228 is
32911   begin
32912      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32913       (Base + 2228,
32914        AMF.Internals.Tables.UML_String_Data_03.MS_03CC'Access);
32915   end Initialize_2228;
32916
32917   ---------------------
32918   -- Initialize_2229 --
32919   ---------------------
32920
32921   procedure Initialize_2229 is
32922   begin
32923      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2229, (Is_Empty => True));
32924   end Initialize_2229;
32925
32926   ---------------------
32927   -- Initialize_2230 --
32928   ---------------------
32929
32930   procedure Initialize_2230 is
32931   begin
32932      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
32933       (Base + 2230,
32934        AMF.Internals.Tables.UML_String_Data_0C.MS_0C7D'Access);
32935      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2230, (Is_Empty => True));
32936   end Initialize_2230;
32937
32938   ---------------------
32939   -- Initialize_2231 --
32940   ---------------------
32941
32942   procedure Initialize_2231 is
32943   begin
32944      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32945       (Base + 2231,
32946        AMF.Internals.Tables.UML_String_Data_04.MS_0461'Access);
32947   end Initialize_2231;
32948
32949   ---------------------
32950   -- Initialize_2232 --
32951   ---------------------
32952
32953   procedure Initialize_2232 is
32954   begin
32955      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2232, (Is_Empty => True));
32956   end Initialize_2232;
32957
32958   ---------------------
32959   -- Initialize_2233 --
32960   ---------------------
32961
32962   procedure Initialize_2233 is
32963   begin
32964      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32965       (Base + 2233,
32966        AMF.Internals.Tables.UML_String_Data_03.MS_0390'Access);
32967   end Initialize_2233;
32968
32969   ---------------------
32970   -- Initialize_2234 --
32971   ---------------------
32972
32973   procedure Initialize_2234 is
32974   begin
32975      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32976       (Base + 2234,
32977        AMF.Internals.Tables.UML_String_Data_02.MS_02AD'Access);
32978   end Initialize_2234;
32979
32980   ---------------------
32981   -- Initialize_2235 --
32982   ---------------------
32983
32984   procedure Initialize_2235 is
32985   begin
32986      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32987       (Base + 2235,
32988        AMF.Internals.Tables.UML_String_Data_02.MS_0299'Access);
32989   end Initialize_2235;
32990
32991   ---------------------
32992   -- Initialize_2236 --
32993   ---------------------
32994
32995   procedure Initialize_2236 is
32996   begin
32997      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
32998       (Base + 2236,
32999        AMF.Internals.Tables.UML_String_Data_07.MS_0740'Access);
33000   end Initialize_2236;
33001
33002   ---------------------
33003   -- Initialize_2237 --
33004   ---------------------
33005
33006   procedure Initialize_2237 is
33007   begin
33008      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33009       (Base + 2237,
33010        AMF.Internals.Tables.UML_String_Data_09.MS_0949'Access);
33011   end Initialize_2237;
33012
33013   ---------------------
33014   -- Initialize_2238 --
33015   ---------------------
33016
33017   procedure Initialize_2238 is
33018   begin
33019      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33020       (Base + 2238,
33021        AMF.Internals.Tables.UML_String_Data_01.MS_01DE'Access);
33022   end Initialize_2238;
33023
33024   ---------------------
33025   -- Initialize_2239 --
33026   ---------------------
33027
33028   procedure Initialize_2239 is
33029   begin
33030      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33031       (Base + 2239,
33032        AMF.Internals.Tables.UML_String_Data_02.MS_0211'Access);
33033   end Initialize_2239;
33034
33035   ---------------------
33036   -- Initialize_2240 --
33037   ---------------------
33038
33039   procedure Initialize_2240 is
33040   begin
33041      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33042       (Base + 2240,
33043        AMF.Internals.Tables.UML_String_Data_06.MS_06C3'Access);
33044   end Initialize_2240;
33045
33046   ---------------------
33047   -- Initialize_2241 --
33048   ---------------------
33049
33050   procedure Initialize_2241 is
33051   begin
33052      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2241, True);
33053      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
33054       (Base + 2241,
33055        AMF.Internals.Tables.UML_String_Data_02.MS_0277'Access);
33056      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2241, (False, AMF.CMOF.Public_Visibility));
33057   end Initialize_2241;
33058
33059   ---------------------
33060   -- Initialize_2242 --
33061   ---------------------
33062
33063   procedure Initialize_2242 is
33064   begin
33065      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33066       (Base + 2242,
33067        AMF.Internals.Tables.UML_String_Data_04.MS_0414'Access);
33068   end Initialize_2242;
33069
33070   ---------------------
33071   -- Initialize_2243 --
33072   ---------------------
33073
33074   procedure Initialize_2243 is
33075   begin
33076      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
33077       (Base + 2243,
33078        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
33079      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2243, (Is_Empty => True));
33080   end Initialize_2243;
33081
33082   ---------------------
33083   -- Initialize_2244 --
33084   ---------------------
33085
33086   procedure Initialize_2244 is
33087   begin
33088      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2244, (Is_Empty => True));
33089   end Initialize_2244;
33090
33091   ---------------------
33092   -- Initialize_2245 --
33093   ---------------------
33094
33095   procedure Initialize_2245 is
33096   begin
33097      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2245, AMF.CMOF.Return_Parameter);
33098      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 2245, (False, 0));
33099      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
33100       (Base + 2245,
33101        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
33102      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 2245, (False, (Unlimited => True)));
33103      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2245, (False, AMF.CMOF.Public_Visibility));
33104   end Initialize_2245;
33105
33106   ---------------------
33107   -- Initialize_2246 --
33108   ---------------------
33109
33110   procedure Initialize_2246 is
33111   begin
33112      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33113       (Base + 2246,
33114        AMF.Internals.Tables.UML_String_Data_02.MS_0216'Access);
33115   end Initialize_2246;
33116
33117   ---------------------
33118   -- Initialize_2247 --
33119   ---------------------
33120
33121   procedure Initialize_2247 is
33122   begin
33123      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33124       (Base + 2247,
33125        AMF.Internals.Tables.UML_String_Data_03.MS_0340'Access);
33126   end Initialize_2247;
33127
33128   ---------------------
33129   -- Initialize_2248 --
33130   ---------------------
33131
33132   procedure Initialize_2248 is
33133   begin
33134      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33135       (Base + 2248,
33136        AMF.Internals.Tables.UML_String_Data_09.MS_0905'Access);
33137   end Initialize_2248;
33138
33139   ---------------------
33140   -- Initialize_2249 --
33141   ---------------------
33142
33143   procedure Initialize_2249 is
33144   begin
33145      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
33146       (Base + 2249,
33147        AMF.Internals.Tables.UML_String_Data_03.MS_0386'Access);
33148      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2249, (Is_Empty => True));
33149   end Initialize_2249;
33150
33151   ---------------------
33152   -- Initialize_2250 --
33153   ---------------------
33154
33155   procedure Initialize_2250 is
33156   begin
33157      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33158       (Base + 2250,
33159        AMF.Internals.Tables.UML_String_Data_02.MS_0227'Access);
33160   end Initialize_2250;
33161
33162   ---------------------
33163   -- Initialize_2251 --
33164   ---------------------
33165
33166   procedure Initialize_2251 is
33167   begin
33168      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2251, (Is_Empty => True));
33169   end Initialize_2251;
33170
33171   ---------------------
33172   -- Initialize_2252 --
33173   ---------------------
33174
33175   procedure Initialize_2252 is
33176   begin
33177      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
33178       (Base + 2252,
33179        AMF.Internals.Tables.UML_String_Data_0A.MS_0AD4'Access);
33180      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2252, (Is_Empty => True));
33181   end Initialize_2252;
33182
33183   ---------------------
33184   -- Initialize_2253 --
33185   ---------------------
33186
33187   procedure Initialize_2253 is
33188   begin
33189      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33190       (Base + 2253,
33191        AMF.Internals.Tables.UML_String_Data_0B.MS_0B86'Access);
33192   end Initialize_2253;
33193
33194   ---------------------
33195   -- Initialize_2254 --
33196   ---------------------
33197
33198   procedure Initialize_2254 is
33199   begin
33200      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2254, (Is_Empty => True));
33201   end Initialize_2254;
33202
33203   ---------------------
33204   -- Initialize_2255 --
33205   ---------------------
33206
33207   procedure Initialize_2255 is
33208   begin
33209      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33210       (Base + 2255,
33211        AMF.Internals.Tables.UML_String_Data_04.MS_04C2'Access);
33212   end Initialize_2255;
33213
33214   ---------------------
33215   -- Initialize_2256 --
33216   ---------------------
33217
33218   procedure Initialize_2256 is
33219   begin
33220      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33221       (Base + 2256,
33222        AMF.Internals.Tables.UML_String_Data_0C.MS_0C34'Access);
33223   end Initialize_2256;
33224
33225   ---------------------
33226   -- Initialize_2257 --
33227   ---------------------
33228
33229   procedure Initialize_2257 is
33230   begin
33231      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33232       (Base + 2257,
33233        AMF.Internals.Tables.UML_String_Data_00.MS_0043'Access);
33234   end Initialize_2257;
33235
33236   ---------------------
33237   -- Initialize_2258 --
33238   ---------------------
33239
33240   procedure Initialize_2258 is
33241   begin
33242      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33243       (Base + 2258,
33244        AMF.Internals.Tables.UML_String_Data_02.MS_0248'Access);
33245   end Initialize_2258;
33246
33247   ---------------------
33248   -- Initialize_2259 --
33249   ---------------------
33250
33251   procedure Initialize_2259 is
33252   begin
33253      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33254       (Base + 2259,
33255        AMF.Internals.Tables.UML_String_Data_03.MS_03DE'Access);
33256   end Initialize_2259;
33257
33258   ---------------------
33259   -- Initialize_2260 --
33260   ---------------------
33261
33262   procedure Initialize_2260 is
33263   begin
33264      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
33265       (Base + 2260,
33266        AMF.Internals.Tables.UML_String_Data_08.MS_08A3'Access);
33267      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2260, (Is_Empty => True));
33268   end Initialize_2260;
33269
33270   ---------------------
33271   -- Initialize_2261 --
33272   ---------------------
33273
33274   procedure Initialize_2261 is
33275   begin
33276      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33277       (Base + 2261,
33278        AMF.Internals.Tables.UML_String_Data_05.MS_0592'Access);
33279   end Initialize_2261;
33280
33281   ---------------------
33282   -- Initialize_2262 --
33283   ---------------------
33284
33285   procedure Initialize_2262 is
33286   begin
33287      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2262, (Is_Empty => True));
33288   end Initialize_2262;
33289
33290   ---------------------
33291   -- Initialize_2263 --
33292   ---------------------
33293
33294   procedure Initialize_2263 is
33295   begin
33296      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
33297       (Base + 2263,
33298        AMF.Internals.Tables.UML_String_Data_0A.MS_0A09'Access);
33299      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2263, (Is_Empty => True));
33300   end Initialize_2263;
33301
33302   ---------------------
33303   -- Initialize_2264 --
33304   ---------------------
33305
33306   procedure Initialize_2264 is
33307   begin
33308      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33309       (Base + 2264,
33310        AMF.Internals.Tables.UML_String_Data_05.MS_05E3'Access);
33311   end Initialize_2264;
33312
33313   ---------------------
33314   -- Initialize_2265 --
33315   ---------------------
33316
33317   procedure Initialize_2265 is
33318   begin
33319      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2265, (Is_Empty => True));
33320   end Initialize_2265;
33321
33322   ---------------------
33323   -- Initialize_2266 --
33324   ---------------------
33325
33326   procedure Initialize_2266 is
33327   begin
33328      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
33329       (Base + 2266,
33330        AMF.Internals.Tables.UML_String_Data_04.MS_046A'Access);
33331      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2266, (Is_Empty => True));
33332   end Initialize_2266;
33333
33334   ---------------------
33335   -- Initialize_2267 --
33336   ---------------------
33337
33338   procedure Initialize_2267 is
33339   begin
33340      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33341       (Base + 2267,
33342        AMF.Internals.Tables.UML_String_Data_05.MS_0532'Access);
33343   end Initialize_2267;
33344
33345   ---------------------
33346   -- Initialize_2268 --
33347   ---------------------
33348
33349   procedure Initialize_2268 is
33350   begin
33351      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2268, (Is_Empty => True));
33352   end Initialize_2268;
33353
33354   ---------------------
33355   -- Initialize_2269 --
33356   ---------------------
33357
33358   procedure Initialize_2269 is
33359   begin
33360      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
33361       (Base + 2269,
33362        AMF.Internals.Tables.UML_String_Data_04.MS_04FB'Access);
33363      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2269, (Is_Empty => True));
33364   end Initialize_2269;
33365
33366   ---------------------
33367   -- Initialize_2270 --
33368   ---------------------
33369
33370   procedure Initialize_2270 is
33371   begin
33372      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33373       (Base + 2270,
33374        AMF.Internals.Tables.UML_String_Data_09.MS_0917'Access);
33375   end Initialize_2270;
33376
33377   ---------------------
33378   -- Initialize_2271 --
33379   ---------------------
33380
33381   procedure Initialize_2271 is
33382   begin
33383      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2271, (Is_Empty => True));
33384   end Initialize_2271;
33385
33386   ---------------------
33387   -- Initialize_2272 --
33388   ---------------------
33389
33390   procedure Initialize_2272 is
33391   begin
33392      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33393       (Base + 2272,
33394        AMF.Internals.Tables.UML_String_Data_08.MS_0884'Access);
33395   end Initialize_2272;
33396
33397   ---------------------
33398   -- Initialize_2273 --
33399   ---------------------
33400
33401   procedure Initialize_2273 is
33402   begin
33403      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33404       (Base + 2273,
33405        AMF.Internals.Tables.UML_String_Data_04.MS_04AA'Access);
33406   end Initialize_2273;
33407
33408   ---------------------
33409   -- Initialize_2274 --
33410   ---------------------
33411
33412   procedure Initialize_2274 is
33413   begin
33414      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33415       (Base + 2274,
33416        AMF.Internals.Tables.UML_String_Data_03.MS_03D4'Access);
33417   end Initialize_2274;
33418
33419   ---------------------
33420   -- Initialize_2275 --
33421   ---------------------
33422
33423   procedure Initialize_2275 is
33424   begin
33425      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33426       (Base + 2275,
33427        AMF.Internals.Tables.UML_String_Data_0B.MS_0BBA'Access);
33428   end Initialize_2275;
33429
33430   ---------------------
33431   -- Initialize_2276 --
33432   ---------------------
33433
33434   procedure Initialize_2276 is
33435   begin
33436      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33437       (Base + 2276,
33438        AMF.Internals.Tables.UML_String_Data_09.MS_094C'Access);
33439   end Initialize_2276;
33440
33441   ---------------------
33442   -- Initialize_2277 --
33443   ---------------------
33444
33445   procedure Initialize_2277 is
33446   begin
33447      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2277, True);
33448      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
33449       (Base + 2277,
33450        AMF.Internals.Tables.UML_String_Data_01.MS_01C4'Access);
33451      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2277, (False, AMF.CMOF.Public_Visibility));
33452   end Initialize_2277;
33453
33454   ---------------------
33455   -- Initialize_2278 --
33456   ---------------------
33457
33458   procedure Initialize_2278 is
33459   begin
33460      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33461       (Base + 2278,
33462        AMF.Internals.Tables.UML_String_Data_00.MS_004A'Access);
33463   end Initialize_2278;
33464
33465   ---------------------
33466   -- Initialize_2279 --
33467   ---------------------
33468
33469   procedure Initialize_2279 is
33470   begin
33471      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
33472       (Base + 2279,
33473        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
33474      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2279, (Is_Empty => True));
33475   end Initialize_2279;
33476
33477   ---------------------
33478   -- Initialize_2280 --
33479   ---------------------
33480
33481   procedure Initialize_2280 is
33482   begin
33483      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2280, (Is_Empty => True));
33484   end Initialize_2280;
33485
33486   ---------------------
33487   -- Initialize_2281 --
33488   ---------------------
33489
33490   procedure Initialize_2281 is
33491   begin
33492      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2281, AMF.CMOF.Return_Parameter);
33493      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
33494       (Base + 2281,
33495        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
33496      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2281, (False, AMF.CMOF.Public_Visibility));
33497   end Initialize_2281;
33498
33499   ---------------------
33500   -- Initialize_2282 --
33501   ---------------------
33502
33503   procedure Initialize_2282 is
33504   begin
33505      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33506       (Base + 2282,
33507        AMF.Internals.Tables.UML_String_Data_00.MS_0074'Access);
33508   end Initialize_2282;
33509
33510   ---------------------
33511   -- Initialize_2283 --
33512   ---------------------
33513
33514   procedure Initialize_2283 is
33515   begin
33516      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
33517       (Base + 2283,
33518        AMF.Internals.Tables.UML_String_Data_00.MS_00D9'Access);
33519      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2283, (Is_Empty => True));
33520   end Initialize_2283;
33521
33522   ---------------------
33523   -- Initialize_2284 --
33524   ---------------------
33525
33526   procedure Initialize_2284 is
33527   begin
33528      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33529       (Base + 2284,
33530        AMF.Internals.Tables.UML_String_Data_03.MS_0322'Access);
33531   end Initialize_2284;
33532
33533   ---------------------
33534   -- Initialize_2285 --
33535   ---------------------
33536
33537   procedure Initialize_2285 is
33538   begin
33539      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2285, (Is_Empty => True));
33540   end Initialize_2285;
33541
33542   ---------------------
33543   -- Initialize_2286 --
33544   ---------------------
33545
33546   procedure Initialize_2286 is
33547   begin
33548      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
33549       (Base + 2286,
33550        AMF.Internals.Tables.UML_String_Data_01.MS_01A5'Access);
33551      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2286, (Is_Empty => True));
33552   end Initialize_2286;
33553
33554   ---------------------
33555   -- Initialize_2287 --
33556   ---------------------
33557
33558   procedure Initialize_2287 is
33559   begin
33560      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33561       (Base + 2287,
33562        AMF.Internals.Tables.UML_String_Data_0B.MS_0B06'Access);
33563   end Initialize_2287;
33564
33565   ---------------------
33566   -- Initialize_2288 --
33567   ---------------------
33568
33569   procedure Initialize_2288 is
33570   begin
33571      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2288, (Is_Empty => True));
33572   end Initialize_2288;
33573
33574   ---------------------
33575   -- Initialize_2289 --
33576   ---------------------
33577
33578   procedure Initialize_2289 is
33579   begin
33580      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
33581       (Base + 2289,
33582        AMF.Internals.Tables.UML_String_Data_04.MS_0441'Access);
33583      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2289, (Is_Empty => True));
33584   end Initialize_2289;
33585
33586   ---------------------
33587   -- Initialize_2290 --
33588   ---------------------
33589
33590   procedure Initialize_2290 is
33591   begin
33592      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33593       (Base + 2290,
33594        AMF.Internals.Tables.UML_String_Data_09.MS_0920'Access);
33595   end Initialize_2290;
33596
33597   ---------------------
33598   -- Initialize_2291 --
33599   ---------------------
33600
33601   procedure Initialize_2291 is
33602   begin
33603      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2291, (Is_Empty => True));
33604   end Initialize_2291;
33605
33606   ---------------------
33607   -- Initialize_2292 --
33608   ---------------------
33609
33610   procedure Initialize_2292 is
33611   begin
33612      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
33613       (Base + 2292,
33614        AMF.Internals.Tables.UML_String_Data_0C.MS_0C68'Access);
33615      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2292, (Is_Empty => True));
33616   end Initialize_2292;
33617
33618   ---------------------
33619   -- Initialize_2293 --
33620   ---------------------
33621
33622   procedure Initialize_2293 is
33623   begin
33624      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33625       (Base + 2293,
33626        AMF.Internals.Tables.UML_String_Data_04.MS_0403'Access);
33627   end Initialize_2293;
33628
33629   ---------------------
33630   -- Initialize_2294 --
33631   ---------------------
33632
33633   procedure Initialize_2294 is
33634   begin
33635      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2294, (Is_Empty => True));
33636   end Initialize_2294;
33637
33638   ---------------------
33639   -- Initialize_2295 --
33640   ---------------------
33641
33642   procedure Initialize_2295 is
33643   begin
33644      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33645       (Base + 2295,
33646        AMF.Internals.Tables.UML_String_Data_0B.MS_0B0D'Access);
33647   end Initialize_2295;
33648
33649   ---------------------
33650   -- Initialize_2296 --
33651   ---------------------
33652
33653   procedure Initialize_2296 is
33654   begin
33655      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33656       (Base + 2296,
33657        AMF.Internals.Tables.UML_String_Data_01.MS_01C1'Access);
33658   end Initialize_2296;
33659
33660   ---------------------
33661   -- Initialize_2297 --
33662   ---------------------
33663
33664   procedure Initialize_2297 is
33665   begin
33666      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33667       (Base + 2297,
33668        AMF.Internals.Tables.UML_String_Data_05.MS_05FC'Access);
33669   end Initialize_2297;
33670
33671   ---------------------
33672   -- Initialize_2298 --
33673   ---------------------
33674
33675   procedure Initialize_2298 is
33676   begin
33677      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2298, True);
33678      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
33679       (Base + 2298,
33680        AMF.Internals.Tables.UML_String_Data_06.MS_0611'Access);
33681      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2298, (False, AMF.CMOF.Public_Visibility));
33682   end Initialize_2298;
33683
33684   ---------------------
33685   -- Initialize_2299 --
33686   ---------------------
33687
33688   procedure Initialize_2299 is
33689   begin
33690      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33691       (Base + 2299,
33692        AMF.Internals.Tables.UML_String_Data_0A.MS_0AFA'Access);
33693   end Initialize_2299;
33694
33695   ---------------------
33696   -- Initialize_2300 --
33697   ---------------------
33698
33699   procedure Initialize_2300 is
33700   begin
33701      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
33702       (Base + 2300,
33703        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
33704      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2300, (Is_Empty => True));
33705   end Initialize_2300;
33706
33707   ---------------------
33708   -- Initialize_2301 --
33709   ---------------------
33710
33711   procedure Initialize_2301 is
33712   begin
33713      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2301, (Is_Empty => True));
33714   end Initialize_2301;
33715
33716   ---------------------
33717   -- Initialize_2302 --
33718   ---------------------
33719
33720   procedure Initialize_2302 is
33721   begin
33722      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2302, AMF.CMOF.Return_Parameter);
33723      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 2302, (False, 0));
33724      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
33725       (Base + 2302,
33726        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
33727      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2302, (False, AMF.CMOF.Public_Visibility));
33728   end Initialize_2302;
33729
33730   ---------------------
33731   -- Initialize_2303 --
33732   ---------------------
33733
33734   procedure Initialize_2303 is
33735   begin
33736      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33737       (Base + 2303,
33738        AMF.Internals.Tables.UML_String_Data_09.MS_09F4'Access);
33739   end Initialize_2303;
33740
33741   ---------------------
33742   -- Initialize_2304 --
33743   ---------------------
33744
33745   procedure Initialize_2304 is
33746   begin
33747      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
33748       (Base + 2304,
33749        AMF.Internals.Tables.UML_String_Data_07.MS_0733'Access);
33750      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2304, (Is_Empty => True));
33751   end Initialize_2304;
33752
33753   ---------------------
33754   -- Initialize_2305 --
33755   ---------------------
33756
33757   procedure Initialize_2305 is
33758   begin
33759      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33760       (Base + 2305,
33761        AMF.Internals.Tables.UML_String_Data_05.MS_057C'Access);
33762   end Initialize_2305;
33763
33764   ---------------------
33765   -- Initialize_2306 --
33766   ---------------------
33767
33768   procedure Initialize_2306 is
33769   begin
33770      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2306, (Is_Empty => True));
33771   end Initialize_2306;
33772
33773   ---------------------
33774   -- Initialize_2307 --
33775   ---------------------
33776
33777   procedure Initialize_2307 is
33778   begin
33779      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
33780       (Base + 2307,
33781        AMF.Internals.Tables.UML_String_Data_0B.MS_0BB4'Access);
33782      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2307, (Is_Empty => True));
33783   end Initialize_2307;
33784
33785   ---------------------
33786   -- Initialize_2308 --
33787   ---------------------
33788
33789   procedure Initialize_2308 is
33790   begin
33791      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33792       (Base + 2308,
33793        AMF.Internals.Tables.UML_String_Data_08.MS_08FE'Access);
33794   end Initialize_2308;
33795
33796   ---------------------
33797   -- Initialize_2309 --
33798   ---------------------
33799
33800   procedure Initialize_2309 is
33801   begin
33802      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2309, (Is_Empty => True));
33803   end Initialize_2309;
33804
33805   ---------------------
33806   -- Initialize_2310 --
33807   ---------------------
33808
33809   procedure Initialize_2310 is
33810   begin
33811      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33812       (Base + 2310,
33813        AMF.Internals.Tables.UML_String_Data_02.MS_02E1'Access);
33814   end Initialize_2310;
33815
33816   ---------------------
33817   -- Initialize_2311 --
33818   ---------------------
33819
33820   procedure Initialize_2311 is
33821   begin
33822      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33823       (Base + 2311,
33824        AMF.Internals.Tables.UML_String_Data_0A.MS_0A19'Access);
33825   end Initialize_2311;
33826
33827   ---------------------
33828   -- Initialize_2312 --
33829   ---------------------
33830
33831   procedure Initialize_2312 is
33832   begin
33833      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
33834       (Base + 2312,
33835        AMF.Internals.Tables.UML_String_Data_04.MS_0485'Access);
33836      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2312, (Is_Empty => True));
33837   end Initialize_2312;
33838
33839   ---------------------
33840   -- Initialize_2313 --
33841   ---------------------
33842
33843   procedure Initialize_2313 is
33844   begin
33845      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33846       (Base + 2313,
33847        AMF.Internals.Tables.UML_String_Data_04.MS_04F7'Access);
33848   end Initialize_2313;
33849
33850   ---------------------
33851   -- Initialize_2314 --
33852   ---------------------
33853
33854   procedure Initialize_2314 is
33855   begin
33856      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2314, (Is_Empty => True));
33857   end Initialize_2314;
33858
33859   ---------------------
33860   -- Initialize_2315 --
33861   ---------------------
33862
33863   procedure Initialize_2315 is
33864   begin
33865      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
33866       (Base + 2315,
33867        AMF.Internals.Tables.UML_String_Data_05.MS_0577'Access);
33868      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2315, (Is_Empty => True));
33869   end Initialize_2315;
33870
33871   ---------------------
33872   -- Initialize_2316 --
33873   ---------------------
33874
33875   procedure Initialize_2316 is
33876   begin
33877      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33878       (Base + 2316,
33879        AMF.Internals.Tables.UML_String_Data_04.MS_0478'Access);
33880   end Initialize_2316;
33881
33882   ---------------------
33883   -- Initialize_2317 --
33884   ---------------------
33885
33886   procedure Initialize_2317 is
33887   begin
33888      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2317, (Is_Empty => True));
33889   end Initialize_2317;
33890
33891   ---------------------
33892   -- Initialize_2318 --
33893   ---------------------
33894
33895   procedure Initialize_2318 is
33896   begin
33897      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
33898       (Base + 2318,
33899        AMF.Internals.Tables.UML_String_Data_08.MS_08F7'Access);
33900      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2318, (Is_Empty => True));
33901   end Initialize_2318;
33902
33903   ---------------------
33904   -- Initialize_2319 --
33905   ---------------------
33906
33907   procedure Initialize_2319 is
33908   begin
33909      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33910       (Base + 2319,
33911        AMF.Internals.Tables.UML_String_Data_05.MS_0567'Access);
33912   end Initialize_2319;
33913
33914   ---------------------
33915   -- Initialize_2320 --
33916   ---------------------
33917
33918   procedure Initialize_2320 is
33919   begin
33920      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2320, (Is_Empty => True));
33921   end Initialize_2320;
33922
33923   ---------------------
33924   -- Initialize_2321 --
33925   ---------------------
33926
33927   procedure Initialize_2321 is
33928   begin
33929      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
33930       (Base + 2321,
33931        AMF.Internals.Tables.UML_String_Data_05.MS_05CC'Access);
33932      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2321, (Is_Empty => True));
33933   end Initialize_2321;
33934
33935   ---------------------
33936   -- Initialize_2322 --
33937   ---------------------
33938
33939   procedure Initialize_2322 is
33940   begin
33941      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33942       (Base + 2322,
33943        AMF.Internals.Tables.UML_String_Data_04.MS_04F7'Access);
33944   end Initialize_2322;
33945
33946   ---------------------
33947   -- Initialize_2323 --
33948   ---------------------
33949
33950   procedure Initialize_2323 is
33951   begin
33952      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2323, (Is_Empty => True));
33953   end Initialize_2323;
33954
33955   ---------------------
33956   -- Initialize_2324 --
33957   ---------------------
33958
33959   procedure Initialize_2324 is
33960   begin
33961      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33962       (Base + 2324,
33963        AMF.Internals.Tables.UML_String_Data_0B.MS_0B65'Access);
33964   end Initialize_2324;
33965
33966   ---------------------
33967   -- Initialize_2325 --
33968   ---------------------
33969
33970   procedure Initialize_2325 is
33971   begin
33972      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33973       (Base + 2325,
33974        AMF.Internals.Tables.UML_String_Data_02.MS_0272'Access);
33975   end Initialize_2325;
33976
33977   ---------------------
33978   -- Initialize_2326 --
33979   ---------------------
33980
33981   procedure Initialize_2326 is
33982   begin
33983      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33984       (Base + 2326,
33985        AMF.Internals.Tables.UML_String_Data_06.MS_06AE'Access);
33986   end Initialize_2326;
33987
33988   ---------------------
33989   -- Initialize_2327 --
33990   ---------------------
33991
33992   procedure Initialize_2327 is
33993   begin
33994      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
33995       (Base + 2327,
33996        AMF.Internals.Tables.UML_String_Data_04.MS_0488'Access);
33997   end Initialize_2327;
33998
33999   ---------------------
34000   -- Initialize_2328 --
34001   ---------------------
34002
34003   procedure Initialize_2328 is
34004   begin
34005      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
34006       (Base + 2328,
34007        AMF.Internals.Tables.UML_String_Data_01.MS_0150'Access);
34008      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2328, (Is_Empty => True));
34009   end Initialize_2328;
34010
34011   ---------------------
34012   -- Initialize_2329 --
34013   ---------------------
34014
34015   procedure Initialize_2329 is
34016   begin
34017      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34018       (Base + 2329,
34019        AMF.Internals.Tables.UML_String_Data_00.MS_0071'Access);
34020   end Initialize_2329;
34021
34022   ---------------------
34023   -- Initialize_2330 --
34024   ---------------------
34025
34026   procedure Initialize_2330 is
34027   begin
34028      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2330, (Is_Empty => True));
34029   end Initialize_2330;
34030
34031   ---------------------
34032   -- Initialize_2331 --
34033   ---------------------
34034
34035   procedure Initialize_2331 is
34036   begin
34037      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
34038       (Base + 2331,
34039        AMF.Internals.Tables.UML_String_Data_03.MS_03CB'Access);
34040      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2331, (Is_Empty => True));
34041   end Initialize_2331;
34042
34043   ---------------------
34044   -- Initialize_2332 --
34045   ---------------------
34046
34047   procedure Initialize_2332 is
34048   begin
34049      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34050       (Base + 2332,
34051        AMF.Internals.Tables.UML_String_Data_02.MS_029C'Access);
34052   end Initialize_2332;
34053
34054   ---------------------
34055   -- Initialize_2333 --
34056   ---------------------
34057
34058   procedure Initialize_2333 is
34059   begin
34060      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2333, (Is_Empty => True));
34061   end Initialize_2333;
34062
34063   ---------------------
34064   -- Initialize_2334 --
34065   ---------------------
34066
34067   procedure Initialize_2334 is
34068   begin
34069      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
34070       (Base + 2334,
34071        AMF.Internals.Tables.UML_String_Data_08.MS_08F0'Access);
34072      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2334, (Is_Empty => True));
34073   end Initialize_2334;
34074
34075   ---------------------
34076   -- Initialize_2335 --
34077   ---------------------
34078
34079   procedure Initialize_2335 is
34080   begin
34081      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34082       (Base + 2335,
34083        AMF.Internals.Tables.UML_String_Data_09.MS_099A'Access);
34084   end Initialize_2335;
34085
34086   ---------------------
34087   -- Initialize_2336 --
34088   ---------------------
34089
34090   procedure Initialize_2336 is
34091   begin
34092      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2336, (Is_Empty => True));
34093   end Initialize_2336;
34094
34095   ---------------------
34096   -- Initialize_2337 --
34097   ---------------------
34098
34099   procedure Initialize_2337 is
34100   begin
34101      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34102       (Base + 2337,
34103        AMF.Internals.Tables.UML_String_Data_04.MS_04E5'Access);
34104   end Initialize_2337;
34105
34106   ---------------------
34107   -- Initialize_2338 --
34108   ---------------------
34109
34110   procedure Initialize_2338 is
34111   begin
34112      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34113       (Base + 2338,
34114        AMF.Internals.Tables.UML_String_Data_05.MS_0563'Access);
34115   end Initialize_2338;
34116
34117   ---------------------
34118   -- Initialize_2339 --
34119   ---------------------
34120
34121   procedure Initialize_2339 is
34122   begin
34123      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
34124       (Base + 2339,
34125        AMF.Internals.Tables.UML_String_Data_0B.MS_0B97'Access);
34126      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2339, (Is_Empty => True));
34127   end Initialize_2339;
34128
34129   ---------------------
34130   -- Initialize_2340 --
34131   ---------------------
34132
34133   procedure Initialize_2340 is
34134   begin
34135      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34136       (Base + 2340,
34137        AMF.Internals.Tables.UML_String_Data_03.MS_0310'Access);
34138   end Initialize_2340;
34139
34140   ---------------------
34141   -- Initialize_2341 --
34142   ---------------------
34143
34144   procedure Initialize_2341 is
34145   begin
34146      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2341, (Is_Empty => True));
34147   end Initialize_2341;
34148
34149   ---------------------
34150   -- Initialize_2342 --
34151   ---------------------
34152
34153   procedure Initialize_2342 is
34154   begin
34155      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34156       (Base + 2342,
34157        AMF.Internals.Tables.UML_String_Data_02.MS_02F5'Access);
34158   end Initialize_2342;
34159
34160   ---------------------
34161   -- Initialize_2343 --
34162   ---------------------
34163
34164   procedure Initialize_2343 is
34165   begin
34166      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34167       (Base + 2343,
34168        AMF.Internals.Tables.UML_String_Data_08.MS_08A8'Access);
34169   end Initialize_2343;
34170
34171   ---------------------
34172   -- Initialize_2344 --
34173   ---------------------
34174
34175   procedure Initialize_2344 is
34176   begin
34177      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
34178       (Base + 2344,
34179        AMF.Internals.Tables.UML_String_Data_05.MS_0583'Access);
34180      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2344, (Is_Empty => True));
34181   end Initialize_2344;
34182
34183   ---------------------
34184   -- Initialize_2345 --
34185   ---------------------
34186
34187   procedure Initialize_2345 is
34188   begin
34189      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34190       (Base + 2345,
34191        AMF.Internals.Tables.UML_String_Data_07.MS_0785'Access);
34192   end Initialize_2345;
34193
34194   ---------------------
34195   -- Initialize_2346 --
34196   ---------------------
34197
34198   procedure Initialize_2346 is
34199   begin
34200      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2346, (Is_Empty => True));
34201   end Initialize_2346;
34202
34203   ---------------------
34204   -- Initialize_2347 --
34205   ---------------------
34206
34207   procedure Initialize_2347 is
34208   begin
34209      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34210       (Base + 2347,
34211        AMF.Internals.Tables.UML_String_Data_05.MS_05DC'Access);
34212   end Initialize_2347;
34213
34214   ---------------------
34215   -- Initialize_2348 --
34216   ---------------------
34217
34218   procedure Initialize_2348 is
34219   begin
34220      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34221       (Base + 2348,
34222        AMF.Internals.Tables.UML_String_Data_04.MS_04A5'Access);
34223   end Initialize_2348;
34224
34225   ---------------------
34226   -- Initialize_2349 --
34227   ---------------------
34228
34229   procedure Initialize_2349 is
34230   begin
34231      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
34232       (Base + 2349,
34233        AMF.Internals.Tables.UML_String_Data_04.MS_0441'Access);
34234      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2349, (Is_Empty => True));
34235   end Initialize_2349;
34236
34237   ---------------------
34238   -- Initialize_2350 --
34239   ---------------------
34240
34241   procedure Initialize_2350 is
34242   begin
34243      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34244       (Base + 2350,
34245        AMF.Internals.Tables.UML_String_Data_0A.MS_0A47'Access);
34246   end Initialize_2350;
34247
34248   ---------------------
34249   -- Initialize_2351 --
34250   ---------------------
34251
34252   procedure Initialize_2351 is
34253   begin
34254      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2351, (Is_Empty => True));
34255   end Initialize_2351;
34256
34257   ---------------------
34258   -- Initialize_2352 --
34259   ---------------------
34260
34261   procedure Initialize_2352 is
34262   begin
34263      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
34264       (Base + 2352,
34265        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD3'Access);
34266      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2352, (Is_Empty => True));
34267   end Initialize_2352;
34268
34269   ---------------------
34270   -- Initialize_2353 --
34271   ---------------------
34272
34273   procedure Initialize_2353 is
34274   begin
34275      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34276       (Base + 2353,
34277        AMF.Internals.Tables.UML_String_Data_04.MS_0470'Access);
34278   end Initialize_2353;
34279
34280   ---------------------
34281   -- Initialize_2354 --
34282   ---------------------
34283
34284   procedure Initialize_2354 is
34285   begin
34286      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2354, (Is_Empty => True));
34287   end Initialize_2354;
34288
34289   ---------------------
34290   -- Initialize_2355 --
34291   ---------------------
34292
34293   procedure Initialize_2355 is
34294   begin
34295      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
34296       (Base + 2355,
34297        AMF.Internals.Tables.UML_String_Data_07.MS_0789'Access);
34298      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2355, (Is_Empty => True));
34299   end Initialize_2355;
34300
34301   ---------------------
34302   -- Initialize_2356 --
34303   ---------------------
34304
34305   procedure Initialize_2356 is
34306   begin
34307      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34308       (Base + 2356,
34309        AMF.Internals.Tables.UML_String_Data_01.MS_017A'Access);
34310   end Initialize_2356;
34311
34312   ---------------------
34313   -- Initialize_2357 --
34314   ---------------------
34315
34316   procedure Initialize_2357 is
34317   begin
34318      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2357, (Is_Empty => True));
34319   end Initialize_2357;
34320
34321   ---------------------
34322   -- Initialize_2358 --
34323   ---------------------
34324
34325   procedure Initialize_2358 is
34326   begin
34327      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34328       (Base + 2358,
34329        AMF.Internals.Tables.UML_String_Data_01.MS_01A2'Access);
34330   end Initialize_2358;
34331
34332   ---------------------
34333   -- Initialize_2359 --
34334   ---------------------
34335
34336   procedure Initialize_2359 is
34337   begin
34338      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34339       (Base + 2359,
34340        AMF.Internals.Tables.UML_String_Data_01.MS_01B2'Access);
34341   end Initialize_2359;
34342
34343   ---------------------
34344   -- Initialize_2360 --
34345   ---------------------
34346
34347   procedure Initialize_2360 is
34348   begin
34349      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
34350       (Base + 2360,
34351        AMF.Internals.Tables.UML_String_Data_09.MS_0977'Access);
34352      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2360, (Is_Empty => True));
34353   end Initialize_2360;
34354
34355   ---------------------
34356   -- Initialize_2361 --
34357   ---------------------
34358
34359   procedure Initialize_2361 is
34360   begin
34361      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34362       (Base + 2361,
34363        AMF.Internals.Tables.UML_String_Data_0B.MS_0B80'Access);
34364   end Initialize_2361;
34365
34366   ---------------------
34367   -- Initialize_2362 --
34368   ---------------------
34369
34370   procedure Initialize_2362 is
34371   begin
34372      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2362, (Is_Empty => True));
34373   end Initialize_2362;
34374
34375   ---------------------
34376   -- Initialize_2363 --
34377   ---------------------
34378
34379   procedure Initialize_2363 is
34380   begin
34381      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
34382       (Base + 2363,
34383        AMF.Internals.Tables.UML_String_Data_04.MS_0441'Access);
34384      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2363, (Is_Empty => True));
34385   end Initialize_2363;
34386
34387   ---------------------
34388   -- Initialize_2364 --
34389   ---------------------
34390
34391   procedure Initialize_2364 is
34392   begin
34393      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34394       (Base + 2364,
34395        AMF.Internals.Tables.UML_String_Data_0A.MS_0A47'Access);
34396   end Initialize_2364;
34397
34398   ---------------------
34399   -- Initialize_2365 --
34400   ---------------------
34401
34402   procedure Initialize_2365 is
34403   begin
34404      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2365, (Is_Empty => True));
34405   end Initialize_2365;
34406
34407   ---------------------
34408   -- Initialize_2366 --
34409   ---------------------
34410
34411   procedure Initialize_2366 is
34412   begin
34413      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
34414       (Base + 2366,
34415        AMF.Internals.Tables.UML_String_Data_0B.MS_0BBE'Access);
34416      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2366, (Is_Empty => True));
34417   end Initialize_2366;
34418
34419   ---------------------
34420   -- Initialize_2367 --
34421   ---------------------
34422
34423   procedure Initialize_2367 is
34424   begin
34425      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34426       (Base + 2367,
34427        AMF.Internals.Tables.UML_String_Data_0A.MS_0AF2'Access);
34428   end Initialize_2367;
34429
34430   ---------------------
34431   -- Initialize_2368 --
34432   ---------------------
34433
34434   procedure Initialize_2368 is
34435   begin
34436      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2368, (Is_Empty => True));
34437   end Initialize_2368;
34438
34439   ---------------------
34440   -- Initialize_2369 --
34441   ---------------------
34442
34443   procedure Initialize_2369 is
34444   begin
34445      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
34446       (Base + 2369,
34447        AMF.Internals.Tables.UML_String_Data_0A.MS_0AE9'Access);
34448      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2369, (Is_Empty => True));
34449   end Initialize_2369;
34450
34451   ---------------------
34452   -- Initialize_2370 --
34453   ---------------------
34454
34455   procedure Initialize_2370 is
34456   begin
34457      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34458       (Base + 2370,
34459        AMF.Internals.Tables.UML_String_Data_06.MS_0664'Access);
34460   end Initialize_2370;
34461
34462   ---------------------
34463   -- Initialize_2371 --
34464   ---------------------
34465
34466   procedure Initialize_2371 is
34467   begin
34468      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2371, (Is_Empty => True));
34469   end Initialize_2371;
34470
34471   ---------------------
34472   -- Initialize_2372 --
34473   ---------------------
34474
34475   procedure Initialize_2372 is
34476   begin
34477      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34478       (Base + 2372,
34479        AMF.Internals.Tables.UML_String_Data_03.MS_0380'Access);
34480   end Initialize_2372;
34481
34482   ---------------------
34483   -- Initialize_2373 --
34484   ---------------------
34485
34486   procedure Initialize_2373 is
34487   begin
34488      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34489       (Base + 2373,
34490        AMF.Internals.Tables.UML_String_Data_01.MS_01A2'Access);
34491   end Initialize_2373;
34492
34493   ---------------------
34494   -- Initialize_2374 --
34495   ---------------------
34496
34497   procedure Initialize_2374 is
34498   begin
34499      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34500       (Base + 2374,
34501        AMF.Internals.Tables.UML_String_Data_07.MS_0769'Access);
34502   end Initialize_2374;
34503
34504   ---------------------
34505   -- Initialize_2375 --
34506   ---------------------
34507
34508   procedure Initialize_2375 is
34509   begin
34510      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34511       (Base + 2375,
34512        AMF.Internals.Tables.UML_String_Data_06.MS_0666'Access);
34513   end Initialize_2375;
34514
34515   ---------------------
34516   -- Initialize_2376 --
34517   ---------------------
34518
34519   procedure Initialize_2376 is
34520   begin
34521      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34522       (Base + 2376,
34523        AMF.Internals.Tables.UML_String_Data_05.MS_05EC'Access);
34524   end Initialize_2376;
34525
34526   ---------------------
34527   -- Initialize_2377 --
34528   ---------------------
34529
34530   procedure Initialize_2377 is
34531   begin
34532      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34533       (Base + 2377,
34534        AMF.Internals.Tables.UML_String_Data_0A.MS_0A2C'Access);
34535   end Initialize_2377;
34536
34537   ---------------------
34538   -- Initialize_2378 --
34539   ---------------------
34540
34541   procedure Initialize_2378 is
34542   begin
34543      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2378, True);
34544      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
34545       (Base + 2378,
34546        AMF.Internals.Tables.UML_String_Data_01.MS_010B'Access);
34547      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2378, (False, AMF.CMOF.Public_Visibility));
34548   end Initialize_2378;
34549
34550   ---------------------
34551   -- Initialize_2379 --
34552   ---------------------
34553
34554   procedure Initialize_2379 is
34555   begin
34556      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34557       (Base + 2379,
34558        AMF.Internals.Tables.UML_String_Data_06.MS_067B'Access);
34559   end Initialize_2379;
34560
34561   ---------------------
34562   -- Initialize_2380 --
34563   ---------------------
34564
34565   procedure Initialize_2380 is
34566   begin
34567      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
34568       (Base + 2380,
34569        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
34570      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2380, (Is_Empty => True));
34571   end Initialize_2380;
34572
34573   ---------------------
34574   -- Initialize_2381 --
34575   ---------------------
34576
34577   procedure Initialize_2381 is
34578   begin
34579      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2381, (Is_Empty => True));
34580   end Initialize_2381;
34581
34582   ---------------------
34583   -- Initialize_2382 --
34584   ---------------------
34585
34586   procedure Initialize_2382 is
34587   begin
34588      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2382, AMF.CMOF.Return_Parameter);
34589      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 2382, (False, 0));
34590      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
34591       (Base + 2382,
34592        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
34593      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 2382, (False, (Unlimited => True)));
34594      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2382, (False, AMF.CMOF.Public_Visibility));
34595   end Initialize_2382;
34596
34597   ---------------------
34598   -- Initialize_2383 --
34599   ---------------------
34600
34601   procedure Initialize_2383 is
34602   begin
34603      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2383, AMF.CMOF.In_Parameter);
34604      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 2383, (False, 0));
34605      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
34606       (Base + 2383,
34607        AMF.Internals.Tables.UML_String_Data_06.MS_06FF'Access);
34608      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 2383, (False, (Unlimited => True)));
34609      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2383, (False, AMF.CMOF.Public_Visibility));
34610   end Initialize_2383;
34611
34612   ---------------------
34613   -- Initialize_2384 --
34614   ---------------------
34615
34616   procedure Initialize_2384 is
34617   begin
34618      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34619       (Base + 2384,
34620        AMF.Internals.Tables.UML_String_Data_02.MS_02F0'Access);
34621   end Initialize_2384;
34622
34623   ---------------------
34624   -- Initialize_2385 --
34625   ---------------------
34626
34627   procedure Initialize_2385 is
34628   begin
34629      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
34630       (Base + 2385,
34631        AMF.Internals.Tables.UML_String_Data_09.MS_09A0'Access);
34632      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2385, (Is_Empty => True));
34633   end Initialize_2385;
34634
34635   ---------------------
34636   -- Initialize_2386 --
34637   ---------------------
34638
34639   procedure Initialize_2386 is
34640   begin
34641      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34642       (Base + 2386,
34643        AMF.Internals.Tables.UML_String_Data_06.MS_0625'Access);
34644   end Initialize_2386;
34645
34646   ---------------------
34647   -- Initialize_2387 --
34648   ---------------------
34649
34650   procedure Initialize_2387 is
34651   begin
34652      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2387, (Is_Empty => True));
34653   end Initialize_2387;
34654
34655   ---------------------
34656   -- Initialize_2388 --
34657   ---------------------
34658
34659   procedure Initialize_2388 is
34660   begin
34661      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
34662       (Base + 2388,
34663        AMF.Internals.Tables.UML_String_Data_09.MS_099B'Access);
34664      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2388, (Is_Empty => True));
34665   end Initialize_2388;
34666
34667   ---------------------
34668   -- Initialize_2389 --
34669   ---------------------
34670
34671   procedure Initialize_2389 is
34672   begin
34673      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34674       (Base + 2389,
34675        AMF.Internals.Tables.UML_String_Data_0B.MS_0BAA'Access);
34676   end Initialize_2389;
34677
34678   ---------------------
34679   -- Initialize_2390 --
34680   ---------------------
34681
34682   procedure Initialize_2390 is
34683   begin
34684      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2390, (Is_Empty => True));
34685   end Initialize_2390;
34686
34687   ---------------------
34688   -- Initialize_2391 --
34689   ---------------------
34690
34691   procedure Initialize_2391 is
34692   begin
34693      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
34694       (Base + 2391,
34695        AMF.Internals.Tables.UML_String_Data_0B.MS_0BBD'Access);
34696      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2391, (Is_Empty => True));
34697   end Initialize_2391;
34698
34699   ---------------------
34700   -- Initialize_2392 --
34701   ---------------------
34702
34703   procedure Initialize_2392 is
34704   begin
34705      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34706       (Base + 2392,
34707        AMF.Internals.Tables.UML_String_Data_0C.MS_0C42'Access);
34708   end Initialize_2392;
34709
34710   ---------------------
34711   -- Initialize_2393 --
34712   ---------------------
34713
34714   procedure Initialize_2393 is
34715   begin
34716      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2393, (Is_Empty => True));
34717   end Initialize_2393;
34718
34719   ---------------------
34720   -- Initialize_2394 --
34721   ---------------------
34722
34723   procedure Initialize_2394 is
34724   begin
34725      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
34726       (Base + 2394,
34727        AMF.Internals.Tables.UML_String_Data_08.MS_0828'Access);
34728      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2394, (Is_Empty => True));
34729   end Initialize_2394;
34730
34731   ---------------------
34732   -- Initialize_2395 --
34733   ---------------------
34734
34735   procedure Initialize_2395 is
34736   begin
34737      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34738       (Base + 2395,
34739        AMF.Internals.Tables.UML_String_Data_0B.MS_0B2F'Access);
34740   end Initialize_2395;
34741
34742   ---------------------
34743   -- Initialize_2396 --
34744   ---------------------
34745
34746   procedure Initialize_2396 is
34747   begin
34748      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2396, (Is_Empty => True));
34749   end Initialize_2396;
34750
34751   ---------------------
34752   -- Initialize_2397 --
34753   ---------------------
34754
34755   procedure Initialize_2397 is
34756   begin
34757      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
34758       (Base + 2397,
34759        AMF.Internals.Tables.UML_String_Data_04.MS_0473'Access);
34760      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2397, (Is_Empty => True));
34761   end Initialize_2397;
34762
34763   ---------------------
34764   -- Initialize_2398 --
34765   ---------------------
34766
34767   procedure Initialize_2398 is
34768   begin
34769      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34770       (Base + 2398,
34771        AMF.Internals.Tables.UML_String_Data_04.MS_04DE'Access);
34772   end Initialize_2398;
34773
34774   ---------------------
34775   -- Initialize_2399 --
34776   ---------------------
34777
34778   procedure Initialize_2399 is
34779   begin
34780      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2399, (Is_Empty => True));
34781   end Initialize_2399;
34782
34783   ---------------------
34784   -- Initialize_2400 --
34785   ---------------------
34786
34787   procedure Initialize_2400 is
34788   begin
34789      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
34790       (Base + 2400,
34791        AMF.Internals.Tables.UML_String_Data_06.MS_069F'Access);
34792      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2400, (Is_Empty => True));
34793   end Initialize_2400;
34794
34795   ---------------------
34796   -- Initialize_2401 --
34797   ---------------------
34798
34799   procedure Initialize_2401 is
34800   begin
34801      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34802       (Base + 2401,
34803        AMF.Internals.Tables.UML_String_Data_08.MS_08CA'Access);
34804   end Initialize_2401;
34805
34806   ---------------------
34807   -- Initialize_2402 --
34808   ---------------------
34809
34810   procedure Initialize_2402 is
34811   begin
34812      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2402, (Is_Empty => True));
34813   end Initialize_2402;
34814
34815   ---------------------
34816   -- Initialize_2403 --
34817   ---------------------
34818
34819   procedure Initialize_2403 is
34820   begin
34821      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
34822       (Base + 2403,
34823        AMF.Internals.Tables.UML_String_Data_0C.MS_0C26'Access);
34824      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2403, (Is_Empty => True));
34825   end Initialize_2403;
34826
34827   ---------------------
34828   -- Initialize_2404 --
34829   ---------------------
34830
34831   procedure Initialize_2404 is
34832   begin
34833      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34834       (Base + 2404,
34835        AMF.Internals.Tables.UML_String_Data_00.MS_001D'Access);
34836   end Initialize_2404;
34837
34838   ---------------------
34839   -- Initialize_2405 --
34840   ---------------------
34841
34842   procedure Initialize_2405 is
34843   begin
34844      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2405, (Is_Empty => True));
34845   end Initialize_2405;
34846
34847   ---------------------
34848   -- Initialize_2406 --
34849   ---------------------
34850
34851   procedure Initialize_2406 is
34852   begin
34853      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
34854       (Base + 2406,
34855        AMF.Internals.Tables.UML_String_Data_09.MS_09F3'Access);
34856      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2406, (Is_Empty => True));
34857   end Initialize_2406;
34858
34859   ---------------------
34860   -- Initialize_2407 --
34861   ---------------------
34862
34863   procedure Initialize_2407 is
34864   begin
34865      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34866       (Base + 2407,
34867        AMF.Internals.Tables.UML_String_Data_09.MS_094D'Access);
34868   end Initialize_2407;
34869
34870   ---------------------
34871   -- Initialize_2408 --
34872   ---------------------
34873
34874   procedure Initialize_2408 is
34875   begin
34876      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2408, (Is_Empty => True));
34877   end Initialize_2408;
34878
34879   ---------------------
34880   -- Initialize_2409 --
34881   ---------------------
34882
34883   procedure Initialize_2409 is
34884   begin
34885      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34886       (Base + 2409,
34887        AMF.Internals.Tables.UML_String_Data_0A.MS_0A94'Access);
34888   end Initialize_2409;
34889
34890   ---------------------
34891   -- Initialize_2410 --
34892   ---------------------
34893
34894   procedure Initialize_2410 is
34895   begin
34896      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34897       (Base + 2410,
34898        AMF.Internals.Tables.UML_String_Data_03.MS_03FA'Access);
34899   end Initialize_2410;
34900
34901   ---------------------
34902   -- Initialize_2411 --
34903   ---------------------
34904
34905   procedure Initialize_2411 is
34906   begin
34907      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34908       (Base + 2411,
34909        AMF.Internals.Tables.UML_String_Data_00.MS_0044'Access);
34910   end Initialize_2411;
34911
34912   ---------------------
34913   -- Initialize_2412 --
34914   ---------------------
34915
34916   procedure Initialize_2412 is
34917   begin
34918      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34919       (Base + 2412,
34920        AMF.Internals.Tables.UML_String_Data_02.MS_0261'Access);
34921   end Initialize_2412;
34922
34923   ---------------------
34924   -- Initialize_2413 --
34925   ---------------------
34926
34927   procedure Initialize_2413 is
34928   begin
34929      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34930       (Base + 2413,
34931        AMF.Internals.Tables.UML_String_Data_05.MS_0597'Access);
34932   end Initialize_2413;
34933
34934   ---------------------
34935   -- Initialize_2414 --
34936   ---------------------
34937
34938   procedure Initialize_2414 is
34939   begin
34940      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34941       (Base + 2414,
34942        AMF.Internals.Tables.UML_String_Data_0A.MS_0A64'Access);
34943   end Initialize_2414;
34944
34945   ---------------------
34946   -- Initialize_2415 --
34947   ---------------------
34948
34949   procedure Initialize_2415 is
34950   begin
34951      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34952       (Base + 2415,
34953        AMF.Internals.Tables.UML_String_Data_01.MS_01B5'Access);
34954   end Initialize_2415;
34955
34956   ---------------------
34957   -- Initialize_2416 --
34958   ---------------------
34959
34960   procedure Initialize_2416 is
34961   begin
34962      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34963       (Base + 2416,
34964        AMF.Internals.Tables.UML_String_Data_0A.MS_0A5A'Access);
34965   end Initialize_2416;
34966
34967   ---------------------
34968   -- Initialize_2417 --
34969   ---------------------
34970
34971   procedure Initialize_2417 is
34972   begin
34973      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34974       (Base + 2417,
34975        AMF.Internals.Tables.UML_String_Data_06.MS_06A7'Access);
34976   end Initialize_2417;
34977
34978   ---------------------
34979   -- Initialize_2418 --
34980   ---------------------
34981
34982   procedure Initialize_2418 is
34983   begin
34984      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34985       (Base + 2418,
34986        AMF.Internals.Tables.UML_String_Data_00.MS_00E3'Access);
34987   end Initialize_2418;
34988
34989   ---------------------
34990   -- Initialize_2419 --
34991   ---------------------
34992
34993   procedure Initialize_2419 is
34994   begin
34995      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
34996       (Base + 2419,
34997        AMF.Internals.Tables.UML_String_Data_09.MS_094A'Access);
34998   end Initialize_2419;
34999
35000   ---------------------
35001   -- Initialize_2420 --
35002   ---------------------
35003
35004   procedure Initialize_2420 is
35005   begin
35006      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35007       (Base + 2420,
35008        AMF.Internals.Tables.UML_String_Data_04.MS_04C9'Access);
35009   end Initialize_2420;
35010
35011   ---------------------
35012   -- Initialize_2421 --
35013   ---------------------
35014
35015   procedure Initialize_2421 is
35016   begin
35017      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
35018       (Base + 2421,
35019        AMF.Internals.Tables.UML_String_Data_06.MS_0673'Access);
35020      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2421, (Is_Empty => True));
35021   end Initialize_2421;
35022
35023   ---------------------
35024   -- Initialize_2422 --
35025   ---------------------
35026
35027   procedure Initialize_2422 is
35028   begin
35029      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35030       (Base + 2422,
35031        AMF.Internals.Tables.UML_String_Data_0B.MS_0BFC'Access);
35032   end Initialize_2422;
35033
35034   ---------------------
35035   -- Initialize_2423 --
35036   ---------------------
35037
35038   procedure Initialize_2423 is
35039   begin
35040      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2423, (Is_Empty => True));
35041   end Initialize_2423;
35042
35043   ---------------------
35044   -- Initialize_2424 --
35045   ---------------------
35046
35047   procedure Initialize_2424 is
35048   begin
35049      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
35050       (Base + 2424,
35051        AMF.Internals.Tables.UML_String_Data_08.MS_085D'Access);
35052      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2424, (Is_Empty => True));
35053   end Initialize_2424;
35054
35055   ---------------------
35056   -- Initialize_2425 --
35057   ---------------------
35058
35059   procedure Initialize_2425 is
35060   begin
35061      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35062       (Base + 2425,
35063        AMF.Internals.Tables.UML_String_Data_00.MS_00B3'Access);
35064   end Initialize_2425;
35065
35066   ---------------------
35067   -- Initialize_2426 --
35068   ---------------------
35069
35070   procedure Initialize_2426 is
35071   begin
35072      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2426, (Is_Empty => True));
35073   end Initialize_2426;
35074
35075   ---------------------
35076   -- Initialize_2427 --
35077   ---------------------
35078
35079   procedure Initialize_2427 is
35080   begin
35081      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35082       (Base + 2427,
35083        AMF.Internals.Tables.UML_String_Data_09.MS_0993'Access);
35084   end Initialize_2427;
35085
35086   ---------------------
35087   -- Initialize_2428 --
35088   ---------------------
35089
35090   procedure Initialize_2428 is
35091   begin
35092      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35093       (Base + 2428,
35094        AMF.Internals.Tables.UML_String_Data_02.MS_0239'Access);
35095   end Initialize_2428;
35096
35097   ---------------------
35098   -- Initialize_2429 --
35099   ---------------------
35100
35101   procedure Initialize_2429 is
35102   begin
35103      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35104       (Base + 2429,
35105        AMF.Internals.Tables.UML_String_Data_04.MS_0496'Access);
35106   end Initialize_2429;
35107
35108   ---------------------
35109   -- Initialize_2430 --
35110   ---------------------
35111
35112   procedure Initialize_2430 is
35113   begin
35114      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35115       (Base + 2430,
35116        AMF.Internals.Tables.UML_String_Data_0C.MS_0C2D'Access);
35117   end Initialize_2430;
35118
35119   ---------------------
35120   -- Initialize_2431 --
35121   ---------------------
35122
35123   procedure Initialize_2431 is
35124   begin
35125      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35126       (Base + 2431,
35127        AMF.Internals.Tables.UML_String_Data_06.MS_0644'Access);
35128   end Initialize_2431;
35129
35130   ---------------------
35131   -- Initialize_2432 --
35132   ---------------------
35133
35134   procedure Initialize_2432 is
35135   begin
35136      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35137       (Base + 2432,
35138        AMF.Internals.Tables.UML_String_Data_02.MS_02D6'Access);
35139   end Initialize_2432;
35140
35141   ---------------------
35142   -- Initialize_2433 --
35143   ---------------------
35144
35145   procedure Initialize_2433 is
35146   begin
35147      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2433, True);
35148      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
35149       (Base + 2433,
35150        AMF.Internals.Tables.UML_String_Data_04.MS_048D'Access);
35151      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2433, (False, AMF.CMOF.Public_Visibility));
35152   end Initialize_2433;
35153
35154   ---------------------
35155   -- Initialize_2434 --
35156   ---------------------
35157
35158   procedure Initialize_2434 is
35159   begin
35160      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35161       (Base + 2434,
35162        AMF.Internals.Tables.UML_String_Data_04.MS_040C'Access);
35163   end Initialize_2434;
35164
35165   ---------------------
35166   -- Initialize_2435 --
35167   ---------------------
35168
35169   procedure Initialize_2435 is
35170   begin
35171      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
35172       (Base + 2435,
35173        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
35174      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2435, (Is_Empty => True));
35175   end Initialize_2435;
35176
35177   ---------------------
35178   -- Initialize_2436 --
35179   ---------------------
35180
35181   procedure Initialize_2436 is
35182   begin
35183      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2436, (Is_Empty => True));
35184   end Initialize_2436;
35185
35186   ---------------------
35187   -- Initialize_2437 --
35188   ---------------------
35189
35190   procedure Initialize_2437 is
35191   begin
35192      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2437, AMF.CMOF.Return_Parameter);
35193      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 2437, (False, 0));
35194      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
35195       (Base + 2437,
35196        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
35197      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 2437, (False, (Unlimited => True)));
35198      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2437, (False, AMF.CMOF.Public_Visibility));
35199   end Initialize_2437;
35200
35201   ---------------------
35202   -- Initialize_2438 --
35203   ---------------------
35204
35205   procedure Initialize_2438 is
35206   begin
35207      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35208       (Base + 2438,
35209        AMF.Internals.Tables.UML_String_Data_03.MS_03DA'Access);
35210   end Initialize_2438;
35211
35212   ---------------------
35213   -- Initialize_2439 --
35214   ---------------------
35215
35216   procedure Initialize_2439 is
35217   begin
35218      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35219       (Base + 2439,
35220        AMF.Internals.Tables.UML_String_Data_05.MS_05DC'Access);
35221   end Initialize_2439;
35222
35223   ---------------------
35224   -- Initialize_2440 --
35225   ---------------------
35226
35227   procedure Initialize_2440 is
35228   begin
35229      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35230       (Base + 2440,
35231        AMF.Internals.Tables.UML_String_Data_05.MS_0591'Access);
35232   end Initialize_2440;
35233
35234   ---------------------
35235   -- Initialize_2441 --
35236   ---------------------
35237
35238   procedure Initialize_2441 is
35239   begin
35240      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
35241       (Base + 2441,
35242        AMF.Internals.Tables.UML_String_Data_04.MS_0441'Access);
35243      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2441, (Is_Empty => True));
35244   end Initialize_2441;
35245
35246   ---------------------
35247   -- Initialize_2442 --
35248   ---------------------
35249
35250   procedure Initialize_2442 is
35251   begin
35252      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35253       (Base + 2442,
35254        AMF.Internals.Tables.UML_String_Data_00.MS_009E'Access);
35255   end Initialize_2442;
35256
35257   ---------------------
35258   -- Initialize_2443 --
35259   ---------------------
35260
35261   procedure Initialize_2443 is
35262   begin
35263      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2443, (Is_Empty => True));
35264   end Initialize_2443;
35265
35266   ---------------------
35267   -- Initialize_2444 --
35268   ---------------------
35269
35270   procedure Initialize_2444 is
35271   begin
35272      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
35273       (Base + 2444,
35274        AMF.Internals.Tables.UML_String_Data_06.MS_0680'Access);
35275      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2444, (Is_Empty => True));
35276   end Initialize_2444;
35277
35278   ---------------------
35279   -- Initialize_2445 --
35280   ---------------------
35281
35282   procedure Initialize_2445 is
35283   begin
35284      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35285       (Base + 2445,
35286        AMF.Internals.Tables.UML_String_Data_07.MS_07ED'Access);
35287   end Initialize_2445;
35288
35289   ---------------------
35290   -- Initialize_2446 --
35291   ---------------------
35292
35293   procedure Initialize_2446 is
35294   begin
35295      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2446, (Is_Empty => True));
35296   end Initialize_2446;
35297
35298   ---------------------
35299   -- Initialize_2447 --
35300   ---------------------
35301
35302   procedure Initialize_2447 is
35303   begin
35304      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35305       (Base + 2447,
35306        AMF.Internals.Tables.UML_String_Data_05.MS_058B'Access);
35307   end Initialize_2447;
35308
35309   ---------------------
35310   -- Initialize_2448 --
35311   ---------------------
35312
35313   procedure Initialize_2448 is
35314   begin
35315      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35316       (Base + 2448,
35317        AMF.Internals.Tables.UML_String_Data_0B.MS_0BF2'Access);
35318   end Initialize_2448;
35319
35320   ---------------------
35321   -- Initialize_2449 --
35322   ---------------------
35323
35324   procedure Initialize_2449 is
35325   begin
35326      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35327       (Base + 2449,
35328        AMF.Internals.Tables.UML_String_Data_0A.MS_0A3D'Access);
35329   end Initialize_2449;
35330
35331   ---------------------
35332   -- Initialize_2450 --
35333   ---------------------
35334
35335   procedure Initialize_2450 is
35336   begin
35337      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35338       (Base + 2450,
35339        AMF.Internals.Tables.UML_String_Data_08.MS_0833'Access);
35340   end Initialize_2450;
35341
35342   ---------------------
35343   -- Initialize_2451 --
35344   ---------------------
35345
35346   procedure Initialize_2451 is
35347   begin
35348      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
35349       (Base + 2451,
35350        AMF.Internals.Tables.UML_String_Data_03.MS_0304'Access);
35351      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2451, (Is_Empty => True));
35352   end Initialize_2451;
35353
35354   ---------------------
35355   -- Initialize_2452 --
35356   ---------------------
35357
35358   procedure Initialize_2452 is
35359   begin
35360      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35361       (Base + 2452,
35362        AMF.Internals.Tables.UML_String_Data_06.MS_067A'Access);
35363   end Initialize_2452;
35364
35365   ---------------------
35366   -- Initialize_2453 --
35367   ---------------------
35368
35369   procedure Initialize_2453 is
35370   begin
35371      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2453, (Is_Empty => True));
35372   end Initialize_2453;
35373
35374   ---------------------
35375   -- Initialize_2454 --
35376   ---------------------
35377
35378   procedure Initialize_2454 is
35379   begin
35380      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35381       (Base + 2454,
35382        AMF.Internals.Tables.UML_String_Data_00.MS_0037'Access);
35383   end Initialize_2454;
35384
35385   ---------------------
35386   -- Initialize_2455 --
35387   ---------------------
35388
35389   procedure Initialize_2455 is
35390   begin
35391      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35392       (Base + 2455,
35393        AMF.Internals.Tables.UML_String_Data_0A.MS_0A84'Access);
35394   end Initialize_2455;
35395
35396   ---------------------
35397   -- Initialize_2456 --
35398   ---------------------
35399
35400   procedure Initialize_2456 is
35401   begin
35402      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35403       (Base + 2456,
35404        AMF.Internals.Tables.UML_String_Data_05.MS_05C1'Access);
35405   end Initialize_2456;
35406
35407   ---------------------
35408   -- Initialize_2457 --
35409   ---------------------
35410
35411   procedure Initialize_2457 is
35412   begin
35413      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35414       (Base + 2457,
35415        AMF.Internals.Tables.UML_String_Data_02.MS_029F'Access);
35416   end Initialize_2457;
35417
35418   ---------------------
35419   -- Initialize_2458 --
35420   ---------------------
35421
35422   procedure Initialize_2458 is
35423   begin
35424      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35425       (Base + 2458,
35426        AMF.Internals.Tables.UML_String_Data_03.MS_03B9'Access);
35427   end Initialize_2458;
35428
35429   ---------------------
35430   -- Initialize_2459 --
35431   ---------------------
35432
35433   procedure Initialize_2459 is
35434   begin
35435      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35436       (Base + 2459,
35437        AMF.Internals.Tables.UML_String_Data_00.MS_009A'Access);
35438   end Initialize_2459;
35439
35440   ---------------------
35441   -- Initialize_2460 --
35442   ---------------------
35443
35444   procedure Initialize_2460 is
35445   begin
35446      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35447       (Base + 2460,
35448        AMF.Internals.Tables.UML_String_Data_09.MS_0928'Access);
35449   end Initialize_2460;
35450
35451   ---------------------
35452   -- Initialize_2461 --
35453   ---------------------
35454
35455   procedure Initialize_2461 is
35456   begin
35457      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35458       (Base + 2461,
35459        AMF.Internals.Tables.UML_String_Data_05.MS_058A'Access);
35460   end Initialize_2461;
35461
35462   ---------------------
35463   -- Initialize_2462 --
35464   ---------------------
35465
35466   procedure Initialize_2462 is
35467   begin
35468      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
35469       (Base + 2462,
35470        AMF.Internals.Tables.UML_String_Data_08.MS_089E'Access);
35471      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2462, (Is_Empty => True));
35472   end Initialize_2462;
35473
35474   ---------------------
35475   -- Initialize_2463 --
35476   ---------------------
35477
35478   procedure Initialize_2463 is
35479   begin
35480      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35481       (Base + 2463,
35482        AMF.Internals.Tables.UML_String_Data_03.MS_03E6'Access);
35483   end Initialize_2463;
35484
35485   ---------------------
35486   -- Initialize_2464 --
35487   ---------------------
35488
35489   procedure Initialize_2464 is
35490   begin
35491      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2464, (Is_Empty => True));
35492   end Initialize_2464;
35493
35494   ---------------------
35495   -- Initialize_2465 --
35496   ---------------------
35497
35498   procedure Initialize_2465 is
35499   begin
35500      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35501       (Base + 2465,
35502        AMF.Internals.Tables.UML_String_Data_04.MS_0454'Access);
35503   end Initialize_2465;
35504
35505   ---------------------
35506   -- Initialize_2466 --
35507   ---------------------
35508
35509   procedure Initialize_2466 is
35510   begin
35511      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35512       (Base + 2466,
35513        AMF.Internals.Tables.UML_String_Data_04.MS_041A'Access);
35514   end Initialize_2466;
35515
35516   ---------------------
35517   -- Initialize_2467 --
35518   ---------------------
35519
35520   procedure Initialize_2467 is
35521   begin
35522      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35523       (Base + 2467,
35524        AMF.Internals.Tables.UML_String_Data_06.MS_0631'Access);
35525   end Initialize_2467;
35526
35527   ---------------------
35528   -- Initialize_2468 --
35529   ---------------------
35530
35531   procedure Initialize_2468 is
35532   begin
35533      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35534       (Base + 2468,
35535        AMF.Internals.Tables.UML_String_Data_07.MS_074C'Access);
35536   end Initialize_2468;
35537
35538   ---------------------
35539   -- Initialize_2469 --
35540   ---------------------
35541
35542   procedure Initialize_2469 is
35543   begin
35544      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35545       (Base + 2469,
35546        AMF.Internals.Tables.UML_String_Data_0A.MS_0AB6'Access);
35547   end Initialize_2469;
35548
35549   ---------------------
35550   -- Initialize_2470 --
35551   ---------------------
35552
35553   procedure Initialize_2470 is
35554   begin
35555      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35556       (Base + 2470,
35557        AMF.Internals.Tables.UML_String_Data_09.MS_0957'Access);
35558   end Initialize_2470;
35559
35560   ---------------------
35561   -- Initialize_2471 --
35562   ---------------------
35563
35564   procedure Initialize_2471 is
35565   begin
35566      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
35567       (Base + 2471,
35568        AMF.Internals.Tables.UML_String_Data_08.MS_089E'Access);
35569      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2471, (Is_Empty => True));
35570   end Initialize_2471;
35571
35572   ---------------------
35573   -- Initialize_2472 --
35574   ---------------------
35575
35576   procedure Initialize_2472 is
35577   begin
35578      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35579       (Base + 2472,
35580        AMF.Internals.Tables.UML_String_Data_03.MS_034E'Access);
35581   end Initialize_2472;
35582
35583   ---------------------
35584   -- Initialize_2473 --
35585   ---------------------
35586
35587   procedure Initialize_2473 is
35588   begin
35589      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2473, (Is_Empty => True));
35590   end Initialize_2473;
35591
35592   ---------------------
35593   -- Initialize_2474 --
35594   ---------------------
35595
35596   procedure Initialize_2474 is
35597   begin
35598      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35599       (Base + 2474,
35600        AMF.Internals.Tables.UML_String_Data_0B.MS_0B1E'Access);
35601   end Initialize_2474;
35602
35603   ---------------------
35604   -- Initialize_2475 --
35605   ---------------------
35606
35607   procedure Initialize_2475 is
35608   begin
35609      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35610       (Base + 2475,
35611        AMF.Internals.Tables.UML_String_Data_02.MS_0236'Access);
35612   end Initialize_2475;
35613
35614   ---------------------
35615   -- Initialize_2476 --
35616   ---------------------
35617
35618   procedure Initialize_2476 is
35619   begin
35620      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35621       (Base + 2476,
35622        AMF.Internals.Tables.UML_String_Data_02.MS_0275'Access);
35623   end Initialize_2476;
35624
35625   ---------------------
35626   -- Initialize_2477 --
35627   ---------------------
35628
35629   procedure Initialize_2477 is
35630   begin
35631      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
35632       (Base + 2477,
35633        AMF.Internals.Tables.UML_String_Data_08.MS_0878'Access);
35634      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2477, (Is_Empty => True));
35635   end Initialize_2477;
35636
35637   ---------------------
35638   -- Initialize_2478 --
35639   ---------------------
35640
35641   procedure Initialize_2478 is
35642   begin
35643      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35644       (Base + 2478,
35645        AMF.Internals.Tables.UML_String_Data_08.MS_087B'Access);
35646   end Initialize_2478;
35647
35648   ---------------------
35649   -- Initialize_2479 --
35650   ---------------------
35651
35652   procedure Initialize_2479 is
35653   begin
35654      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2479, (Is_Empty => True));
35655   end Initialize_2479;
35656
35657   ---------------------
35658   -- Initialize_2480 --
35659   ---------------------
35660
35661   procedure Initialize_2480 is
35662   begin
35663      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
35664       (Base + 2480,
35665        AMF.Internals.Tables.UML_String_Data_03.MS_03F9'Access);
35666      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2480, (Is_Empty => True));
35667   end Initialize_2480;
35668
35669   ---------------------
35670   -- Initialize_2481 --
35671   ---------------------
35672
35673   procedure Initialize_2481 is
35674   begin
35675      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35676       (Base + 2481,
35677        AMF.Internals.Tables.UML_String_Data_06.MS_0645'Access);
35678   end Initialize_2481;
35679
35680   ---------------------
35681   -- Initialize_2482 --
35682   ---------------------
35683
35684   procedure Initialize_2482 is
35685   begin
35686      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2482, (Is_Empty => True));
35687   end Initialize_2482;
35688
35689   ---------------------
35690   -- Initialize_2483 --
35691   ---------------------
35692
35693   procedure Initialize_2483 is
35694   begin
35695      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35696       (Base + 2483,
35697        AMF.Internals.Tables.UML_String_Data_05.MS_058C'Access);
35698   end Initialize_2483;
35699
35700   ---------------------
35701   -- Initialize_2484 --
35702   ---------------------
35703
35704   procedure Initialize_2484 is
35705   begin
35706      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35707       (Base + 2484,
35708        AMF.Internals.Tables.UML_String_Data_05.MS_0541'Access);
35709   end Initialize_2484;
35710
35711   ---------------------
35712   -- Initialize_2485 --
35713   ---------------------
35714
35715   procedure Initialize_2485 is
35716   begin
35717      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35718       (Base + 2485,
35719        AMF.Internals.Tables.UML_String_Data_08.MS_08AC'Access);
35720   end Initialize_2485;
35721
35722   ---------------------
35723   -- Initialize_2486 --
35724   ---------------------
35725
35726   procedure Initialize_2486 is
35727   begin
35728      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2486, True);
35729      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
35730       (Base + 2486,
35731        AMF.Internals.Tables.UML_String_Data_07.MS_0707'Access);
35732      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2486, (False, AMF.CMOF.Public_Visibility));
35733   end Initialize_2486;
35734
35735   ---------------------
35736   -- Initialize_2487 --
35737   ---------------------
35738
35739   procedure Initialize_2487 is
35740   begin
35741      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35742       (Base + 2487,
35743        AMF.Internals.Tables.UML_String_Data_0C.MS_0C20'Access);
35744   end Initialize_2487;
35745
35746   ---------------------
35747   -- Initialize_2488 --
35748   ---------------------
35749
35750   procedure Initialize_2488 is
35751   begin
35752      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
35753       (Base + 2488,
35754        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
35755      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2488, (Is_Empty => True));
35756   end Initialize_2488;
35757
35758   ---------------------
35759   -- Initialize_2489 --
35760   ---------------------
35761
35762   procedure Initialize_2489 is
35763   begin
35764      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2489, (Is_Empty => True));
35765   end Initialize_2489;
35766
35767   ---------------------
35768   -- Initialize_2490 --
35769   ---------------------
35770
35771   procedure Initialize_2490 is
35772   begin
35773      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2490, AMF.CMOF.Return_Parameter);
35774      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 2490, (False, 0));
35775      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
35776       (Base + 2490,
35777        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
35778      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 2490, (False, (Unlimited => True)));
35779      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2490, (False, AMF.CMOF.Public_Visibility));
35780   end Initialize_2490;
35781
35782   ---------------------
35783   -- Initialize_2491 --
35784   ---------------------
35785
35786   procedure Initialize_2491 is
35787   begin
35788      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2491, True);
35789      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
35790       (Base + 2491,
35791        AMF.Internals.Tables.UML_String_Data_04.MS_040A'Access);
35792      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2491, (False, AMF.CMOF.Public_Visibility));
35793   end Initialize_2491;
35794
35795   ---------------------
35796   -- Initialize_2492 --
35797   ---------------------
35798
35799   procedure Initialize_2492 is
35800   begin
35801      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35802       (Base + 2492,
35803        AMF.Internals.Tables.UML_String_Data_05.MS_05CA'Access);
35804   end Initialize_2492;
35805
35806   ---------------------
35807   -- Initialize_2493 --
35808   ---------------------
35809
35810   procedure Initialize_2493 is
35811   begin
35812      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
35813       (Base + 2493,
35814        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
35815      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2493, (Is_Empty => True));
35816   end Initialize_2493;
35817
35818   ---------------------
35819   -- Initialize_2494 --
35820   ---------------------
35821
35822   procedure Initialize_2494 is
35823   begin
35824      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2494, (Is_Empty => True));
35825   end Initialize_2494;
35826
35827   ---------------------
35828   -- Initialize_2495 --
35829   ---------------------
35830
35831   procedure Initialize_2495 is
35832   begin
35833      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2495, AMF.CMOF.Return_Parameter);
35834      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
35835       (Base + 2495,
35836        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
35837      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2495, (False, AMF.CMOF.Public_Visibility));
35838   end Initialize_2495;
35839
35840   ---------------------
35841   -- Initialize_2496 --
35842   ---------------------
35843
35844   procedure Initialize_2496 is
35845   begin
35846      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35847       (Base + 2496,
35848        AMF.Internals.Tables.UML_String_Data_01.MS_01AB'Access);
35849   end Initialize_2496;
35850
35851   ---------------------
35852   -- Initialize_2497 --
35853   ---------------------
35854
35855   procedure Initialize_2497 is
35856   begin
35857      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
35858       (Base + 2497,
35859        AMF.Internals.Tables.UML_String_Data_07.MS_07AC'Access);
35860      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2497, (Is_Empty => True));
35861   end Initialize_2497;
35862
35863   ---------------------
35864   -- Initialize_2498 --
35865   ---------------------
35866
35867   procedure Initialize_2498 is
35868   begin
35869      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35870       (Base + 2498,
35871        AMF.Internals.Tables.UML_String_Data_08.MS_08FA'Access);
35872   end Initialize_2498;
35873
35874   ---------------------
35875   -- Initialize_2499 --
35876   ---------------------
35877
35878   procedure Initialize_2499 is
35879   begin
35880      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2499, (Is_Empty => True));
35881   end Initialize_2499;
35882
35883   ---------------------
35884   -- Initialize_2500 --
35885   ---------------------
35886
35887   procedure Initialize_2500 is
35888   begin
35889      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
35890       (Base + 2500,
35891        AMF.Internals.Tables.UML_String_Data_08.MS_08CE'Access);
35892      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2500, (Is_Empty => True));
35893   end Initialize_2500;
35894
35895   ---------------------
35896   -- Initialize_2501 --
35897   ---------------------
35898
35899   procedure Initialize_2501 is
35900   begin
35901      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35902       (Base + 2501,
35903        AMF.Internals.Tables.UML_String_Data_06.MS_06B2'Access);
35904   end Initialize_2501;
35905
35906   ---------------------
35907   -- Initialize_2502 --
35908   ---------------------
35909
35910   procedure Initialize_2502 is
35911   begin
35912      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2502, (Is_Empty => True));
35913   end Initialize_2502;
35914
35915   ---------------------
35916   -- Initialize_2503 --
35917   ---------------------
35918
35919   procedure Initialize_2503 is
35920   begin
35921      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35922       (Base + 2503,
35923        AMF.Internals.Tables.UML_String_Data_03.MS_038B'Access);
35924   end Initialize_2503;
35925
35926   ---------------------
35927   -- Initialize_2504 --
35928   ---------------------
35929
35930   procedure Initialize_2504 is
35931   begin
35932      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35933       (Base + 2504,
35934        AMF.Internals.Tables.UML_String_Data_0C.MS_0C43'Access);
35935   end Initialize_2504;
35936
35937   ---------------------
35938   -- Initialize_2505 --
35939   ---------------------
35940
35941   procedure Initialize_2505 is
35942   begin
35943      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35944       (Base + 2505,
35945        AMF.Internals.Tables.UML_String_Data_03.MS_03D0'Access);
35946   end Initialize_2505;
35947
35948   ---------------------
35949   -- Initialize_2506 --
35950   ---------------------
35951
35952   procedure Initialize_2506 is
35953   begin
35954      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35955       (Base + 2506,
35956        AMF.Internals.Tables.UML_String_Data_0A.MS_0A8B'Access);
35957   end Initialize_2506;
35958
35959   ---------------------
35960   -- Initialize_2507 --
35961   ---------------------
35962
35963   procedure Initialize_2507 is
35964   begin
35965      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2507, True);
35966      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
35967       (Base + 2507,
35968        AMF.Internals.Tables.UML_String_Data_0B.MS_0B14'Access);
35969      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2507, (False, AMF.CMOF.Public_Visibility));
35970   end Initialize_2507;
35971
35972   ---------------------
35973   -- Initialize_2508 --
35974   ---------------------
35975
35976   procedure Initialize_2508 is
35977   begin
35978      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
35979       (Base + 2508,
35980        AMF.Internals.Tables.UML_String_Data_07.MS_071E'Access);
35981   end Initialize_2508;
35982
35983   ---------------------
35984   -- Initialize_2509 --
35985   ---------------------
35986
35987   procedure Initialize_2509 is
35988   begin
35989      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
35990       (Base + 2509,
35991        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
35992      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2509, (Is_Empty => True));
35993   end Initialize_2509;
35994
35995   ---------------------
35996   -- Initialize_2510 --
35997   ---------------------
35998
35999   procedure Initialize_2510 is
36000   begin
36001      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2510, (Is_Empty => True));
36002   end Initialize_2510;
36003
36004   ---------------------
36005   -- Initialize_2511 --
36006   ---------------------
36007
36008   procedure Initialize_2511 is
36009   begin
36010      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2511, AMF.CMOF.Return_Parameter);
36011      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
36012       (Base + 2511,
36013        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
36014      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2511, (False, AMF.CMOF.Public_Visibility));
36015   end Initialize_2511;
36016
36017   ---------------------
36018   -- Initialize_2512 --
36019   ---------------------
36020
36021   procedure Initialize_2512 is
36022   begin
36023      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36024       (Base + 2512,
36025        AMF.Internals.Tables.UML_String_Data_08.MS_0892'Access);
36026   end Initialize_2512;
36027
36028   ---------------------
36029   -- Initialize_2513 --
36030   ---------------------
36031
36032   procedure Initialize_2513 is
36033   begin
36034      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36035       (Base + 2513,
36036        AMF.Internals.Tables.UML_String_Data_03.MS_039A'Access);
36037   end Initialize_2513;
36038
36039   ---------------------
36040   -- Initialize_2514 --
36041   ---------------------
36042
36043   procedure Initialize_2514 is
36044   begin
36045      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2514, True);
36046      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
36047       (Base + 2514,
36048        AMF.Internals.Tables.UML_String_Data_0B.MS_0B52'Access);
36049      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2514, (False, AMF.CMOF.Public_Visibility));
36050   end Initialize_2514;
36051
36052   ---------------------
36053   -- Initialize_2515 --
36054   ---------------------
36055
36056   procedure Initialize_2515 is
36057   begin
36058      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36059       (Base + 2515,
36060        AMF.Internals.Tables.UML_String_Data_03.MS_03B8'Access);
36061   end Initialize_2515;
36062
36063   ---------------------
36064   -- Initialize_2516 --
36065   ---------------------
36066
36067   procedure Initialize_2516 is
36068   begin
36069      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
36070       (Base + 2516,
36071        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
36072      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2516, (Is_Empty => True));
36073   end Initialize_2516;
36074
36075   ---------------------
36076   -- Initialize_2517 --
36077   ---------------------
36078
36079   procedure Initialize_2517 is
36080   begin
36081      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2517, (Is_Empty => True));
36082   end Initialize_2517;
36083
36084   ---------------------
36085   -- Initialize_2518 --
36086   ---------------------
36087
36088   procedure Initialize_2518 is
36089   begin
36090      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2518, AMF.CMOF.Return_Parameter);
36091      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 2518, (False, 0));
36092      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
36093       (Base + 2518,
36094        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
36095      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 2518, (False, (Unlimited => True)));
36096      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2518, (False, AMF.CMOF.Public_Visibility));
36097   end Initialize_2518;
36098
36099   ---------------------
36100   -- Initialize_2519 --
36101   ---------------------
36102
36103   procedure Initialize_2519 is
36104   begin
36105      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36106       (Base + 2519,
36107        AMF.Internals.Tables.UML_String_Data_06.MS_065A'Access);
36108   end Initialize_2519;
36109
36110   ---------------------
36111   -- Initialize_2520 --
36112   ---------------------
36113
36114   procedure Initialize_2520 is
36115   begin
36116      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36117       (Base + 2520,
36118        AMF.Internals.Tables.UML_String_Data_0B.MS_0B61'Access);
36119   end Initialize_2520;
36120
36121   ---------------------
36122   -- Initialize_2521 --
36123   ---------------------
36124
36125   procedure Initialize_2521 is
36126   begin
36127      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36128       (Base + 2521,
36129        AMF.Internals.Tables.UML_String_Data_0C.MS_0C09'Access);
36130   end Initialize_2521;
36131
36132   ---------------------
36133   -- Initialize_2522 --
36134   ---------------------
36135
36136   procedure Initialize_2522 is
36137   begin
36138      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
36139       (Base + 2522,
36140        AMF.Internals.Tables.UML_String_Data_05.MS_0554'Access);
36141      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2522, (Is_Empty => True));
36142   end Initialize_2522;
36143
36144   ---------------------
36145   -- Initialize_2523 --
36146   ---------------------
36147
36148   procedure Initialize_2523 is
36149   begin
36150      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2523, (Is_Empty => True));
36151   end Initialize_2523;
36152
36153   ---------------------
36154   -- Initialize_2524 --
36155   ---------------------
36156
36157   procedure Initialize_2524 is
36158   begin
36159      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36160       (Base + 2524,
36161        AMF.Internals.Tables.UML_String_Data_00.MS_002F'Access);
36162   end Initialize_2524;
36163
36164   ---------------------
36165   -- Initialize_2525 --
36166   ---------------------
36167
36168   procedure Initialize_2525 is
36169   begin
36170      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36171       (Base + 2525,
36172        AMF.Internals.Tables.UML_String_Data_02.MS_026A'Access);
36173   end Initialize_2525;
36174
36175   ---------------------
36176   -- Initialize_2526 --
36177   ---------------------
36178
36179   procedure Initialize_2526 is
36180   begin
36181      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2526, True);
36182      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
36183       (Base + 2526,
36184        AMF.Internals.Tables.UML_String_Data_03.MS_0321'Access);
36185      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2526, (False, AMF.CMOF.Public_Visibility));
36186   end Initialize_2526;
36187
36188   ---------------------
36189   -- Initialize_2527 --
36190   ---------------------
36191
36192   procedure Initialize_2527 is
36193   begin
36194      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36195       (Base + 2527,
36196        AMF.Internals.Tables.UML_String_Data_04.MS_04EA'Access);
36197   end Initialize_2527;
36198
36199   ---------------------
36200   -- Initialize_2528 --
36201   ---------------------
36202
36203   procedure Initialize_2528 is
36204   begin
36205      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
36206       (Base + 2528,
36207        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
36208      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2528, (Is_Empty => True));
36209   end Initialize_2528;
36210
36211   ---------------------
36212   -- Initialize_2529 --
36213   ---------------------
36214
36215   procedure Initialize_2529 is
36216   begin
36217      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2529, (Is_Empty => True));
36218   end Initialize_2529;
36219
36220   ---------------------
36221   -- Initialize_2530 --
36222   ---------------------
36223
36224   procedure Initialize_2530 is
36225   begin
36226      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2530, AMF.CMOF.Return_Parameter);
36227      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
36228       (Base + 2530,
36229        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
36230      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2530, (False, AMF.CMOF.Public_Visibility));
36231   end Initialize_2530;
36232
36233   ---------------------
36234   -- Initialize_2531 --
36235   ---------------------
36236
36237   procedure Initialize_2531 is
36238   begin
36239      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36240       (Base + 2531,
36241        AMF.Internals.Tables.UML_String_Data_0A.MS_0A0E'Access);
36242   end Initialize_2531;
36243
36244   ---------------------
36245   -- Initialize_2532 --
36246   ---------------------
36247
36248   procedure Initialize_2532 is
36249   begin
36250      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36251       (Base + 2532,
36252        AMF.Internals.Tables.UML_String_Data_07.MS_07E4'Access);
36253   end Initialize_2532;
36254
36255   ---------------------
36256   -- Initialize_2533 --
36257   ---------------------
36258
36259   procedure Initialize_2533 is
36260   begin
36261      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
36262       (Base + 2533,
36263        AMF.Internals.Tables.UML_String_Data_00.MS_00FD'Access);
36264      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2533, (Is_Empty => True));
36265   end Initialize_2533;
36266
36267   ---------------------
36268   -- Initialize_2534 --
36269   ---------------------
36270
36271   procedure Initialize_2534 is
36272   begin
36273      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36274       (Base + 2534,
36275        AMF.Internals.Tables.UML_String_Data_01.MS_01F8'Access);
36276   end Initialize_2534;
36277
36278   ---------------------
36279   -- Initialize_2535 --
36280   ---------------------
36281
36282   procedure Initialize_2535 is
36283   begin
36284      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2535, (Is_Empty => True));
36285   end Initialize_2535;
36286
36287   ---------------------
36288   -- Initialize_2536 --
36289   ---------------------
36290
36291   procedure Initialize_2536 is
36292   begin
36293      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
36294       (Base + 2536,
36295        AMF.Internals.Tables.UML_String_Data_08.MS_0853'Access);
36296      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2536, (Is_Empty => True));
36297   end Initialize_2536;
36298
36299   ---------------------
36300   -- Initialize_2537 --
36301   ---------------------
36302
36303   procedure Initialize_2537 is
36304   begin
36305      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36306       (Base + 2537,
36307        AMF.Internals.Tables.UML_String_Data_07.MS_07F3'Access);
36308   end Initialize_2537;
36309
36310   ---------------------
36311   -- Initialize_2538 --
36312   ---------------------
36313
36314   procedure Initialize_2538 is
36315   begin
36316      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2538, (Is_Empty => True));
36317   end Initialize_2538;
36318
36319   ---------------------
36320   -- Initialize_2539 --
36321   ---------------------
36322
36323   procedure Initialize_2539 is
36324   begin
36325      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
36326       (Base + 2539,
36327        AMF.Internals.Tables.UML_String_Data_07.MS_078B'Access);
36328      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2539, (Is_Empty => True));
36329   end Initialize_2539;
36330
36331   ---------------------
36332   -- Initialize_2540 --
36333   ---------------------
36334
36335   procedure Initialize_2540 is
36336   begin
36337      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36338       (Base + 2540,
36339        AMF.Internals.Tables.UML_String_Data_06.MS_0621'Access);
36340   end Initialize_2540;
36341
36342   ---------------------
36343   -- Initialize_2541 --
36344   ---------------------
36345
36346   procedure Initialize_2541 is
36347   begin
36348      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2541, (Is_Empty => True));
36349   end Initialize_2541;
36350
36351   ---------------------
36352   -- Initialize_2542 --
36353   ---------------------
36354
36355   procedure Initialize_2542 is
36356   begin
36357      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
36358       (Base + 2542,
36359        AMF.Internals.Tables.UML_String_Data_01.MS_0135'Access);
36360      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2542, (Is_Empty => True));
36361   end Initialize_2542;
36362
36363   ---------------------
36364   -- Initialize_2543 --
36365   ---------------------
36366
36367   procedure Initialize_2543 is
36368   begin
36369      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36370       (Base + 2543,
36371        AMF.Internals.Tables.UML_String_Data_00.MS_004E'Access);
36372   end Initialize_2543;
36373
36374   ---------------------
36375   -- Initialize_2544 --
36376   ---------------------
36377
36378   procedure Initialize_2544 is
36379   begin
36380      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2544, (Is_Empty => True));
36381   end Initialize_2544;
36382
36383   ---------------------
36384   -- Initialize_2545 --
36385   ---------------------
36386
36387   procedure Initialize_2545 is
36388   begin
36389      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36390       (Base + 2545,
36391        AMF.Internals.Tables.UML_String_Data_07.MS_07C9'Access);
36392   end Initialize_2545;
36393
36394   ---------------------
36395   -- Initialize_2546 --
36396   ---------------------
36397
36398   procedure Initialize_2546 is
36399   begin
36400      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36401       (Base + 2546,
36402        AMF.Internals.Tables.UML_String_Data_09.MS_099F'Access);
36403   end Initialize_2546;
36404
36405   ---------------------
36406   -- Initialize_2547 --
36407   ---------------------
36408
36409   procedure Initialize_2547 is
36410   begin
36411      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36412       (Base + 2547,
36413        AMF.Internals.Tables.UML_String_Data_0B.MS_0B84'Access);
36414   end Initialize_2547;
36415
36416   ---------------------
36417   -- Initialize_2548 --
36418   ---------------------
36419
36420   procedure Initialize_2548 is
36421   begin
36422      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36423       (Base + 2548,
36424        AMF.Internals.Tables.UML_String_Data_03.MS_036D'Access);
36425   end Initialize_2548;
36426
36427   ---------------------
36428   -- Initialize_2549 --
36429   ---------------------
36430
36431   procedure Initialize_2549 is
36432   begin
36433      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36434       (Base + 2549,
36435        AMF.Internals.Tables.UML_String_Data_0A.MS_0A00'Access);
36436   end Initialize_2549;
36437
36438   ---------------------
36439   -- Initialize_2550 --
36440   ---------------------
36441
36442   procedure Initialize_2550 is
36443   begin
36444      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36445       (Base + 2550,
36446        AMF.Internals.Tables.UML_String_Data_0B.MS_0B5E'Access);
36447   end Initialize_2550;
36448
36449   ---------------------
36450   -- Initialize_2551 --
36451   ---------------------
36452
36453   procedure Initialize_2551 is
36454   begin
36455      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36456       (Base + 2551,
36457        AMF.Internals.Tables.UML_String_Data_06.MS_06C7'Access);
36458   end Initialize_2551;
36459
36460   ---------------------
36461   -- Initialize_2552 --
36462   ---------------------
36463
36464   procedure Initialize_2552 is
36465   begin
36466      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36467       (Base + 2552,
36468        AMF.Internals.Tables.UML_String_Data_0C.MS_0C1D'Access);
36469   end Initialize_2552;
36470
36471   ---------------------
36472   -- Initialize_2553 --
36473   ---------------------
36474
36475   procedure Initialize_2553 is
36476   begin
36477      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36478       (Base + 2553,
36479        AMF.Internals.Tables.UML_String_Data_0B.MS_0BEB'Access);
36480   end Initialize_2553;
36481
36482   ---------------------
36483   -- Initialize_2554 --
36484   ---------------------
36485
36486   procedure Initialize_2554 is
36487   begin
36488      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36489       (Base + 2554,
36490        AMF.Internals.Tables.UML_String_Data_02.MS_0208'Access);
36491   end Initialize_2554;
36492
36493   ---------------------
36494   -- Initialize_2555 --
36495   ---------------------
36496
36497   procedure Initialize_2555 is
36498   begin
36499      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36500       (Base + 2555,
36501        AMF.Internals.Tables.UML_String_Data_07.MS_075D'Access);
36502   end Initialize_2555;
36503
36504   ---------------------
36505   -- Initialize_2556 --
36506   ---------------------
36507
36508   procedure Initialize_2556 is
36509   begin
36510      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
36511       (Base + 2556,
36512        AMF.Internals.Tables.UML_String_Data_0A.MS_0A14'Access);
36513      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2556, (Is_Empty => True));
36514   end Initialize_2556;
36515
36516   ---------------------
36517   -- Initialize_2557 --
36518   ---------------------
36519
36520   procedure Initialize_2557 is
36521   begin
36522      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36523       (Base + 2557,
36524        AMF.Internals.Tables.UML_String_Data_09.MS_0908'Access);
36525   end Initialize_2557;
36526
36527   ---------------------
36528   -- Initialize_2558 --
36529   ---------------------
36530
36531   procedure Initialize_2558 is
36532   begin
36533      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2558, (Is_Empty => True));
36534   end Initialize_2558;
36535
36536   ---------------------
36537   -- Initialize_2559 --
36538   ---------------------
36539
36540   procedure Initialize_2559 is
36541   begin
36542      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36543       (Base + 2559,
36544        AMF.Internals.Tables.UML_String_Data_07.MS_0718'Access);
36545   end Initialize_2559;
36546
36547   ---------------------
36548   -- Initialize_2560 --
36549   ---------------------
36550
36551   procedure Initialize_2560 is
36552   begin
36553      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36554       (Base + 2560,
36555        AMF.Internals.Tables.UML_String_Data_0B.MS_0B3E'Access);
36556   end Initialize_2560;
36557
36558   ---------------------
36559   -- Initialize_2561 --
36560   ---------------------
36561
36562   procedure Initialize_2561 is
36563   begin
36564      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36565       (Base + 2561,
36566        AMF.Internals.Tables.UML_String_Data_05.MS_05B7'Access);
36567   end Initialize_2561;
36568
36569   ---------------------
36570   -- Initialize_2562 --
36571   ---------------------
36572
36573   procedure Initialize_2562 is
36574   begin
36575      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
36576       (Base + 2562,
36577        AMF.Internals.Tables.UML_String_Data_02.MS_02D7'Access);
36578      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2562, (Is_Empty => True));
36579   end Initialize_2562;
36580
36581   ---------------------
36582   -- Initialize_2563 --
36583   ---------------------
36584
36585   procedure Initialize_2563 is
36586   begin
36587      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36588       (Base + 2563,
36589        AMF.Internals.Tables.UML_String_Data_05.MS_05AA'Access);
36590   end Initialize_2563;
36591
36592   ---------------------
36593   -- Initialize_2564 --
36594   ---------------------
36595
36596   procedure Initialize_2564 is
36597   begin
36598      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2564, (Is_Empty => True));
36599   end Initialize_2564;
36600
36601   ---------------------
36602   -- Initialize_2565 --
36603   ---------------------
36604
36605   procedure Initialize_2565 is
36606   begin
36607      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36608       (Base + 2565,
36609        AMF.Internals.Tables.UML_String_Data_05.MS_05F0'Access);
36610   end Initialize_2565;
36611
36612   ---------------------
36613   -- Initialize_2566 --
36614   ---------------------
36615
36616   procedure Initialize_2566 is
36617   begin
36618      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36619       (Base + 2566,
36620        AMF.Internals.Tables.UML_String_Data_06.MS_0636'Access);
36621   end Initialize_2566;
36622
36623   ---------------------
36624   -- Initialize_2567 --
36625   ---------------------
36626
36627   procedure Initialize_2567 is
36628   begin
36629      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36630       (Base + 2567,
36631        AMF.Internals.Tables.UML_String_Data_09.MS_09E9'Access);
36632   end Initialize_2567;
36633
36634   ---------------------
36635   -- Initialize_2568 --
36636   ---------------------
36637
36638   procedure Initialize_2568 is
36639   begin
36640      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
36641       (Base + 2568,
36642        AMF.Internals.Tables.UML_String_Data_0B.MS_0BED'Access);
36643      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2568, (Is_Empty => True));
36644   end Initialize_2568;
36645
36646   ---------------------
36647   -- Initialize_2569 --
36648   ---------------------
36649
36650   procedure Initialize_2569 is
36651   begin
36652      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36653       (Base + 2569,
36654        AMF.Internals.Tables.UML_String_Data_0C.MS_0C96'Access);
36655   end Initialize_2569;
36656
36657   ---------------------
36658   -- Initialize_2570 --
36659   ---------------------
36660
36661   procedure Initialize_2570 is
36662   begin
36663      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2570, (Is_Empty => True));
36664   end Initialize_2570;
36665
36666   ---------------------
36667   -- Initialize_2571 --
36668   ---------------------
36669
36670   procedure Initialize_2571 is
36671   begin
36672      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36673       (Base + 2571,
36674        AMF.Internals.Tables.UML_String_Data_01.MS_017D'Access);
36675   end Initialize_2571;
36676
36677   ---------------------
36678   -- Initialize_2572 --
36679   ---------------------
36680
36681   procedure Initialize_2572 is
36682   begin
36683      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36684       (Base + 2572,
36685        AMF.Internals.Tables.UML_String_Data_0B.MS_0B8D'Access);
36686   end Initialize_2572;
36687
36688   ---------------------
36689   -- Initialize_2573 --
36690   ---------------------
36691
36692   procedure Initialize_2573 is
36693   begin
36694      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36695       (Base + 2573,
36696        AMF.Internals.Tables.UML_String_Data_00.MS_00AB'Access);
36697   end Initialize_2573;
36698
36699   ---------------------
36700   -- Initialize_2574 --
36701   ---------------------
36702
36703   procedure Initialize_2574 is
36704   begin
36705      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36706       (Base + 2574,
36707        AMF.Internals.Tables.UML_String_Data_0C.MS_0C49'Access);
36708   end Initialize_2574;
36709
36710   ---------------------
36711   -- Initialize_2575 --
36712   ---------------------
36713
36714   procedure Initialize_2575 is
36715   begin
36716      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36717       (Base + 2575,
36718        AMF.Internals.Tables.UML_String_Data_08.MS_0805'Access);
36719   end Initialize_2575;
36720
36721   ---------------------
36722   -- Initialize_2576 --
36723   ---------------------
36724
36725   procedure Initialize_2576 is
36726   begin
36727      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36728       (Base + 2576,
36729        AMF.Internals.Tables.UML_String_Data_08.MS_0896'Access);
36730   end Initialize_2576;
36731
36732   ---------------------
36733   -- Initialize_2577 --
36734   ---------------------
36735
36736   procedure Initialize_2577 is
36737   begin
36738      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36739       (Base + 2577,
36740        AMF.Internals.Tables.UML_String_Data_06.MS_0681'Access);
36741   end Initialize_2577;
36742
36743   ---------------------
36744   -- Initialize_2578 --
36745   ---------------------
36746
36747   procedure Initialize_2578 is
36748   begin
36749      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36750       (Base + 2578,
36751        AMF.Internals.Tables.UML_String_Data_0A.MS_0AFE'Access);
36752   end Initialize_2578;
36753
36754   ---------------------
36755   -- Initialize_2579 --
36756   ---------------------
36757
36758   procedure Initialize_2579 is
36759   begin
36760      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
36761       (Base + 2579,
36762        AMF.Internals.Tables.UML_String_Data_03.MS_0349'Access);
36763      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2579, (Is_Empty => True));
36764   end Initialize_2579;
36765
36766   ---------------------
36767   -- Initialize_2580 --
36768   ---------------------
36769
36770   procedure Initialize_2580 is
36771   begin
36772      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36773       (Base + 2580,
36774        AMF.Internals.Tables.UML_String_Data_02.MS_0252'Access);
36775   end Initialize_2580;
36776
36777   ---------------------
36778   -- Initialize_2581 --
36779   ---------------------
36780
36781   procedure Initialize_2581 is
36782   begin
36783      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2581, (Is_Empty => True));
36784   end Initialize_2581;
36785
36786   ---------------------
36787   -- Initialize_2582 --
36788   ---------------------
36789
36790   procedure Initialize_2582 is
36791   begin
36792      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36793       (Base + 2582,
36794        AMF.Internals.Tables.UML_String_Data_02.MS_0204'Access);
36795   end Initialize_2582;
36796
36797   ---------------------
36798   -- Initialize_2583 --
36799   ---------------------
36800
36801   procedure Initialize_2583 is
36802   begin
36803      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36804       (Base + 2583,
36805        AMF.Internals.Tables.UML_String_Data_0B.MS_0B6E'Access);
36806   end Initialize_2583;
36807
36808   ---------------------
36809   -- Initialize_2584 --
36810   ---------------------
36811
36812   procedure Initialize_2584 is
36813   begin
36814      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36815       (Base + 2584,
36816        AMF.Internals.Tables.UML_String_Data_06.MS_06FD'Access);
36817   end Initialize_2584;
36818
36819   ---------------------
36820   -- Initialize_2585 --
36821   ---------------------
36822
36823   procedure Initialize_2585 is
36824   begin
36825      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36826       (Base + 2585,
36827        AMF.Internals.Tables.UML_String_Data_0C.MS_0C83'Access);
36828   end Initialize_2585;
36829
36830   ---------------------
36831   -- Initialize_2586 --
36832   ---------------------
36833
36834   procedure Initialize_2586 is
36835   begin
36836      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36837       (Base + 2586,
36838        AMF.Internals.Tables.UML_String_Data_06.MS_06F1'Access);
36839   end Initialize_2586;
36840
36841   ---------------------
36842   -- Initialize_2587 --
36843   ---------------------
36844
36845   procedure Initialize_2587 is
36846   begin
36847      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
36848       (Base + 2587,
36849        AMF.Internals.Tables.UML_String_Data_08.MS_08BB'Access);
36850      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2587, (Is_Empty => True));
36851   end Initialize_2587;
36852
36853   ---------------------
36854   -- Initialize_2588 --
36855   ---------------------
36856
36857   procedure Initialize_2588 is
36858   begin
36859      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36860       (Base + 2588,
36861        AMF.Internals.Tables.UML_String_Data_07.MS_07E0'Access);
36862   end Initialize_2588;
36863
36864   ---------------------
36865   -- Initialize_2589 --
36866   ---------------------
36867
36868   procedure Initialize_2589 is
36869   begin
36870      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2589, (Is_Empty => True));
36871   end Initialize_2589;
36872
36873   ---------------------
36874   -- Initialize_2590 --
36875   ---------------------
36876
36877   procedure Initialize_2590 is
36878   begin
36879      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
36880       (Base + 2590,
36881        AMF.Internals.Tables.UML_String_Data_07.MS_079E'Access);
36882      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2590, (Is_Empty => True));
36883   end Initialize_2590;
36884
36885   ---------------------
36886   -- Initialize_2591 --
36887   ---------------------
36888
36889   procedure Initialize_2591 is
36890   begin
36891      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36892       (Base + 2591,
36893        AMF.Internals.Tables.UML_String_Data_04.MS_04FD'Access);
36894   end Initialize_2591;
36895
36896   ---------------------
36897   -- Initialize_2592 --
36898   ---------------------
36899
36900   procedure Initialize_2592 is
36901   begin
36902      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2592, (Is_Empty => True));
36903   end Initialize_2592;
36904
36905   ---------------------
36906   -- Initialize_2593 --
36907   ---------------------
36908
36909   procedure Initialize_2593 is
36910   begin
36911      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36912       (Base + 2593,
36913        AMF.Internals.Tables.UML_String_Data_01.MS_0148'Access);
36914   end Initialize_2593;
36915
36916   ---------------------
36917   -- Initialize_2594 --
36918   ---------------------
36919
36920   procedure Initialize_2594 is
36921   begin
36922      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36923       (Base + 2594,
36924        AMF.Internals.Tables.UML_String_Data_08.MS_0883'Access);
36925   end Initialize_2594;
36926
36927   ---------------------
36928   -- Initialize_2595 --
36929   ---------------------
36930
36931   procedure Initialize_2595 is
36932   begin
36933      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36934       (Base + 2595,
36935        AMF.Internals.Tables.UML_String_Data_01.MS_01F6'Access);
36936   end Initialize_2595;
36937
36938   ---------------------
36939   -- Initialize_2596 --
36940   ---------------------
36941
36942   procedure Initialize_2596 is
36943   begin
36944      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2596, True);
36945      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
36946       (Base + 2596,
36947        AMF.Internals.Tables.UML_String_Data_0B.MS_0BE2'Access);
36948      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2596, (False, AMF.CMOF.Public_Visibility));
36949   end Initialize_2596;
36950
36951   ---------------------
36952   -- Initialize_2597 --
36953   ---------------------
36954
36955   procedure Initialize_2597 is
36956   begin
36957      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
36958       (Base + 2597,
36959        AMF.Internals.Tables.UML_String_Data_06.MS_0633'Access);
36960   end Initialize_2597;
36961
36962   ---------------------
36963   -- Initialize_2598 --
36964   ---------------------
36965
36966   procedure Initialize_2598 is
36967   begin
36968      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
36969       (Base + 2598,
36970        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
36971      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2598, (Is_Empty => True));
36972   end Initialize_2598;
36973
36974   ---------------------
36975   -- Initialize_2599 --
36976   ---------------------
36977
36978   procedure Initialize_2599 is
36979   begin
36980      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2599, (Is_Empty => True));
36981   end Initialize_2599;
36982
36983   ---------------------
36984   -- Initialize_2600 --
36985   ---------------------
36986
36987   procedure Initialize_2600 is
36988   begin
36989      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2600, AMF.CMOF.Return_Parameter);
36990      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
36991       (Base + 2600,
36992        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
36993      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2600, (False, AMF.CMOF.Public_Visibility));
36994   end Initialize_2600;
36995
36996   ---------------------
36997   -- Initialize_2601 --
36998   ---------------------
36999
37000   procedure Initialize_2601 is
37001   begin
37002      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2601, True);
37003      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
37004       (Base + 2601,
37005        AMF.Internals.Tables.UML_String_Data_00.MS_00FF'Access);
37006      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2601, (False, AMF.CMOF.Public_Visibility));
37007   end Initialize_2601;
37008
37009   ---------------------
37010   -- Initialize_2602 --
37011   ---------------------
37012
37013   procedure Initialize_2602 is
37014   begin
37015      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37016       (Base + 2602,
37017        AMF.Internals.Tables.UML_String_Data_06.MS_0600'Access);
37018   end Initialize_2602;
37019
37020   ---------------------
37021   -- Initialize_2603 --
37022   ---------------------
37023
37024   procedure Initialize_2603 is
37025   begin
37026      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
37027       (Base + 2603,
37028        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
37029      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2603, (Is_Empty => True));
37030   end Initialize_2603;
37031
37032   ---------------------
37033   -- Initialize_2604 --
37034   ---------------------
37035
37036   procedure Initialize_2604 is
37037   begin
37038      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2604, (Is_Empty => True));
37039   end Initialize_2604;
37040
37041   ---------------------
37042   -- Initialize_2605 --
37043   ---------------------
37044
37045   procedure Initialize_2605 is
37046   begin
37047      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2605, AMF.CMOF.Return_Parameter);
37048      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
37049       (Base + 2605,
37050        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
37051      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2605, (False, AMF.CMOF.Public_Visibility));
37052   end Initialize_2605;
37053
37054   ---------------------
37055   -- Initialize_2606 --
37056   ---------------------
37057
37058   procedure Initialize_2606 is
37059   begin
37060      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2606, True);
37061      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
37062       (Base + 2606,
37063        AMF.Internals.Tables.UML_String_Data_00.MS_003B'Access);
37064      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2606, (False, AMF.CMOF.Public_Visibility));
37065   end Initialize_2606;
37066
37067   ---------------------
37068   -- Initialize_2607 --
37069   ---------------------
37070
37071   procedure Initialize_2607 is
37072   begin
37073      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37074       (Base + 2607,
37075        AMF.Internals.Tables.UML_String_Data_02.MS_02F9'Access);
37076   end Initialize_2607;
37077
37078   ---------------------
37079   -- Initialize_2608 --
37080   ---------------------
37081
37082   procedure Initialize_2608 is
37083   begin
37084      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
37085       (Base + 2608,
37086        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
37087      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2608, (Is_Empty => True));
37088   end Initialize_2608;
37089
37090   ---------------------
37091   -- Initialize_2609 --
37092   ---------------------
37093
37094   procedure Initialize_2609 is
37095   begin
37096      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2609, (Is_Empty => True));
37097   end Initialize_2609;
37098
37099   ---------------------
37100   -- Initialize_2610 --
37101   ---------------------
37102
37103   procedure Initialize_2610 is
37104   begin
37105      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2610, AMF.CMOF.Return_Parameter);
37106      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
37107       (Base + 2610,
37108        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
37109      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2610, (False, AMF.CMOF.Public_Visibility));
37110   end Initialize_2610;
37111
37112   ---------------------
37113   -- Initialize_2611 --
37114   ---------------------
37115
37116   procedure Initialize_2611 is
37117   begin
37118      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37119       (Base + 2611,
37120        AMF.Internals.Tables.UML_String_Data_01.MS_0139'Access);
37121   end Initialize_2611;
37122
37123   ---------------------
37124   -- Initialize_2612 --
37125   ---------------------
37126
37127   procedure Initialize_2612 is
37128   begin
37129      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37130       (Base + 2612,
37131        AMF.Internals.Tables.UML_String_Data_06.MS_0698'Access);
37132   end Initialize_2612;
37133
37134   ---------------------
37135   -- Initialize_2613 --
37136   ---------------------
37137
37138   procedure Initialize_2613 is
37139   begin
37140      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
37141       (Base + 2613,
37142        AMF.Internals.Tables.UML_String_Data_04.MS_0441'Access);
37143      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2613, (Is_Empty => True));
37144   end Initialize_2613;
37145
37146   ---------------------
37147   -- Initialize_2614 --
37148   ---------------------
37149
37150   procedure Initialize_2614 is
37151   begin
37152      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37153       (Base + 2614,
37154        AMF.Internals.Tables.UML_String_Data_02.MS_0290'Access);
37155   end Initialize_2614;
37156
37157   ---------------------
37158   -- Initialize_2615 --
37159   ---------------------
37160
37161   procedure Initialize_2615 is
37162   begin
37163      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2615, (Is_Empty => True));
37164   end Initialize_2615;
37165
37166   ---------------------
37167   -- Initialize_2616 --
37168   ---------------------
37169
37170   procedure Initialize_2616 is
37171   begin
37172      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
37173       (Base + 2616,
37174        AMF.Internals.Tables.UML_String_Data_0B.MS_0BFD'Access);
37175      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2616, (Is_Empty => True));
37176   end Initialize_2616;
37177
37178   ---------------------
37179   -- Initialize_2617 --
37180   ---------------------
37181
37182   procedure Initialize_2617 is
37183   begin
37184      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37185       (Base + 2617,
37186        AMF.Internals.Tables.UML_String_Data_02.MS_02CF'Access);
37187   end Initialize_2617;
37188
37189   ---------------------
37190   -- Initialize_2618 --
37191   ---------------------
37192
37193   procedure Initialize_2618 is
37194   begin
37195      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2618, (Is_Empty => True));
37196   end Initialize_2618;
37197
37198   ---------------------
37199   -- Initialize_2619 --
37200   ---------------------
37201
37202   procedure Initialize_2619 is
37203   begin
37204      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37205       (Base + 2619,
37206        AMF.Internals.Tables.UML_String_Data_00.MS_00D3'Access);
37207   end Initialize_2619;
37208
37209   ---------------------
37210   -- Initialize_2620 --
37211   ---------------------
37212
37213   procedure Initialize_2620 is
37214   begin
37215      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37216       (Base + 2620,
37217        AMF.Internals.Tables.UML_String_Data_0A.MS_0ACB'Access);
37218   end Initialize_2620;
37219
37220   ---------------------
37221   -- Initialize_2621 --
37222   ---------------------
37223
37224   procedure Initialize_2621 is
37225   begin
37226      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2621, True);
37227      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
37228       (Base + 2621,
37229        AMF.Internals.Tables.UML_String_Data_07.MS_0730'Access);
37230      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2621, (False, AMF.CMOF.Public_Visibility));
37231   end Initialize_2621;
37232
37233   ---------------------
37234   -- Initialize_2622 --
37235   ---------------------
37236
37237   procedure Initialize_2622 is
37238   begin
37239      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37240       (Base + 2622,
37241        AMF.Internals.Tables.UML_String_Data_09.MS_09CD'Access);
37242   end Initialize_2622;
37243
37244   ---------------------
37245   -- Initialize_2623 --
37246   ---------------------
37247
37248   procedure Initialize_2623 is
37249   begin
37250      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
37251       (Base + 2623,
37252        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
37253      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2623, (Is_Empty => True));
37254   end Initialize_2623;
37255
37256   ---------------------
37257   -- Initialize_2624 --
37258   ---------------------
37259
37260   procedure Initialize_2624 is
37261   begin
37262      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2624, (Is_Empty => True));
37263   end Initialize_2624;
37264
37265   ---------------------
37266   -- Initialize_2625 --
37267   ---------------------
37268
37269   procedure Initialize_2625 is
37270   begin
37271      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2625, AMF.CMOF.Return_Parameter);
37272      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 2625, (False, 0));
37273      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
37274       (Base + 2625,
37275        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
37276      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2625, (False, AMF.CMOF.Public_Visibility));
37277   end Initialize_2625;
37278
37279   ---------------------
37280   -- Initialize_2626 --
37281   ---------------------
37282
37283   procedure Initialize_2626 is
37284   begin
37285      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37286       (Base + 2626,
37287        AMF.Internals.Tables.UML_String_Data_04.MS_04FC'Access);
37288   end Initialize_2626;
37289
37290   ---------------------
37291   -- Initialize_2627 --
37292   ---------------------
37293
37294   procedure Initialize_2627 is
37295   begin
37296      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
37297       (Base + 2627,
37298        AMF.Internals.Tables.UML_String_Data_00.MS_00B4'Access);
37299      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2627, (Is_Empty => True));
37300   end Initialize_2627;
37301
37302   ---------------------
37303   -- Initialize_2628 --
37304   ---------------------
37305
37306   procedure Initialize_2628 is
37307   begin
37308      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37309       (Base + 2628,
37310        AMF.Internals.Tables.UML_String_Data_08.MS_082F'Access);
37311   end Initialize_2628;
37312
37313   ---------------------
37314   -- Initialize_2629 --
37315   ---------------------
37316
37317   procedure Initialize_2629 is
37318   begin
37319      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2629, (Is_Empty => True));
37320   end Initialize_2629;
37321
37322   ---------------------
37323   -- Initialize_2630 --
37324   ---------------------
37325
37326   procedure Initialize_2630 is
37327   begin
37328      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37329       (Base + 2630,
37330        AMF.Internals.Tables.UML_String_Data_08.MS_084C'Access);
37331   end Initialize_2630;
37332
37333   ---------------------
37334   -- Initialize_2631 --
37335   ---------------------
37336
37337   procedure Initialize_2631 is
37338   begin
37339      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37340       (Base + 2631,
37341        AMF.Internals.Tables.UML_String_Data_0C.MS_0C85'Access);
37342   end Initialize_2631;
37343
37344   ---------------------
37345   -- Initialize_2632 --
37346   ---------------------
37347
37348   procedure Initialize_2632 is
37349   begin
37350      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37351       (Base + 2632,
37352        AMF.Internals.Tables.UML_String_Data_0B.MS_0BE5'Access);
37353   end Initialize_2632;
37354
37355   ---------------------
37356   -- Initialize_2633 --
37357   ---------------------
37358
37359   procedure Initialize_2633 is
37360   begin
37361      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37362       (Base + 2633,
37363        AMF.Internals.Tables.UML_String_Data_04.MS_0476'Access);
37364   end Initialize_2633;
37365
37366   ---------------------
37367   -- Initialize_2634 --
37368   ---------------------
37369
37370   procedure Initialize_2634 is
37371   begin
37372      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37373       (Base + 2634,
37374        AMF.Internals.Tables.UML_String_Data_07.MS_0722'Access);
37375   end Initialize_2634;
37376
37377   ---------------------
37378   -- Initialize_2635 --
37379   ---------------------
37380
37381   procedure Initialize_2635 is
37382   begin
37383      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
37384       (Base + 2635,
37385        AMF.Internals.Tables.UML_String_Data_01.MS_01E0'Access);
37386      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2635, (Is_Empty => True));
37387   end Initialize_2635;
37388
37389   ---------------------
37390   -- Initialize_2636 --
37391   ---------------------
37392
37393   procedure Initialize_2636 is
37394   begin
37395      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37396       (Base + 2636,
37397        AMF.Internals.Tables.UML_String_Data_00.MS_009C'Access);
37398   end Initialize_2636;
37399
37400   ---------------------
37401   -- Initialize_2637 --
37402   ---------------------
37403
37404   procedure Initialize_2637 is
37405   begin
37406      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2637, (Is_Empty => True));
37407   end Initialize_2637;
37408
37409   ---------------------
37410   -- Initialize_2638 --
37411   ---------------------
37412
37413   procedure Initialize_2638 is
37414   begin
37415      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37416       (Base + 2638,
37417        AMF.Internals.Tables.UML_String_Data_03.MS_033A'Access);
37418   end Initialize_2638;
37419
37420   ---------------------
37421   -- Initialize_2639 --
37422   ---------------------
37423
37424   procedure Initialize_2639 is
37425   begin
37426      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
37427       (Base + 2639,
37428        AMF.Internals.Tables.UML_String_Data_03.MS_035B'Access);
37429      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2639, (Is_Empty => True));
37430   end Initialize_2639;
37431
37432   ---------------------
37433   -- Initialize_2640 --
37434   ---------------------
37435
37436   procedure Initialize_2640 is
37437   begin
37438      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37439       (Base + 2640,
37440        AMF.Internals.Tables.UML_String_Data_08.MS_08AD'Access);
37441   end Initialize_2640;
37442
37443   ---------------------
37444   -- Initialize_2641 --
37445   ---------------------
37446
37447   procedure Initialize_2641 is
37448   begin
37449      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2641, (Is_Empty => True));
37450   end Initialize_2641;
37451
37452   ---------------------
37453   -- Initialize_2642 --
37454   ---------------------
37455
37456   procedure Initialize_2642 is
37457   begin
37458      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
37459       (Base + 2642,
37460        AMF.Internals.Tables.UML_String_Data_00.MS_0028'Access);
37461      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2642, (Is_Empty => True));
37462   end Initialize_2642;
37463
37464   ---------------------
37465   -- Initialize_2643 --
37466   ---------------------
37467
37468   procedure Initialize_2643 is
37469   begin
37470      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37471       (Base + 2643,
37472        AMF.Internals.Tables.UML_String_Data_01.MS_010A'Access);
37473   end Initialize_2643;
37474
37475   ---------------------
37476   -- Initialize_2644 --
37477   ---------------------
37478
37479   procedure Initialize_2644 is
37480   begin
37481      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2644, (Is_Empty => True));
37482   end Initialize_2644;
37483
37484   ---------------------
37485   -- Initialize_2645 --
37486   ---------------------
37487
37488   procedure Initialize_2645 is
37489   begin
37490      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
37491       (Base + 2645,
37492        AMF.Internals.Tables.UML_String_Data_03.MS_0365'Access);
37493      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2645, (Is_Empty => True));
37494   end Initialize_2645;
37495
37496   ---------------------
37497   -- Initialize_2646 --
37498   ---------------------
37499
37500   procedure Initialize_2646 is
37501   begin
37502      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37503       (Base + 2646,
37504        AMF.Internals.Tables.UML_String_Data_0A.MS_0A72'Access);
37505   end Initialize_2646;
37506
37507   ---------------------
37508   -- Initialize_2647 --
37509   ---------------------
37510
37511   procedure Initialize_2647 is
37512   begin
37513      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2647, (Is_Empty => True));
37514   end Initialize_2647;
37515
37516   ---------------------
37517   -- Initialize_2648 --
37518   ---------------------
37519
37520   procedure Initialize_2648 is
37521   begin
37522      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
37523       (Base + 2648,
37524        AMF.Internals.Tables.UML_String_Data_03.MS_033D'Access);
37525      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2648, (Is_Empty => True));
37526   end Initialize_2648;
37527
37528   ---------------------
37529   -- Initialize_2649 --
37530   ---------------------
37531
37532   procedure Initialize_2649 is
37533   begin
37534      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37535       (Base + 2649,
37536        AMF.Internals.Tables.UML_String_Data_0B.MS_0B28'Access);
37537   end Initialize_2649;
37538
37539   ---------------------
37540   -- Initialize_2650 --
37541   ---------------------
37542
37543   procedure Initialize_2650 is
37544   begin
37545      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2650, (Is_Empty => True));
37546   end Initialize_2650;
37547
37548   ---------------------
37549   -- Initialize_2651 --
37550   ---------------------
37551
37552   procedure Initialize_2651 is
37553   begin
37554      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
37555       (Base + 2651,
37556        AMF.Internals.Tables.UML_String_Data_03.MS_03E9'Access);
37557      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2651, (Is_Empty => True));
37558   end Initialize_2651;
37559
37560   ---------------------
37561   -- Initialize_2652 --
37562   ---------------------
37563
37564   procedure Initialize_2652 is
37565   begin
37566      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37567       (Base + 2652,
37568        AMF.Internals.Tables.UML_String_Data_01.MS_01AF'Access);
37569   end Initialize_2652;
37570
37571   ---------------------
37572   -- Initialize_2653 --
37573   ---------------------
37574
37575   procedure Initialize_2653 is
37576   begin
37577      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2653, (Is_Empty => True));
37578   end Initialize_2653;
37579
37580   ---------------------
37581   -- Initialize_2654 --
37582   ---------------------
37583
37584   procedure Initialize_2654 is
37585   begin
37586      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
37587       (Base + 2654,
37588        AMF.Internals.Tables.UML_String_Data_04.MS_04D2'Access);
37589      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2654, (Is_Empty => True));
37590   end Initialize_2654;
37591
37592   ---------------------
37593   -- Initialize_2655 --
37594   ---------------------
37595
37596   procedure Initialize_2655 is
37597   begin
37598      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37599       (Base + 2655,
37600        AMF.Internals.Tables.UML_String_Data_05.MS_059C'Access);
37601   end Initialize_2655;
37602
37603   ---------------------
37604   -- Initialize_2656 --
37605   ---------------------
37606
37607   procedure Initialize_2656 is
37608   begin
37609      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2656, (Is_Empty => True));
37610   end Initialize_2656;
37611
37612   ---------------------
37613   -- Initialize_2657 --
37614   ---------------------
37615
37616   procedure Initialize_2657 is
37617   begin
37618      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37619       (Base + 2657,
37620        AMF.Internals.Tables.UML_String_Data_05.MS_059A'Access);
37621   end Initialize_2657;
37622
37623   ---------------------
37624   -- Initialize_2658 --
37625   ---------------------
37626
37627   procedure Initialize_2658 is
37628   begin
37629      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37630       (Base + 2658,
37631        AMF.Internals.Tables.UML_String_Data_05.MS_05E0'Access);
37632   end Initialize_2658;
37633
37634   ---------------------
37635   -- Initialize_2659 --
37636   ---------------------
37637
37638   procedure Initialize_2659 is
37639   begin
37640      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
37641       (Base + 2659,
37642        AMF.Internals.Tables.UML_String_Data_09.MS_099B'Access);
37643      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2659, (Is_Empty => True));
37644   end Initialize_2659;
37645
37646   ---------------------
37647   -- Initialize_2660 --
37648   ---------------------
37649
37650   procedure Initialize_2660 is
37651   begin
37652      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37653       (Base + 2660,
37654        AMF.Internals.Tables.UML_String_Data_08.MS_087D'Access);
37655   end Initialize_2660;
37656
37657   ---------------------
37658   -- Initialize_2661 --
37659   ---------------------
37660
37661   procedure Initialize_2661 is
37662   begin
37663      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2661, (Is_Empty => True));
37664   end Initialize_2661;
37665
37666   ---------------------
37667   -- Initialize_2662 --
37668   ---------------------
37669
37670   procedure Initialize_2662 is
37671   begin
37672      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
37673       (Base + 2662,
37674        AMF.Internals.Tables.UML_String_Data_0C.MS_0C28'Access);
37675      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2662, (Is_Empty => True));
37676   end Initialize_2662;
37677
37678   ---------------------
37679   -- Initialize_2663 --
37680   ---------------------
37681
37682   procedure Initialize_2663 is
37683   begin
37684      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37685       (Base + 2663,
37686        AMF.Internals.Tables.UML_String_Data_09.MS_098B'Access);
37687   end Initialize_2663;
37688
37689   ---------------------
37690   -- Initialize_2664 --
37691   ---------------------
37692
37693   procedure Initialize_2664 is
37694   begin
37695      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2664, (Is_Empty => True));
37696   end Initialize_2664;
37697
37698   ---------------------
37699   -- Initialize_2665 --
37700   ---------------------
37701
37702   procedure Initialize_2665 is
37703   begin
37704      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37705       (Base + 2665,
37706        AMF.Internals.Tables.UML_String_Data_00.MS_00B2'Access);
37707   end Initialize_2665;
37708
37709   ---------------------
37710   -- Initialize_2666 --
37711   ---------------------
37712
37713   procedure Initialize_2666 is
37714   begin
37715      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
37716       (Base + 2666,
37717        AMF.Internals.Tables.UML_String_Data_01.MS_0119'Access);
37718      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2666, (Is_Empty => True));
37719   end Initialize_2666;
37720
37721   ---------------------
37722   -- Initialize_2667 --
37723   ---------------------
37724
37725   procedure Initialize_2667 is
37726   begin
37727      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37728       (Base + 2667,
37729        AMF.Internals.Tables.UML_String_Data_05.MS_0531'Access);
37730   end Initialize_2667;
37731
37732   ---------------------
37733   -- Initialize_2668 --
37734   ---------------------
37735
37736   procedure Initialize_2668 is
37737   begin
37738      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2668, (Is_Empty => True));
37739   end Initialize_2668;
37740
37741   ---------------------
37742   -- Initialize_2669 --
37743   ---------------------
37744
37745   procedure Initialize_2669 is
37746   begin
37747      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
37748       (Base + 2669,
37749        AMF.Internals.Tables.UML_String_Data_09.MS_0923'Access);
37750      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2669, (Is_Empty => True));
37751   end Initialize_2669;
37752
37753   ---------------------
37754   -- Initialize_2670 --
37755   ---------------------
37756
37757   procedure Initialize_2670 is
37758   begin
37759      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37760       (Base + 2670,
37761        AMF.Internals.Tables.UML_String_Data_08.MS_08D6'Access);
37762   end Initialize_2670;
37763
37764   ---------------------
37765   -- Initialize_2671 --
37766   ---------------------
37767
37768   procedure Initialize_2671 is
37769   begin
37770      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2671, (Is_Empty => True));
37771   end Initialize_2671;
37772
37773   ---------------------
37774   -- Initialize_2672 --
37775   ---------------------
37776
37777   procedure Initialize_2672 is
37778   begin
37779      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37780       (Base + 2672,
37781        AMF.Internals.Tables.UML_String_Data_04.MS_043C'Access);
37782   end Initialize_2672;
37783
37784   ---------------------
37785   -- Initialize_2673 --
37786   ---------------------
37787
37788   procedure Initialize_2673 is
37789   begin
37790      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
37791       (Base + 2673,
37792        AMF.Internals.Tables.UML_String_Data_0A.MS_0A51'Access);
37793      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2673, (Is_Empty => True));
37794   end Initialize_2673;
37795
37796   ---------------------
37797   -- Initialize_2674 --
37798   ---------------------
37799
37800   procedure Initialize_2674 is
37801   begin
37802      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37803       (Base + 2674,
37804        AMF.Internals.Tables.UML_String_Data_09.MS_0991'Access);
37805   end Initialize_2674;
37806
37807   ---------------------
37808   -- Initialize_2675 --
37809   ---------------------
37810
37811   procedure Initialize_2675 is
37812   begin
37813      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2675, (Is_Empty => True));
37814   end Initialize_2675;
37815
37816   ---------------------
37817   -- Initialize_2676 --
37818   ---------------------
37819
37820   procedure Initialize_2676 is
37821   begin
37822      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
37823       (Base + 2676,
37824        AMF.Internals.Tables.UML_String_Data_09.MS_0914'Access);
37825      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2676, (Is_Empty => True));
37826   end Initialize_2676;
37827
37828   ---------------------
37829   -- Initialize_2677 --
37830   ---------------------
37831
37832   procedure Initialize_2677 is
37833   begin
37834      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37835       (Base + 2677,
37836        AMF.Internals.Tables.UML_String_Data_08.MS_0879'Access);
37837   end Initialize_2677;
37838
37839   ---------------------
37840   -- Initialize_2678 --
37841   ---------------------
37842
37843   procedure Initialize_2678 is
37844   begin
37845      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2678, (Is_Empty => True));
37846   end Initialize_2678;
37847
37848   ---------------------
37849   -- Initialize_2679 --
37850   ---------------------
37851
37852   procedure Initialize_2679 is
37853   begin
37854      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37855       (Base + 2679,
37856        AMF.Internals.Tables.UML_String_Data_02.MS_02E8'Access);
37857   end Initialize_2679;
37858
37859   ---------------------
37860   -- Initialize_2680 --
37861   ---------------------
37862
37863   procedure Initialize_2680 is
37864   begin
37865      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
37866       (Base + 2680,
37867        AMF.Internals.Tables.UML_String_Data_0A.MS_0A66'Access);
37868      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2680, (Is_Empty => True));
37869   end Initialize_2680;
37870
37871   ---------------------
37872   -- Initialize_2681 --
37873   ---------------------
37874
37875   procedure Initialize_2681 is
37876   begin
37877      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37878       (Base + 2681,
37879        AMF.Internals.Tables.UML_String_Data_01.MS_0107'Access);
37880   end Initialize_2681;
37881
37882   ---------------------
37883   -- Initialize_2682 --
37884   ---------------------
37885
37886   procedure Initialize_2682 is
37887   begin
37888      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2682, (Is_Empty => True));
37889   end Initialize_2682;
37890
37891   ---------------------
37892   -- Initialize_2683 --
37893   ---------------------
37894
37895   procedure Initialize_2683 is
37896   begin
37897      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37898       (Base + 2683,
37899        AMF.Internals.Tables.UML_String_Data_09.MS_090E'Access);
37900   end Initialize_2683;
37901
37902   ---------------------
37903   -- Initialize_2684 --
37904   ---------------------
37905
37906   procedure Initialize_2684 is
37907   begin
37908      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37909       (Base + 2684,
37910        AMF.Internals.Tables.UML_String_Data_0A.MS_0AB9'Access);
37911   end Initialize_2684;
37912
37913   ---------------------
37914   -- Initialize_2685 --
37915   ---------------------
37916
37917   procedure Initialize_2685 is
37918   begin
37919      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37920       (Base + 2685,
37921        AMF.Internals.Tables.UML_String_Data_05.MS_0582'Access);
37922   end Initialize_2685;
37923
37924   ---------------------
37925   -- Initialize_2686 --
37926   ---------------------
37927
37928   procedure Initialize_2686 is
37929   begin
37930      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37931       (Base + 2686,
37932        AMF.Internals.Tables.UML_String_Data_03.MS_038D'Access);
37933   end Initialize_2686;
37934
37935   ---------------------
37936   -- Initialize_2687 --
37937   ---------------------
37938
37939   procedure Initialize_2687 is
37940   begin
37941      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
37942       (Base + 2687,
37943        AMF.Internals.Tables.UML_String_Data_09.MS_0969'Access);
37944      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2687, (Is_Empty => True));
37945   end Initialize_2687;
37946
37947   ---------------------
37948   -- Initialize_2688 --
37949   ---------------------
37950
37951   procedure Initialize_2688 is
37952   begin
37953      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37954       (Base + 2688,
37955        AMF.Internals.Tables.UML_String_Data_0C.MS_0C31'Access);
37956   end Initialize_2688;
37957
37958   ---------------------
37959   -- Initialize_2689 --
37960   ---------------------
37961
37962   procedure Initialize_2689 is
37963   begin
37964      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2689, (Is_Empty => True));
37965   end Initialize_2689;
37966
37967   ---------------------
37968   -- Initialize_2690 --
37969   ---------------------
37970
37971   procedure Initialize_2690 is
37972   begin
37973      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37974       (Base + 2690,
37975        AMF.Internals.Tables.UML_String_Data_0C.MS_0C3E'Access);
37976   end Initialize_2690;
37977
37978   ---------------------
37979   -- Initialize_2691 --
37980   ---------------------
37981
37982   procedure Initialize_2691 is
37983   begin
37984      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37985       (Base + 2691,
37986        AMF.Internals.Tables.UML_String_Data_08.MS_083A'Access);
37987   end Initialize_2691;
37988
37989   ---------------------
37990   -- Initialize_2692 --
37991   ---------------------
37992
37993   procedure Initialize_2692 is
37994   begin
37995      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
37996       (Base + 2692,
37997        AMF.Internals.Tables.UML_String_Data_0B.MS_0B01'Access);
37998   end Initialize_2692;
37999
38000   ---------------------
38001   -- Initialize_2693 --
38002   ---------------------
38003
38004   procedure Initialize_2693 is
38005   begin
38006      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38007       (Base + 2693,
38008        AMF.Internals.Tables.UML_String_Data_0A.MS_0A8A'Access);
38009   end Initialize_2693;
38010
38011   ---------------------
38012   -- Initialize_2694 --
38013   ---------------------
38014
38015   procedure Initialize_2694 is
38016   begin
38017      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38018       (Base + 2694,
38019        AMF.Internals.Tables.UML_String_Data_06.MS_0657'Access);
38020   end Initialize_2694;
38021
38022   ---------------------
38023   -- Initialize_2695 --
38024   ---------------------
38025
38026   procedure Initialize_2695 is
38027   begin
38028      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
38029       (Base + 2695,
38030        AMF.Internals.Tables.UML_String_Data_09.MS_0969'Access);
38031      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2695, (Is_Empty => True));
38032   end Initialize_2695;
38033
38034   ---------------------
38035   -- Initialize_2696 --
38036   ---------------------
38037
38038   procedure Initialize_2696 is
38039   begin
38040      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38041       (Base + 2696,
38042        AMF.Internals.Tables.UML_String_Data_07.MS_07FE'Access);
38043   end Initialize_2696;
38044
38045   ---------------------
38046   -- Initialize_2697 --
38047   ---------------------
38048
38049   procedure Initialize_2697 is
38050   begin
38051      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2697, (Is_Empty => True));
38052   end Initialize_2697;
38053
38054   ---------------------
38055   -- Initialize_2698 --
38056   ---------------------
38057
38058   procedure Initialize_2698 is
38059   begin
38060      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
38061       (Base + 2698,
38062        AMF.Internals.Tables.UML_String_Data_08.MS_0823'Access);
38063      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2698, (Is_Empty => True));
38064   end Initialize_2698;
38065
38066   ---------------------
38067   -- Initialize_2699 --
38068   ---------------------
38069
38070   procedure Initialize_2699 is
38071   begin
38072      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38073       (Base + 2699,
38074        AMF.Internals.Tables.UML_String_Data_07.MS_076A'Access);
38075   end Initialize_2699;
38076
38077   ---------------------
38078   -- Initialize_2700 --
38079   ---------------------
38080
38081   procedure Initialize_2700 is
38082   begin
38083      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2700, (Is_Empty => True));
38084   end Initialize_2700;
38085
38086   ---------------------
38087   -- Initialize_2701 --
38088   ---------------------
38089
38090   procedure Initialize_2701 is
38091   begin
38092      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38093       (Base + 2701,
38094        AMF.Internals.Tables.UML_String_Data_0C.MS_0C9D'Access);
38095   end Initialize_2701;
38096
38097   ---------------------
38098   -- Initialize_2702 --
38099   ---------------------
38100
38101   procedure Initialize_2702 is
38102   begin
38103      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38104       (Base + 2702,
38105        AMF.Internals.Tables.UML_String_Data_0C.MS_0C32'Access);
38106   end Initialize_2702;
38107
38108   ---------------------
38109   -- Initialize_2703 --
38110   ---------------------
38111
38112   procedure Initialize_2703 is
38113   begin
38114      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38115       (Base + 2703,
38116        AMF.Internals.Tables.UML_String_Data_08.MS_0882'Access);
38117   end Initialize_2703;
38118
38119   ---------------------
38120   -- Initialize_2704 --
38121   ---------------------
38122
38123   procedure Initialize_2704 is
38124   begin
38125      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38126       (Base + 2704,
38127        AMF.Internals.Tables.UML_String_Data_01.MS_01DD'Access);
38128   end Initialize_2704;
38129
38130   ---------------------
38131   -- Initialize_2705 --
38132   ---------------------
38133
38134   procedure Initialize_2705 is
38135   begin
38136      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38137       (Base + 2705,
38138        AMF.Internals.Tables.UML_String_Data_0C.MS_0C33'Access);
38139   end Initialize_2705;
38140
38141   ---------------------
38142   -- Initialize_2706 --
38143   ---------------------
38144
38145   procedure Initialize_2706 is
38146   begin
38147      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38148       (Base + 2706,
38149        AMF.Internals.Tables.UML_String_Data_06.MS_064D'Access);
38150   end Initialize_2706;
38151
38152   ---------------------
38153   -- Initialize_2707 --
38154   ---------------------
38155
38156   procedure Initialize_2707 is
38157   begin
38158      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38159       (Base + 2707,
38160        AMF.Internals.Tables.UML_String_Data_07.MS_0729'Access);
38161   end Initialize_2707;
38162
38163   ---------------------
38164   -- Initialize_2708 --
38165   ---------------------
38166
38167   procedure Initialize_2708 is
38168   begin
38169      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38170       (Base + 2708,
38171        AMF.Internals.Tables.UML_String_Data_09.MS_0919'Access);
38172   end Initialize_2708;
38173
38174   ---------------------
38175   -- Initialize_2709 --
38176   ---------------------
38177
38178   procedure Initialize_2709 is
38179   begin
38180      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38181       (Base + 2709,
38182        AMF.Internals.Tables.UML_String_Data_0A.MS_0AE0'Access);
38183   end Initialize_2709;
38184
38185   ---------------------
38186   -- Initialize_2710 --
38187   ---------------------
38188
38189   procedure Initialize_2710 is
38190   begin
38191      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38192       (Base + 2710,
38193        AMF.Internals.Tables.UML_String_Data_04.MS_042E'Access);
38194   end Initialize_2710;
38195
38196   ---------------------
38197   -- Initialize_2711 --
38198   ---------------------
38199
38200   procedure Initialize_2711 is
38201   begin
38202      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38203       (Base + 2711,
38204        AMF.Internals.Tables.UML_String_Data_02.MS_02B6'Access);
38205   end Initialize_2711;
38206
38207   ---------------------
38208   -- Initialize_2712 --
38209   ---------------------
38210
38211   procedure Initialize_2712 is
38212   begin
38213      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38214       (Base + 2712,
38215        AMF.Internals.Tables.UML_String_Data_05.MS_054D'Access);
38216   end Initialize_2712;
38217
38218   ---------------------
38219   -- Initialize_2713 --
38220   ---------------------
38221
38222   procedure Initialize_2713 is
38223   begin
38224      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
38225       (Base + 2713,
38226        AMF.Internals.Tables.UML_String_Data_02.MS_028C'Access);
38227      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2713, (Is_Empty => True));
38228   end Initialize_2713;
38229
38230   ---------------------
38231   -- Initialize_2714 --
38232   ---------------------
38233
38234   procedure Initialize_2714 is
38235   begin
38236      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38237       (Base + 2714,
38238        AMF.Internals.Tables.UML_String_Data_02.MS_025B'Access);
38239   end Initialize_2714;
38240
38241   ---------------------
38242   -- Initialize_2715 --
38243   ---------------------
38244
38245   procedure Initialize_2715 is
38246   begin
38247      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2715, (Is_Empty => True));
38248   end Initialize_2715;
38249
38250   ---------------------
38251   -- Initialize_2716 --
38252   ---------------------
38253
38254   procedure Initialize_2716 is
38255   begin
38256      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
38257       (Base + 2716,
38258        AMF.Internals.Tables.UML_String_Data_03.MS_033E'Access);
38259      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2716, (Is_Empty => True));
38260   end Initialize_2716;
38261
38262   ---------------------
38263   -- Initialize_2717 --
38264   ---------------------
38265
38266   procedure Initialize_2717 is
38267   begin
38268      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38269       (Base + 2717,
38270        AMF.Internals.Tables.UML_String_Data_0A.MS_0A18'Access);
38271   end Initialize_2717;
38272
38273   ---------------------
38274   -- Initialize_2718 --
38275   ---------------------
38276
38277   procedure Initialize_2718 is
38278   begin
38279      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2718, (Is_Empty => True));
38280   end Initialize_2718;
38281
38282   ---------------------
38283   -- Initialize_2719 --
38284   ---------------------
38285
38286   procedure Initialize_2719 is
38287   begin
38288      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
38289       (Base + 2719,
38290        AMF.Internals.Tables.UML_String_Data_01.MS_013C'Access);
38291      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2719, (Is_Empty => True));
38292   end Initialize_2719;
38293
38294   ---------------------
38295   -- Initialize_2720 --
38296   ---------------------
38297
38298   procedure Initialize_2720 is
38299   begin
38300      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38301       (Base + 2720,
38302        AMF.Internals.Tables.UML_String_Data_09.MS_098F'Access);
38303   end Initialize_2720;
38304
38305   ---------------------
38306   -- Initialize_2721 --
38307   ---------------------
38308
38309   procedure Initialize_2721 is
38310   begin
38311      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2721, (Is_Empty => True));
38312   end Initialize_2721;
38313
38314   ---------------------
38315   -- Initialize_2722 --
38316   ---------------------
38317
38318   procedure Initialize_2722 is
38319   begin
38320      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38321       (Base + 2722,
38322        AMF.Internals.Tables.UML_String_Data_00.MS_0058'Access);
38323   end Initialize_2722;
38324
38325   ---------------------
38326   -- Initialize_2723 --
38327   ---------------------
38328
38329   procedure Initialize_2723 is
38330   begin
38331      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38332       (Base + 2723,
38333        AMF.Internals.Tables.UML_String_Data_09.MS_093A'Access);
38334   end Initialize_2723;
38335
38336   ---------------------
38337   -- Initialize_2724 --
38338   ---------------------
38339
38340   procedure Initialize_2724 is
38341   begin
38342      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38343       (Base + 2724,
38344        AMF.Internals.Tables.UML_String_Data_07.MS_0760'Access);
38345   end Initialize_2724;
38346
38347   ---------------------
38348   -- Initialize_2725 --
38349   ---------------------
38350
38351   procedure Initialize_2725 is
38352   begin
38353      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38354       (Base + 2725,
38355        AMF.Internals.Tables.UML_String_Data_00.MS_000A'Access);
38356   end Initialize_2725;
38357
38358   ---------------------
38359   -- Initialize_2726 --
38360   ---------------------
38361
38362   procedure Initialize_2726 is
38363   begin
38364      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38365       (Base + 2726,
38366        AMF.Internals.Tables.UML_String_Data_04.MS_043F'Access);
38367   end Initialize_2726;
38368
38369   ---------------------
38370   -- Initialize_2727 --
38371   ---------------------
38372
38373   procedure Initialize_2727 is
38374   begin
38375      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38376       (Base + 2727,
38377        AMF.Internals.Tables.UML_String_Data_03.MS_03AA'Access);
38378   end Initialize_2727;
38379
38380   ---------------------
38381   -- Initialize_2728 --
38382   ---------------------
38383
38384   procedure Initialize_2728 is
38385   begin
38386      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38387       (Base + 2728,
38388        AMF.Internals.Tables.UML_String_Data_07.MS_07BE'Access);
38389   end Initialize_2728;
38390
38391   ---------------------
38392   -- Initialize_2729 --
38393   ---------------------
38394
38395   procedure Initialize_2729 is
38396   begin
38397      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38398       (Base + 2729,
38399        AMF.Internals.Tables.UML_String_Data_06.MS_0685'Access);
38400   end Initialize_2729;
38401
38402   ---------------------
38403   -- Initialize_2730 --
38404   ---------------------
38405
38406   procedure Initialize_2730 is
38407   begin
38408      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
38409       (Base + 2730,
38410        AMF.Internals.Tables.UML_String_Data_0A.MS_0AF9'Access);
38411      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2730, (Is_Empty => True));
38412   end Initialize_2730;
38413
38414   ---------------------
38415   -- Initialize_2731 --
38416   ---------------------
38417
38418   procedure Initialize_2731 is
38419   begin
38420      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38421       (Base + 2731,
38422        AMF.Internals.Tables.UML_String_Data_0A.MS_0A7B'Access);
38423   end Initialize_2731;
38424
38425   ---------------------
38426   -- Initialize_2732 --
38427   ---------------------
38428
38429   procedure Initialize_2732 is
38430   begin
38431      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2732, (Is_Empty => True));
38432   end Initialize_2732;
38433
38434   ---------------------
38435   -- Initialize_2733 --
38436   ---------------------
38437
38438   procedure Initialize_2733 is
38439   begin
38440      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
38441       (Base + 2733,
38442        AMF.Internals.Tables.UML_String_Data_00.MS_0016'Access);
38443      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2733, (Is_Empty => True));
38444   end Initialize_2733;
38445
38446   ---------------------
38447   -- Initialize_2734 --
38448   ---------------------
38449
38450   procedure Initialize_2734 is
38451   begin
38452      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38453       (Base + 2734,
38454        AMF.Internals.Tables.UML_String_Data_09.MS_09E8'Access);
38455   end Initialize_2734;
38456
38457   ---------------------
38458   -- Initialize_2735 --
38459   ---------------------
38460
38461   procedure Initialize_2735 is
38462   begin
38463      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2735, (Is_Empty => True));
38464   end Initialize_2735;
38465
38466   ---------------------
38467   -- Initialize_2736 --
38468   ---------------------
38469
38470   procedure Initialize_2736 is
38471   begin
38472      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
38473       (Base + 2736,
38474        AMF.Internals.Tables.UML_String_Data_0A.MS_0A4B'Access);
38475      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2736, (Is_Empty => True));
38476   end Initialize_2736;
38477
38478   ---------------------
38479   -- Initialize_2737 --
38480   ---------------------
38481
38482   procedure Initialize_2737 is
38483   begin
38484      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38485       (Base + 2737,
38486        AMF.Internals.Tables.UML_String_Data_07.MS_071A'Access);
38487   end Initialize_2737;
38488
38489   ---------------------
38490   -- Initialize_2738 --
38491   ---------------------
38492
38493   procedure Initialize_2738 is
38494   begin
38495      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2738, (Is_Empty => True));
38496   end Initialize_2738;
38497
38498   ---------------------
38499   -- Initialize_2739 --
38500   ---------------------
38501
38502   procedure Initialize_2739 is
38503   begin
38504      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38505       (Base + 2739,
38506        AMF.Internals.Tables.UML_String_Data_06.MS_06B6'Access);
38507   end Initialize_2739;
38508
38509   ---------------------
38510   -- Initialize_2740 --
38511   ---------------------
38512
38513   procedure Initialize_2740 is
38514   begin
38515      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38516       (Base + 2740,
38517        AMF.Internals.Tables.UML_String_Data_0A.MS_0AEF'Access);
38518   end Initialize_2740;
38519
38520   ---------------------
38521   -- Initialize_2741 --
38522   ---------------------
38523
38524   procedure Initialize_2741 is
38525   begin
38526      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
38527       (Base + 2741,
38528        AMF.Internals.Tables.UML_String_Data_00.MS_0090'Access);
38529      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2741, (Is_Empty => True));
38530   end Initialize_2741;
38531
38532   ---------------------
38533   -- Initialize_2742 --
38534   ---------------------
38535
38536   procedure Initialize_2742 is
38537   begin
38538      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38539       (Base + 2742,
38540        AMF.Internals.Tables.UML_String_Data_01.MS_01D1'Access);
38541   end Initialize_2742;
38542
38543   ---------------------
38544   -- Initialize_2743 --
38545   ---------------------
38546
38547   procedure Initialize_2743 is
38548   begin
38549      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2743, (Is_Empty => True));
38550   end Initialize_2743;
38551
38552   ---------------------
38553   -- Initialize_2744 --
38554   ---------------------
38555
38556   procedure Initialize_2744 is
38557   begin
38558      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
38559       (Base + 2744,
38560        AMF.Internals.Tables.UML_String_Data_05.MS_050A'Access);
38561      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2744, (Is_Empty => True));
38562   end Initialize_2744;
38563
38564   ---------------------
38565   -- Initialize_2745 --
38566   ---------------------
38567
38568   procedure Initialize_2745 is
38569   begin
38570      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38571       (Base + 2745,
38572        AMF.Internals.Tables.UML_String_Data_07.MS_073A'Access);
38573   end Initialize_2745;
38574
38575   ---------------------
38576   -- Initialize_2746 --
38577   ---------------------
38578
38579   procedure Initialize_2746 is
38580   begin
38581      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2746, (Is_Empty => True));
38582   end Initialize_2746;
38583
38584   ---------------------
38585   -- Initialize_2747 --
38586   ---------------------
38587
38588   procedure Initialize_2747 is
38589   begin
38590      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38591       (Base + 2747,
38592        AMF.Internals.Tables.UML_String_Data_07.MS_0719'Access);
38593   end Initialize_2747;
38594
38595   ---------------------
38596   -- Initialize_2748 --
38597   ---------------------
38598
38599   procedure Initialize_2748 is
38600   begin
38601      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
38602       (Base + 2748,
38603        AMF.Internals.Tables.UML_String_Data_01.MS_012B'Access);
38604      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2748, (Is_Empty => True));
38605   end Initialize_2748;
38606
38607   ---------------------
38608   -- Initialize_2749 --
38609   ---------------------
38610
38611   procedure Initialize_2749 is
38612   begin
38613      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38614       (Base + 2749,
38615        AMF.Internals.Tables.UML_String_Data_06.MS_0622'Access);
38616   end Initialize_2749;
38617
38618   ---------------------
38619   -- Initialize_2750 --
38620   ---------------------
38621
38622   procedure Initialize_2750 is
38623   begin
38624      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2750, (Is_Empty => True));
38625   end Initialize_2750;
38626
38627   ---------------------
38628   -- Initialize_2751 --
38629   ---------------------
38630
38631   procedure Initialize_2751 is
38632   begin
38633      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38634       (Base + 2751,
38635        AMF.Internals.Tables.UML_String_Data_04.MS_043D'Access);
38636   end Initialize_2751;
38637
38638   ---------------------
38639   -- Initialize_2752 --
38640   ---------------------
38641
38642   procedure Initialize_2752 is
38643   begin
38644      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38645       (Base + 2752,
38646        AMF.Internals.Tables.UML_String_Data_09.MS_09A5'Access);
38647   end Initialize_2752;
38648
38649   ---------------------
38650   -- Initialize_2753 --
38651   ---------------------
38652
38653   procedure Initialize_2753 is
38654   begin
38655      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
38656       (Base + 2753,
38657        AMF.Internals.Tables.UML_String_Data_05.MS_05CE'Access);
38658      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2753, (Is_Empty => True));
38659   end Initialize_2753;
38660
38661   ---------------------
38662   -- Initialize_2754 --
38663   ---------------------
38664
38665   procedure Initialize_2754 is
38666   begin
38667      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38668       (Base + 2754,
38669        AMF.Internals.Tables.UML_String_Data_08.MS_081A'Access);
38670   end Initialize_2754;
38671
38672   ---------------------
38673   -- Initialize_2755 --
38674   ---------------------
38675
38676   procedure Initialize_2755 is
38677   begin
38678      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2755, (Is_Empty => True));
38679   end Initialize_2755;
38680
38681   ---------------------
38682   -- Initialize_2756 --
38683   ---------------------
38684
38685   procedure Initialize_2756 is
38686   begin
38687      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
38688       (Base + 2756,
38689        AMF.Internals.Tables.UML_String_Data_01.MS_0136'Access);
38690      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2756, (Is_Empty => True));
38691   end Initialize_2756;
38692
38693   ---------------------
38694   -- Initialize_2757 --
38695   ---------------------
38696
38697   procedure Initialize_2757 is
38698   begin
38699      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38700       (Base + 2757,
38701        AMF.Internals.Tables.UML_String_Data_04.MS_04AF'Access);
38702   end Initialize_2757;
38703
38704   ---------------------
38705   -- Initialize_2758 --
38706   ---------------------
38707
38708   procedure Initialize_2758 is
38709   begin
38710      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2758, (Is_Empty => True));
38711   end Initialize_2758;
38712
38713   ---------------------
38714   -- Initialize_2759 --
38715   ---------------------
38716
38717   procedure Initialize_2759 is
38718   begin
38719      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
38720       (Base + 2759,
38721        AMF.Internals.Tables.UML_String_Data_0B.MS_0BE9'Access);
38722      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2759, (Is_Empty => True));
38723   end Initialize_2759;
38724
38725   ---------------------
38726   -- Initialize_2760 --
38727   ---------------------
38728
38729   procedure Initialize_2760 is
38730   begin
38731      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38732       (Base + 2760,
38733        AMF.Internals.Tables.UML_String_Data_03.MS_037A'Access);
38734   end Initialize_2760;
38735
38736   ---------------------
38737   -- Initialize_2761 --
38738   ---------------------
38739
38740   procedure Initialize_2761 is
38741   begin
38742      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2761, (Is_Empty => True));
38743   end Initialize_2761;
38744
38745   ---------------------
38746   -- Initialize_2762 --
38747   ---------------------
38748
38749   procedure Initialize_2762 is
38750   begin
38751      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
38752       (Base + 2762,
38753        AMF.Internals.Tables.UML_String_Data_06.MS_0673'Access);
38754      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2762, (Is_Empty => True));
38755   end Initialize_2762;
38756
38757   ---------------------
38758   -- Initialize_2763 --
38759   ---------------------
38760
38761   procedure Initialize_2763 is
38762   begin
38763      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38764       (Base + 2763,
38765        AMF.Internals.Tables.UML_String_Data_09.MS_0906'Access);
38766   end Initialize_2763;
38767
38768   ---------------------
38769   -- Initialize_2764 --
38770   ---------------------
38771
38772   procedure Initialize_2764 is
38773   begin
38774      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2764, (Is_Empty => True));
38775   end Initialize_2764;
38776
38777   ---------------------
38778   -- Initialize_2765 --
38779   ---------------------
38780
38781   procedure Initialize_2765 is
38782   begin
38783      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38784       (Base + 2765,
38785        AMF.Internals.Tables.UML_String_Data_0B.MS_0BC5'Access);
38786   end Initialize_2765;
38787
38788   ---------------------
38789   -- Initialize_2766 --
38790   ---------------------
38791
38792   procedure Initialize_2766 is
38793   begin
38794      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38795       (Base + 2766,
38796        AMF.Internals.Tables.UML_String_Data_0C.MS_0C03'Access);
38797   end Initialize_2766;
38798
38799   ---------------------
38800   -- Initialize_2767 --
38801   ---------------------
38802
38803   procedure Initialize_2767 is
38804   begin
38805      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38806       (Base + 2767,
38807        AMF.Internals.Tables.UML_String_Data_05.MS_05BC'Access);
38808   end Initialize_2767;
38809
38810   ---------------------
38811   -- Initialize_2768 --
38812   ---------------------
38813
38814   procedure Initialize_2768 is
38815   begin
38816      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38817       (Base + 2768,
38818        AMF.Internals.Tables.UML_String_Data_09.MS_09FE'Access);
38819   end Initialize_2768;
38820
38821   ---------------------
38822   -- Initialize_2769 --
38823   ---------------------
38824
38825   procedure Initialize_2769 is
38826   begin
38827      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38828       (Base + 2769,
38829        AMF.Internals.Tables.UML_String_Data_09.MS_0904'Access);
38830   end Initialize_2769;
38831
38832   ---------------------
38833   -- Initialize_2770 --
38834   ---------------------
38835
38836   procedure Initialize_2770 is
38837   begin
38838      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38839       (Base + 2770,
38840        AMF.Internals.Tables.UML_String_Data_0B.MS_0BA7'Access);
38841   end Initialize_2770;
38842
38843   ---------------------
38844   -- Initialize_2771 --
38845   ---------------------
38846
38847   procedure Initialize_2771 is
38848   begin
38849      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38850       (Base + 2771,
38851        AMF.Internals.Tables.UML_String_Data_0A.MS_0A48'Access);
38852   end Initialize_2771;
38853
38854   ---------------------
38855   -- Initialize_2772 --
38856   ---------------------
38857
38858   procedure Initialize_2772 is
38859   begin
38860      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38861       (Base + 2772,
38862        AMF.Internals.Tables.UML_String_Data_07.MS_078A'Access);
38863   end Initialize_2772;
38864
38865   ---------------------
38866   -- Initialize_2773 --
38867   ---------------------
38868
38869   procedure Initialize_2773 is
38870   begin
38871      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38872       (Base + 2773,
38873        AMF.Internals.Tables.UML_String_Data_02.MS_02BE'Access);
38874   end Initialize_2773;
38875
38876   ---------------------
38877   -- Initialize_2774 --
38878   ---------------------
38879
38880   procedure Initialize_2774 is
38881   begin
38882      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38883       (Base + 2774,
38884        AMF.Internals.Tables.UML_String_Data_06.MS_067F'Access);
38885   end Initialize_2774;
38886
38887   ---------------------
38888   -- Initialize_2775 --
38889   ---------------------
38890
38891   procedure Initialize_2775 is
38892   begin
38893      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38894       (Base + 2775,
38895        AMF.Internals.Tables.UML_String_Data_02.MS_0250'Access);
38896   end Initialize_2775;
38897
38898   ---------------------
38899   -- Initialize_2776 --
38900   ---------------------
38901
38902   procedure Initialize_2776 is
38903   begin
38904      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38905       (Base + 2776,
38906        AMF.Internals.Tables.UML_String_Data_09.MS_0947'Access);
38907   end Initialize_2776;
38908
38909   ---------------------
38910   -- Initialize_2777 --
38911   ---------------------
38912
38913   procedure Initialize_2777 is
38914   begin
38915      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
38916       (Base + 2777,
38917        AMF.Internals.Tables.UML_String_Data_0A.MS_0A40'Access);
38918      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2777, (Is_Empty => True));
38919   end Initialize_2777;
38920
38921   ---------------------
38922   -- Initialize_2778 --
38923   ---------------------
38924
38925   procedure Initialize_2778 is
38926   begin
38927      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38928       (Base + 2778,
38929        AMF.Internals.Tables.UML_String_Data_01.MS_018B'Access);
38930   end Initialize_2778;
38931
38932   ---------------------
38933   -- Initialize_2779 --
38934   ---------------------
38935
38936   procedure Initialize_2779 is
38937   begin
38938      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2779, (Is_Empty => True));
38939   end Initialize_2779;
38940
38941   ---------------------
38942   -- Initialize_2780 --
38943   ---------------------
38944
38945   procedure Initialize_2780 is
38946   begin
38947      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
38948       (Base + 2780,
38949        AMF.Internals.Tables.UML_String_Data_07.MS_075F'Access);
38950      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2780, (Is_Empty => True));
38951   end Initialize_2780;
38952
38953   ---------------------
38954   -- Initialize_2781 --
38955   ---------------------
38956
38957   procedure Initialize_2781 is
38958   begin
38959      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38960       (Base + 2781,
38961        AMF.Internals.Tables.UML_String_Data_06.MS_06B4'Access);
38962   end Initialize_2781;
38963
38964   ---------------------
38965   -- Initialize_2782 --
38966   ---------------------
38967
38968   procedure Initialize_2782 is
38969   begin
38970      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2782, (Is_Empty => True));
38971   end Initialize_2782;
38972
38973   ---------------------
38974   -- Initialize_2783 --
38975   ---------------------
38976
38977   procedure Initialize_2783 is
38978   begin
38979      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
38980       (Base + 2783,
38981        AMF.Internals.Tables.UML_String_Data_04.MS_04F9'Access);
38982      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2783, (Is_Empty => True));
38983   end Initialize_2783;
38984
38985   ---------------------
38986   -- Initialize_2784 --
38987   ---------------------
38988
38989   procedure Initialize_2784 is
38990   begin
38991      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
38992       (Base + 2784,
38993        AMF.Internals.Tables.UML_String_Data_07.MS_07CB'Access);
38994   end Initialize_2784;
38995
38996   ---------------------
38997   -- Initialize_2785 --
38998   ---------------------
38999
39000   procedure Initialize_2785 is
39001   begin
39002      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2785, (Is_Empty => True));
39003   end Initialize_2785;
39004
39005   ---------------------
39006   -- Initialize_2786 --
39007   ---------------------
39008
39009   procedure Initialize_2786 is
39010   begin
39011      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
39012       (Base + 2786,
39013        AMF.Internals.Tables.UML_String_Data_08.MS_0841'Access);
39014      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2786, (Is_Empty => True));
39015   end Initialize_2786;
39016
39017   ---------------------
39018   -- Initialize_2787 --
39019   ---------------------
39020
39021   procedure Initialize_2787 is
39022   begin
39023      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39024       (Base + 2787,
39025        AMF.Internals.Tables.UML_String_Data_02.MS_02CA'Access);
39026   end Initialize_2787;
39027
39028   ---------------------
39029   -- Initialize_2788 --
39030   ---------------------
39031
39032   procedure Initialize_2788 is
39033   begin
39034      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2788, (Is_Empty => True));
39035   end Initialize_2788;
39036
39037   ---------------------
39038   -- Initialize_2789 --
39039   ---------------------
39040
39041   procedure Initialize_2789 is
39042   begin
39043      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
39044       (Base + 2789,
39045        AMF.Internals.Tables.UML_String_Data_0B.MS_0B07'Access);
39046      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2789, (Is_Empty => True));
39047   end Initialize_2789;
39048
39049   ---------------------
39050   -- Initialize_2790 --
39051   ---------------------
39052
39053   procedure Initialize_2790 is
39054   begin
39055      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39056       (Base + 2790,
39057        AMF.Internals.Tables.UML_String_Data_02.MS_0217'Access);
39058   end Initialize_2790;
39059
39060   ---------------------
39061   -- Initialize_2791 --
39062   ---------------------
39063
39064   procedure Initialize_2791 is
39065   begin
39066      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2791, (Is_Empty => True));
39067   end Initialize_2791;
39068
39069   ---------------------
39070   -- Initialize_2792 --
39071   ---------------------
39072
39073   procedure Initialize_2792 is
39074   begin
39075      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
39076       (Base + 2792,
39077        AMF.Internals.Tables.UML_String_Data_07.MS_0757'Access);
39078      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2792, (Is_Empty => True));
39079   end Initialize_2792;
39080
39081   ---------------------
39082   -- Initialize_2793 --
39083   ---------------------
39084
39085   procedure Initialize_2793 is
39086   begin
39087      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39088       (Base + 2793,
39089        AMF.Internals.Tables.UML_String_Data_08.MS_08EB'Access);
39090   end Initialize_2793;
39091
39092   ---------------------
39093   -- Initialize_2794 --
39094   ---------------------
39095
39096   procedure Initialize_2794 is
39097   begin
39098      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2794, (Is_Empty => True));
39099   end Initialize_2794;
39100
39101   ---------------------
39102   -- Initialize_2795 --
39103   ---------------------
39104
39105   procedure Initialize_2795 is
39106   begin
39107      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39108       (Base + 2795,
39109        AMF.Internals.Tables.UML_String_Data_01.MS_01CE'Access);
39110   end Initialize_2795;
39111
39112   ---------------------
39113   -- Initialize_2796 --
39114   ---------------------
39115
39116   procedure Initialize_2796 is
39117   begin
39118      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39119       (Base + 2796,
39120        AMF.Internals.Tables.UML_String_Data_08.MS_0859'Access);
39121   end Initialize_2796;
39122
39123   ---------------------
39124   -- Initialize_2797 --
39125   ---------------------
39126
39127   procedure Initialize_2797 is
39128   begin
39129      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39130       (Base + 2797,
39131        AMF.Internals.Tables.UML_String_Data_04.MS_04DF'Access);
39132   end Initialize_2797;
39133
39134   ---------------------
39135   -- Initialize_2798 --
39136   ---------------------
39137
39138   procedure Initialize_2798 is
39139   begin
39140      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39141       (Base + 2798,
39142        AMF.Internals.Tables.UML_String_Data_08.MS_0861'Access);
39143   end Initialize_2798;
39144
39145   ---------------------
39146   -- Initialize_2799 --
39147   ---------------------
39148
39149   procedure Initialize_2799 is
39150   begin
39151      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39152       (Base + 2799,
39153        AMF.Internals.Tables.UML_String_Data_09.MS_0998'Access);
39154   end Initialize_2799;
39155
39156   ---------------------
39157   -- Initialize_2800 --
39158   ---------------------
39159
39160   procedure Initialize_2800 is
39161   begin
39162      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39163       (Base + 2800,
39164        AMF.Internals.Tables.UML_String_Data_0B.MS_0B73'Access);
39165   end Initialize_2800;
39166
39167   ---------------------
39168   -- Initialize_2801 --
39169   ---------------------
39170
39171   procedure Initialize_2801 is
39172   begin
39173      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39174       (Base + 2801,
39175        AMF.Internals.Tables.UML_String_Data_0C.MS_0C6F'Access);
39176   end Initialize_2801;
39177
39178   ---------------------
39179   -- Initialize_2802 --
39180   ---------------------
39181
39182   procedure Initialize_2802 is
39183   begin
39184      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39185       (Base + 2802,
39186        AMF.Internals.Tables.UML_String_Data_02.MS_02C8'Access);
39187   end Initialize_2802;
39188
39189   ---------------------
39190   -- Initialize_2803 --
39191   ---------------------
39192
39193   procedure Initialize_2803 is
39194   begin
39195      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
39196       (Base + 2803,
39197        AMF.Internals.Tables.UML_String_Data_00.MS_0032'Access);
39198      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2803, (Is_Empty => True));
39199   end Initialize_2803;
39200
39201   ---------------------
39202   -- Initialize_2804 --
39203   ---------------------
39204
39205   procedure Initialize_2804 is
39206   begin
39207      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39208       (Base + 2804,
39209        AMF.Internals.Tables.UML_String_Data_09.MS_0960'Access);
39210   end Initialize_2804;
39211
39212   ---------------------
39213   -- Initialize_2805 --
39214   ---------------------
39215
39216   procedure Initialize_2805 is
39217   begin
39218      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2805, (Is_Empty => True));
39219   end Initialize_2805;
39220
39221   ---------------------
39222   -- Initialize_2806 --
39223   ---------------------
39224
39225   procedure Initialize_2806 is
39226   begin
39227      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
39228       (Base + 2806,
39229        AMF.Internals.Tables.UML_String_Data_0A.MS_0A95'Access);
39230      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2806, (Is_Empty => True));
39231   end Initialize_2806;
39232
39233   ---------------------
39234   -- Initialize_2807 --
39235   ---------------------
39236
39237   procedure Initialize_2807 is
39238   begin
39239      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39240       (Base + 2807,
39241        AMF.Internals.Tables.UML_String_Data_07.MS_0743'Access);
39242   end Initialize_2807;
39243
39244   ---------------------
39245   -- Initialize_2808 --
39246   ---------------------
39247
39248   procedure Initialize_2808 is
39249   begin
39250      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2808, (Is_Empty => True));
39251   end Initialize_2808;
39252
39253   ---------------------
39254   -- Initialize_2809 --
39255   ---------------------
39256
39257   procedure Initialize_2809 is
39258   begin
39259      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39260       (Base + 2809,
39261        AMF.Internals.Tables.UML_String_Data_08.MS_083C'Access);
39262   end Initialize_2809;
39263
39264   ---------------------
39265   -- Initialize_2810 --
39266   ---------------------
39267
39268   procedure Initialize_2810 is
39269   begin
39270      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39271       (Base + 2810,
39272        AMF.Internals.Tables.UML_String_Data_0C.MS_0C0D'Access);
39273   end Initialize_2810;
39274
39275   ---------------------
39276   -- Initialize_2811 --
39277   ---------------------
39278
39279   procedure Initialize_2811 is
39280   begin
39281      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39282       (Base + 2811,
39283        AMF.Internals.Tables.UML_String_Data_01.MS_012D'Access);
39284   end Initialize_2811;
39285
39286   ---------------------
39287   -- Initialize_2812 --
39288   ---------------------
39289
39290   procedure Initialize_2812 is
39291   begin
39292      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
39293       (Base + 2812,
39294        AMF.Internals.Tables.UML_String_Data_0C.MS_0C1A'Access);
39295      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2812, (Is_Empty => True));
39296   end Initialize_2812;
39297
39298   ---------------------
39299   -- Initialize_2813 --
39300   ---------------------
39301
39302   procedure Initialize_2813 is
39303   begin
39304      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39305       (Base + 2813,
39306        AMF.Internals.Tables.UML_String_Data_02.MS_02F2'Access);
39307   end Initialize_2813;
39308
39309   ---------------------
39310   -- Initialize_2814 --
39311   ---------------------
39312
39313   procedure Initialize_2814 is
39314   begin
39315      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2814, (Is_Empty => True));
39316   end Initialize_2814;
39317
39318   ---------------------
39319   -- Initialize_2815 --
39320   ---------------------
39321
39322   procedure Initialize_2815 is
39323   begin
39324      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
39325       (Base + 2815,
39326        AMF.Internals.Tables.UML_String_Data_09.MS_0907'Access);
39327      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2815, (Is_Empty => True));
39328   end Initialize_2815;
39329
39330   ---------------------
39331   -- Initialize_2816 --
39332   ---------------------
39333
39334   procedure Initialize_2816 is
39335   begin
39336      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39337       (Base + 2816,
39338        AMF.Internals.Tables.UML_String_Data_05.MS_056D'Access);
39339   end Initialize_2816;
39340
39341   ---------------------
39342   -- Initialize_2817 --
39343   ---------------------
39344
39345   procedure Initialize_2817 is
39346   begin
39347      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2817, (Is_Empty => True));
39348   end Initialize_2817;
39349
39350   ---------------------
39351   -- Initialize_2818 --
39352   ---------------------
39353
39354   procedure Initialize_2818 is
39355   begin
39356      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
39357       (Base + 2818,
39358        AMF.Internals.Tables.UML_String_Data_0A.MS_0AB8'Access);
39359      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2818, (Is_Empty => True));
39360   end Initialize_2818;
39361
39362   ---------------------
39363   -- Initialize_2819 --
39364   ---------------------
39365
39366   procedure Initialize_2819 is
39367   begin
39368      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39369       (Base + 2819,
39370        AMF.Internals.Tables.UML_String_Data_0B.MS_0B1F'Access);
39371   end Initialize_2819;
39372
39373   ---------------------
39374   -- Initialize_2820 --
39375   ---------------------
39376
39377   procedure Initialize_2820 is
39378   begin
39379      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2820, (Is_Empty => True));
39380   end Initialize_2820;
39381
39382   ---------------------
39383   -- Initialize_2821 --
39384   ---------------------
39385
39386   procedure Initialize_2821 is
39387   begin
39388      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
39389       (Base + 2821,
39390        AMF.Internals.Tables.UML_String_Data_03.MS_03CA'Access);
39391      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2821, (Is_Empty => True));
39392   end Initialize_2821;
39393
39394   ---------------------
39395   -- Initialize_2822 --
39396   ---------------------
39397
39398   procedure Initialize_2822 is
39399   begin
39400      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39401       (Base + 2822,
39402        AMF.Internals.Tables.UML_String_Data_0B.MS_0BB9'Access);
39403   end Initialize_2822;
39404
39405   ---------------------
39406   -- Initialize_2823 --
39407   ---------------------
39408
39409   procedure Initialize_2823 is
39410   begin
39411      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2823, (Is_Empty => True));
39412   end Initialize_2823;
39413
39414   ---------------------
39415   -- Initialize_2824 --
39416   ---------------------
39417
39418   procedure Initialize_2824 is
39419   begin
39420      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
39421       (Base + 2824,
39422        AMF.Internals.Tables.UML_String_Data_01.MS_019F'Access);
39423      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2824, (Is_Empty => True));
39424   end Initialize_2824;
39425
39426   ---------------------
39427   -- Initialize_2825 --
39428   ---------------------
39429
39430   procedure Initialize_2825 is
39431   begin
39432      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39433       (Base + 2825,
39434        AMF.Internals.Tables.UML_String_Data_06.MS_0640'Access);
39435   end Initialize_2825;
39436
39437   ---------------------
39438   -- Initialize_2826 --
39439   ---------------------
39440
39441   procedure Initialize_2826 is
39442   begin
39443      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2826, (Is_Empty => True));
39444   end Initialize_2826;
39445
39446   ---------------------
39447   -- Initialize_2827 --
39448   ---------------------
39449
39450   procedure Initialize_2827 is
39451   begin
39452      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
39453       (Base + 2827,
39454        AMF.Internals.Tables.UML_String_Data_01.MS_0161'Access);
39455      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2827, (Is_Empty => True));
39456   end Initialize_2827;
39457
39458   ---------------------
39459   -- Initialize_2828 --
39460   ---------------------
39461
39462   procedure Initialize_2828 is
39463   begin
39464      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39465       (Base + 2828,
39466        AMF.Internals.Tables.UML_String_Data_04.MS_042F'Access);
39467   end Initialize_2828;
39468
39469   ---------------------
39470   -- Initialize_2829 --
39471   ---------------------
39472
39473   procedure Initialize_2829 is
39474   begin
39475      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2829, (Is_Empty => True));
39476   end Initialize_2829;
39477
39478   ---------------------
39479   -- Initialize_2830 --
39480   ---------------------
39481
39482   procedure Initialize_2830 is
39483   begin
39484      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39485       (Base + 2830,
39486        AMF.Internals.Tables.UML_String_Data_04.MS_04CF'Access);
39487   end Initialize_2830;
39488
39489   ---------------------
39490   -- Initialize_2831 --
39491   ---------------------
39492
39493   procedure Initialize_2831 is
39494   begin
39495      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39496       (Base + 2831,
39497        AMF.Internals.Tables.UML_String_Data_09.MS_099D'Access);
39498   end Initialize_2831;
39499
39500   ---------------------
39501   -- Initialize_2832 --
39502   ---------------------
39503
39504   procedure Initialize_2832 is
39505   begin
39506      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39507       (Base + 2832,
39508        AMF.Internals.Tables.UML_String_Data_07.MS_071D'Access);
39509   end Initialize_2832;
39510
39511   ---------------------
39512   -- Initialize_2833 --
39513   ---------------------
39514
39515   procedure Initialize_2833 is
39516   begin
39517      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39518       (Base + 2833,
39519        AMF.Internals.Tables.UML_String_Data_0B.MS_0BF6'Access);
39520   end Initialize_2833;
39521
39522   ---------------------
39523   -- Initialize_2834 --
39524   ---------------------
39525
39526   procedure Initialize_2834 is
39527   begin
39528      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39529       (Base + 2834,
39530        AMF.Internals.Tables.UML_String_Data_09.MS_0935'Access);
39531   end Initialize_2834;
39532
39533   ---------------------
39534   -- Initialize_2835 --
39535   ---------------------
39536
39537   procedure Initialize_2835 is
39538   begin
39539      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39540       (Base + 2835,
39541        AMF.Internals.Tables.UML_String_Data_02.MS_0297'Access);
39542   end Initialize_2835;
39543
39544   ---------------------
39545   -- Initialize_2836 --
39546   ---------------------
39547
39548   procedure Initialize_2836 is
39549   begin
39550      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39551       (Base + 2836,
39552        AMF.Internals.Tables.UML_String_Data_04.MS_049C'Access);
39553   end Initialize_2836;
39554
39555   ---------------------
39556   -- Initialize_2837 --
39557   ---------------------
39558
39559   procedure Initialize_2837 is
39560   begin
39561      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39562       (Base + 2837,
39563        AMF.Internals.Tables.UML_String_Data_02.MS_02C2'Access);
39564   end Initialize_2837;
39565
39566   ---------------------
39567   -- Initialize_2838 --
39568   ---------------------
39569
39570   procedure Initialize_2838 is
39571   begin
39572      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
39573       (Base + 2838,
39574        AMF.Internals.Tables.UML_String_Data_0B.MS_0B62'Access);
39575      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2838, (Is_Empty => True));
39576   end Initialize_2838;
39577
39578   ---------------------
39579   -- Initialize_2839 --
39580   ---------------------
39581
39582   procedure Initialize_2839 is
39583   begin
39584      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39585       (Base + 2839,
39586        AMF.Internals.Tables.UML_String_Data_09.MS_09AC'Access);
39587   end Initialize_2839;
39588
39589   ---------------------
39590   -- Initialize_2840 --
39591   ---------------------
39592
39593   procedure Initialize_2840 is
39594   begin
39595      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2840, (Is_Empty => True));
39596   end Initialize_2840;
39597
39598   ---------------------
39599   -- Initialize_2841 --
39600   ---------------------
39601
39602   procedure Initialize_2841 is
39603   begin
39604      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39605       (Base + 2841,
39606        AMF.Internals.Tables.UML_String_Data_06.MS_069C'Access);
39607   end Initialize_2841;
39608
39609   ---------------------
39610   -- Initialize_2842 --
39611   ---------------------
39612
39613   procedure Initialize_2842 is
39614   begin
39615      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39616       (Base + 2842,
39617        AMF.Internals.Tables.UML_String_Data_09.MS_09BD'Access);
39618   end Initialize_2842;
39619
39620   ---------------------
39621   -- Initialize_2843 --
39622   ---------------------
39623
39624   procedure Initialize_2843 is
39625   begin
39626      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39627       (Base + 2843,
39628        AMF.Internals.Tables.UML_String_Data_07.MS_07B9'Access);
39629   end Initialize_2843;
39630
39631   ---------------------
39632   -- Initialize_2844 --
39633   ---------------------
39634
39635   procedure Initialize_2844 is
39636   begin
39637      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39638       (Base + 2844,
39639        AMF.Internals.Tables.UML_String_Data_07.MS_0706'Access);
39640   end Initialize_2844;
39641
39642   ---------------------
39643   -- Initialize_2845 --
39644   ---------------------
39645
39646   procedure Initialize_2845 is
39647   begin
39648      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39649       (Base + 2845,
39650        AMF.Internals.Tables.UML_String_Data_04.MS_04CD'Access);
39651   end Initialize_2845;
39652
39653   ---------------------
39654   -- Initialize_2846 --
39655   ---------------------
39656
39657   procedure Initialize_2846 is
39658   begin
39659      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39660       (Base + 2846,
39661        AMF.Internals.Tables.UML_String_Data_09.MS_0942'Access);
39662   end Initialize_2846;
39663
39664   ---------------------
39665   -- Initialize_2847 --
39666   ---------------------
39667
39668   procedure Initialize_2847 is
39669   begin
39670      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39671       (Base + 2847,
39672        AMF.Internals.Tables.UML_String_Data_0A.MS_0AFD'Access);
39673   end Initialize_2847;
39674
39675   ---------------------
39676   -- Initialize_2848 --
39677   ---------------------
39678
39679   procedure Initialize_2848 is
39680   begin
39681      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39682       (Base + 2848,
39683        AMF.Internals.Tables.UML_String_Data_01.MS_0155'Access);
39684   end Initialize_2848;
39685
39686   ---------------------
39687   -- Initialize_2849 --
39688   ---------------------
39689
39690   procedure Initialize_2849 is
39691   begin
39692      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39693       (Base + 2849,
39694        AMF.Internals.Tables.UML_String_Data_07.MS_072A'Access);
39695   end Initialize_2849;
39696
39697   ---------------------
39698   -- Initialize_2850 --
39699   ---------------------
39700
39701   procedure Initialize_2850 is
39702   begin
39703      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39704       (Base + 2850,
39705        AMF.Internals.Tables.UML_String_Data_06.MS_0641'Access);
39706   end Initialize_2850;
39707
39708   ---------------------
39709   -- Initialize_2851 --
39710   ---------------------
39711
39712   procedure Initialize_2851 is
39713   begin
39714      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
39715       (Base + 2851,
39716        AMF.Internals.Tables.UML_String_Data_05.MS_05D1'Access);
39717      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2851, (Is_Empty => True));
39718   end Initialize_2851;
39719
39720   ---------------------
39721   -- Initialize_2852 --
39722   ---------------------
39723
39724   procedure Initialize_2852 is
39725   begin
39726      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39727       (Base + 2852,
39728        AMF.Internals.Tables.UML_String_Data_03.MS_03A9'Access);
39729   end Initialize_2852;
39730
39731   ---------------------
39732   -- Initialize_2853 --
39733   ---------------------
39734
39735   procedure Initialize_2853 is
39736   begin
39737      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2853, (Is_Empty => True));
39738   end Initialize_2853;
39739
39740   ---------------------
39741   -- Initialize_2854 --
39742   ---------------------
39743
39744   procedure Initialize_2854 is
39745   begin
39746      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39747       (Base + 2854,
39748        AMF.Internals.Tables.UML_String_Data_06.MS_0618'Access);
39749   end Initialize_2854;
39750
39751   ---------------------
39752   -- Initialize_2855 --
39753   ---------------------
39754
39755   procedure Initialize_2855 is
39756   begin
39757      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39758       (Base + 2855,
39759        AMF.Internals.Tables.UML_String_Data_01.MS_0124'Access);
39760   end Initialize_2855;
39761
39762   ---------------------
39763   -- Initialize_2856 --
39764   ---------------------
39765
39766   procedure Initialize_2856 is
39767   begin
39768      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39769       (Base + 2856,
39770        AMF.Internals.Tables.UML_String_Data_08.MS_08A1'Access);
39771   end Initialize_2856;
39772
39773   ---------------------
39774   -- Initialize_2857 --
39775   ---------------------
39776
39777   procedure Initialize_2857 is
39778   begin
39779      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39780       (Base + 2857,
39781        AMF.Internals.Tables.UML_String_Data_00.MS_00AC'Access);
39782   end Initialize_2857;
39783
39784   ---------------------
39785   -- Initialize_2858 --
39786   ---------------------
39787
39788   procedure Initialize_2858 is
39789   begin
39790      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39791       (Base + 2858,
39792        AMF.Internals.Tables.UML_String_Data_08.MS_080D'Access);
39793   end Initialize_2858;
39794
39795   ---------------------
39796   -- Initialize_2859 --
39797   ---------------------
39798
39799   procedure Initialize_2859 is
39800   begin
39801      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39802       (Base + 2859,
39803        AMF.Internals.Tables.UML_String_Data_0A.MS_0A90'Access);
39804   end Initialize_2859;
39805
39806   ---------------------
39807   -- Initialize_2860 --
39808   ---------------------
39809
39810   procedure Initialize_2860 is
39811   begin
39812      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39813       (Base + 2860,
39814        AMF.Internals.Tables.UML_String_Data_06.MS_06AE'Access);
39815   end Initialize_2860;
39816
39817   ---------------------
39818   -- Initialize_2861 --
39819   ---------------------
39820
39821   procedure Initialize_2861 is
39822   begin
39823      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39824       (Base + 2861,
39825        AMF.Internals.Tables.UML_String_Data_08.MS_084B'Access);
39826   end Initialize_2861;
39827
39828   ---------------------
39829   -- Initialize_2862 --
39830   ---------------------
39831
39832   procedure Initialize_2862 is
39833   begin
39834      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39835       (Base + 2862,
39836        AMF.Internals.Tables.UML_String_Data_04.MS_045B'Access);
39837   end Initialize_2862;
39838
39839   ---------------------
39840   -- Initialize_2863 --
39841   ---------------------
39842
39843   procedure Initialize_2863 is
39844   begin
39845      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
39846       (Base + 2863,
39847        AMF.Internals.Tables.UML_String_Data_06.MS_06C1'Access);
39848      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2863, (Is_Empty => True));
39849   end Initialize_2863;
39850
39851   ---------------------
39852   -- Initialize_2864 --
39853   ---------------------
39854
39855   procedure Initialize_2864 is
39856   begin
39857      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39858       (Base + 2864,
39859        AMF.Internals.Tables.UML_String_Data_07.MS_0758'Access);
39860   end Initialize_2864;
39861
39862   ---------------------
39863   -- Initialize_2865 --
39864   ---------------------
39865
39866   procedure Initialize_2865 is
39867   begin
39868      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2865, (Is_Empty => True));
39869   end Initialize_2865;
39870
39871   ---------------------
39872   -- Initialize_2866 --
39873   ---------------------
39874
39875   procedure Initialize_2866 is
39876   begin
39877      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39878       (Base + 2866,
39879        AMF.Internals.Tables.UML_String_Data_01.MS_0122'Access);
39880   end Initialize_2866;
39881
39882   ---------------------
39883   -- Initialize_2867 --
39884   ---------------------
39885
39886   procedure Initialize_2867 is
39887   begin
39888      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39889       (Base + 2867,
39890        AMF.Internals.Tables.UML_String_Data_07.MS_07E2'Access);
39891   end Initialize_2867;
39892
39893   ---------------------
39894   -- Initialize_2868 --
39895   ---------------------
39896
39897   procedure Initialize_2868 is
39898   begin
39899      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39900       (Base + 2868,
39901        AMF.Internals.Tables.UML_String_Data_07.MS_071B'Access);
39902   end Initialize_2868;
39903
39904   ---------------------
39905   -- Initialize_2869 --
39906   ---------------------
39907
39908   procedure Initialize_2869 is
39909   begin
39910      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39911       (Base + 2869,
39912        AMF.Internals.Tables.UML_String_Data_0C.MS_0C9B'Access);
39913   end Initialize_2869;
39914
39915   ---------------------
39916   -- Initialize_2870 --
39917   ---------------------
39918
39919   procedure Initialize_2870 is
39920   begin
39921      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
39922       (Base + 2870,
39923        AMF.Internals.Tables.UML_String_Data_04.MS_0402'Access);
39924      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2870, (Is_Empty => True));
39925   end Initialize_2870;
39926
39927   ---------------------
39928   -- Initialize_2871 --
39929   ---------------------
39930
39931   procedure Initialize_2871 is
39932   begin
39933      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39934       (Base + 2871,
39935        AMF.Internals.Tables.UML_String_Data_00.MS_0059'Access);
39936   end Initialize_2871;
39937
39938   ---------------------
39939   -- Initialize_2872 --
39940   ---------------------
39941
39942   procedure Initialize_2872 is
39943   begin
39944      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2872, (Is_Empty => True));
39945   end Initialize_2872;
39946
39947   ---------------------
39948   -- Initialize_2873 --
39949   ---------------------
39950
39951   procedure Initialize_2873 is
39952   begin
39953      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
39954       (Base + 2873,
39955        AMF.Internals.Tables.UML_String_Data_03.MS_03AE'Access);
39956      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2873, (Is_Empty => True));
39957   end Initialize_2873;
39958
39959   ---------------------
39960   -- Initialize_2874 --
39961   ---------------------
39962
39963   procedure Initialize_2874 is
39964   begin
39965      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39966       (Base + 2874,
39967        AMF.Internals.Tables.UML_String_Data_00.MS_00E8'Access);
39968   end Initialize_2874;
39969
39970   ---------------------
39971   -- Initialize_2875 --
39972   ---------------------
39973
39974   procedure Initialize_2875 is
39975   begin
39976      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2875, (Is_Empty => True));
39977   end Initialize_2875;
39978
39979   ---------------------
39980   -- Initialize_2876 --
39981   ---------------------
39982
39983   procedure Initialize_2876 is
39984   begin
39985      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39986       (Base + 2876,
39987        AMF.Internals.Tables.UML_String_Data_01.MS_0198'Access);
39988   end Initialize_2876;
39989
39990   ---------------------
39991   -- Initialize_2877 --
39992   ---------------------
39993
39994   procedure Initialize_2877 is
39995   begin
39996      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
39997       (Base + 2877,
39998        AMF.Internals.Tables.UML_String_Data_05.MS_0527'Access);
39999   end Initialize_2877;
40000
40001   ---------------------
40002   -- Initialize_2878 --
40003   ---------------------
40004
40005   procedure Initialize_2878 is
40006   begin
40007      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40008       (Base + 2878,
40009        AMF.Internals.Tables.UML_String_Data_04.MS_049D'Access);
40010   end Initialize_2878;
40011
40012   ---------------------
40013   -- Initialize_2879 --
40014   ---------------------
40015
40016   procedure Initialize_2879 is
40017   begin
40018      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
40019       (Base + 2879,
40020        AMF.Internals.Tables.UML_String_Data_07.MS_076C'Access);
40021      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2879, (Is_Empty => True));
40022   end Initialize_2879;
40023
40024   ---------------------
40025   -- Initialize_2880 --
40026   ---------------------
40027
40028   procedure Initialize_2880 is
40029   begin
40030      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40031       (Base + 2880,
40032        AMF.Internals.Tables.UML_String_Data_0A.MS_0AF0'Access);
40033   end Initialize_2880;
40034
40035   ---------------------
40036   -- Initialize_2881 --
40037   ---------------------
40038
40039   procedure Initialize_2881 is
40040   begin
40041      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2881, (Is_Empty => True));
40042   end Initialize_2881;
40043
40044   ---------------------
40045   -- Initialize_2882 --
40046   ---------------------
40047
40048   procedure Initialize_2882 is
40049   begin
40050      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
40051       (Base + 2882,
40052        AMF.Internals.Tables.UML_String_Data_01.MS_017E'Access);
40053      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2882, (Is_Empty => True));
40054   end Initialize_2882;
40055
40056   ---------------------
40057   -- Initialize_2883 --
40058   ---------------------
40059
40060   procedure Initialize_2883 is
40061   begin
40062      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40063       (Base + 2883,
40064        AMF.Internals.Tables.UML_String_Data_0C.MS_0C25'Access);
40065   end Initialize_2883;
40066
40067   ---------------------
40068   -- Initialize_2884 --
40069   ---------------------
40070
40071   procedure Initialize_2884 is
40072   begin
40073      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2884, (Is_Empty => True));
40074   end Initialize_2884;
40075
40076   ---------------------
40077   -- Initialize_2885 --
40078   ---------------------
40079
40080   procedure Initialize_2885 is
40081   begin
40082      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
40083       (Base + 2885,
40084        AMF.Internals.Tables.UML_String_Data_0A.MS_0A0D'Access);
40085      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2885, (Is_Empty => True));
40086   end Initialize_2885;
40087
40088   ---------------------
40089   -- Initialize_2886 --
40090   ---------------------
40091
40092   procedure Initialize_2886 is
40093   begin
40094      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40095       (Base + 2886,
40096        AMF.Internals.Tables.UML_String_Data_09.MS_0979'Access);
40097   end Initialize_2886;
40098
40099   ---------------------
40100   -- Initialize_2887 --
40101   ---------------------
40102
40103   procedure Initialize_2887 is
40104   begin
40105      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2887, (Is_Empty => True));
40106   end Initialize_2887;
40107
40108   ---------------------
40109   -- Initialize_2888 --
40110   ---------------------
40111
40112   procedure Initialize_2888 is
40113   begin
40114      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40115       (Base + 2888,
40116        AMF.Internals.Tables.UML_String_Data_02.MS_0210'Access);
40117   end Initialize_2888;
40118
40119   ---------------------
40120   -- Initialize_2889 --
40121   ---------------------
40122
40123   procedure Initialize_2889 is
40124   begin
40125      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40126       (Base + 2889,
40127        AMF.Internals.Tables.UML_String_Data_07.MS_07AA'Access);
40128   end Initialize_2889;
40129
40130   ---------------------
40131   -- Initialize_2890 --
40132   ---------------------
40133
40134   procedure Initialize_2890 is
40135   begin
40136      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40137       (Base + 2890,
40138        AMF.Internals.Tables.UML_String_Data_0A.MS_0A2E'Access);
40139   end Initialize_2890;
40140
40141   ---------------------
40142   -- Initialize_2891 --
40143   ---------------------
40144
40145   procedure Initialize_2891 is
40146   begin
40147      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40148       (Base + 2891,
40149        AMF.Internals.Tables.UML_String_Data_0A.MS_0AB2'Access);
40150   end Initialize_2891;
40151
40152   ---------------------
40153   -- Initialize_2892 --
40154   ---------------------
40155
40156   procedure Initialize_2892 is
40157   begin
40158      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40159       (Base + 2892,
40160        AMF.Internals.Tables.UML_String_Data_04.MS_04AD'Access);
40161   end Initialize_2892;
40162
40163   ---------------------
40164   -- Initialize_2893 --
40165   ---------------------
40166
40167   procedure Initialize_2893 is
40168   begin
40169      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40170       (Base + 2893,
40171        AMF.Internals.Tables.UML_String_Data_01.MS_0115'Access);
40172   end Initialize_2893;
40173
40174   ---------------------
40175   -- Initialize_2894 --
40176   ---------------------
40177
40178   procedure Initialize_2894 is
40179   begin
40180      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
40181       (Base + 2894,
40182        AMF.Internals.Tables.UML_String_Data_02.MS_0241'Access);
40183      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2894, (Is_Empty => True));
40184   end Initialize_2894;
40185
40186   ---------------------
40187   -- Initialize_2895 --
40188   ---------------------
40189
40190   procedure Initialize_2895 is
40191   begin
40192      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40193       (Base + 2895,
40194        AMF.Internals.Tables.UML_String_Data_00.MS_0070'Access);
40195   end Initialize_2895;
40196
40197   ---------------------
40198   -- Initialize_2896 --
40199   ---------------------
40200
40201   procedure Initialize_2896 is
40202   begin
40203      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2896, (Is_Empty => True));
40204   end Initialize_2896;
40205
40206   ---------------------
40207   -- Initialize_2897 --
40208   ---------------------
40209
40210   procedure Initialize_2897 is
40211   begin
40212      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
40213       (Base + 2897,
40214        AMF.Internals.Tables.UML_String_Data_04.MS_0472'Access);
40215      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2897, (Is_Empty => True));
40216   end Initialize_2897;
40217
40218   ---------------------
40219   -- Initialize_2898 --
40220   ---------------------
40221
40222   procedure Initialize_2898 is
40223   begin
40224      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40225       (Base + 2898,
40226        AMF.Internals.Tables.UML_String_Data_00.MS_003A'Access);
40227   end Initialize_2898;
40228
40229   ---------------------
40230   -- Initialize_2899 --
40231   ---------------------
40232
40233   procedure Initialize_2899 is
40234   begin
40235      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2899, (Is_Empty => True));
40236   end Initialize_2899;
40237
40238   ---------------------
40239   -- Initialize_2900 --
40240   ---------------------
40241
40242   procedure Initialize_2900 is
40243   begin
40244      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
40245       (Base + 2900,
40246        AMF.Internals.Tables.UML_String_Data_04.MS_0422'Access);
40247      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2900, (Is_Empty => True));
40248   end Initialize_2900;
40249
40250   ---------------------
40251   -- Initialize_2901 --
40252   ---------------------
40253
40254   procedure Initialize_2901 is
40255   begin
40256      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40257       (Base + 2901,
40258        AMF.Internals.Tables.UML_String_Data_0C.MS_0C60'Access);
40259   end Initialize_2901;
40260
40261   ---------------------
40262   -- Initialize_2902 --
40263   ---------------------
40264
40265   procedure Initialize_2902 is
40266   begin
40267      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2902, (Is_Empty => True));
40268   end Initialize_2902;
40269
40270   ---------------------
40271   -- Initialize_2903 --
40272   ---------------------
40273
40274   procedure Initialize_2903 is
40275   begin
40276      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40277       (Base + 2903,
40278        AMF.Internals.Tables.UML_String_Data_08.MS_082B'Access);
40279   end Initialize_2903;
40280
40281   ---------------------
40282   -- Initialize_2904 --
40283   ---------------------
40284
40285   procedure Initialize_2904 is
40286   begin
40287      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40288       (Base + 2904,
40289        AMF.Internals.Tables.UML_String_Data_08.MS_0874'Access);
40290   end Initialize_2904;
40291
40292   ---------------------
40293   -- Initialize_2905 --
40294   ---------------------
40295
40296   procedure Initialize_2905 is
40297   begin
40298      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2905, True);
40299      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
40300       (Base + 2905,
40301        AMF.Internals.Tables.UML_String_Data_0A.MS_0A43'Access);
40302      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2905, (False, AMF.CMOF.Public_Visibility));
40303   end Initialize_2905;
40304
40305   ---------------------
40306   -- Initialize_2906 --
40307   ---------------------
40308
40309   procedure Initialize_2906 is
40310   begin
40311      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40312       (Base + 2906,
40313        AMF.Internals.Tables.UML_String_Data_04.MS_0429'Access);
40314   end Initialize_2906;
40315
40316   ---------------------
40317   -- Initialize_2907 --
40318   ---------------------
40319
40320   procedure Initialize_2907 is
40321   begin
40322      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
40323       (Base + 2907,
40324        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
40325      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2907, (Is_Empty => True));
40326   end Initialize_2907;
40327
40328   ---------------------
40329   -- Initialize_2908 --
40330   ---------------------
40331
40332   procedure Initialize_2908 is
40333   begin
40334      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2908, (Is_Empty => True));
40335   end Initialize_2908;
40336
40337   ---------------------
40338   -- Initialize_2909 --
40339   ---------------------
40340
40341   procedure Initialize_2909 is
40342   begin
40343      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2909, AMF.CMOF.Return_Parameter);
40344      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
40345       (Base + 2909,
40346        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
40347      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2909, (False, AMF.CMOF.Public_Visibility));
40348   end Initialize_2909;
40349
40350   ---------------------
40351   -- Initialize_2910 --
40352   ---------------------
40353
40354   procedure Initialize_2910 is
40355   begin
40356      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40357       (Base + 2910,
40358        AMF.Internals.Tables.UML_String_Data_04.MS_0420'Access);
40359   end Initialize_2910;
40360
40361   ---------------------
40362   -- Initialize_2911 --
40363   ---------------------
40364
40365   procedure Initialize_2911 is
40366   begin
40367      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
40368       (Base + 2911,
40369        AMF.Internals.Tables.UML_String_Data_0A.MS_0A96'Access);
40370      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2911, (Is_Empty => True));
40371   end Initialize_2911;
40372
40373   ---------------------
40374   -- Initialize_2912 --
40375   ---------------------
40376
40377   procedure Initialize_2912 is
40378   begin
40379      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40380       (Base + 2912,
40381        AMF.Internals.Tables.UML_String_Data_0A.MS_0A16'Access);
40382   end Initialize_2912;
40383
40384   ---------------------
40385   -- Initialize_2913 --
40386   ---------------------
40387
40388   procedure Initialize_2913 is
40389   begin
40390      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2913, (Is_Empty => True));
40391   end Initialize_2913;
40392
40393   ---------------------
40394   -- Initialize_2914 --
40395   ---------------------
40396
40397   procedure Initialize_2914 is
40398   begin
40399      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
40400       (Base + 2914,
40401        AMF.Internals.Tables.UML_String_Data_06.MS_06CF'Access);
40402      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2914, (Is_Empty => True));
40403   end Initialize_2914;
40404
40405   ---------------------
40406   -- Initialize_2915 --
40407   ---------------------
40408
40409   procedure Initialize_2915 is
40410   begin
40411      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40412       (Base + 2915,
40413        AMF.Internals.Tables.UML_String_Data_00.MS_00A3'Access);
40414   end Initialize_2915;
40415
40416   ---------------------
40417   -- Initialize_2916 --
40418   ---------------------
40419
40420   procedure Initialize_2916 is
40421   begin
40422      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2916, (Is_Empty => True));
40423   end Initialize_2916;
40424
40425   ---------------------
40426   -- Initialize_2917 --
40427   ---------------------
40428
40429   procedure Initialize_2917 is
40430   begin
40431      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40432       (Base + 2917,
40433        AMF.Internals.Tables.UML_String_Data_00.MS_0075'Access);
40434   end Initialize_2917;
40435
40436   ---------------------
40437   -- Initialize_2918 --
40438   ---------------------
40439
40440   procedure Initialize_2918 is
40441   begin
40442      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40443       (Base + 2918,
40444        AMF.Internals.Tables.UML_String_Data_0C.MS_0C27'Access);
40445   end Initialize_2918;
40446
40447   ---------------------
40448   -- Initialize_2919 --
40449   ---------------------
40450
40451   procedure Initialize_2919 is
40452   begin
40453      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40454       (Base + 2919,
40455        AMF.Internals.Tables.UML_String_Data_09.MS_09E4'Access);
40456   end Initialize_2919;
40457
40458   ---------------------
40459   -- Initialize_2920 --
40460   ---------------------
40461
40462   procedure Initialize_2920 is
40463   begin
40464      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
40465       (Base + 2920,
40466        AMF.Internals.Tables.UML_String_Data_0A.MS_0AE9'Access);
40467      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2920, (Is_Empty => True));
40468   end Initialize_2920;
40469
40470   ---------------------
40471   -- Initialize_2921 --
40472   ---------------------
40473
40474   procedure Initialize_2921 is
40475   begin
40476      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40477       (Base + 2921,
40478        AMF.Internals.Tables.UML_String_Data_00.MS_0053'Access);
40479   end Initialize_2921;
40480
40481   ---------------------
40482   -- Initialize_2922 --
40483   ---------------------
40484
40485   procedure Initialize_2922 is
40486   begin
40487      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2922, (Is_Empty => True));
40488   end Initialize_2922;
40489
40490   ---------------------
40491   -- Initialize_2923 --
40492   ---------------------
40493
40494   procedure Initialize_2923 is
40495   begin
40496      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
40497       (Base + 2923,
40498        AMF.Internals.Tables.UML_String_Data_04.MS_0441'Access);
40499      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2923, (Is_Empty => True));
40500   end Initialize_2923;
40501
40502   ---------------------
40503   -- Initialize_2924 --
40504   ---------------------
40505
40506   procedure Initialize_2924 is
40507   begin
40508      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40509       (Base + 2924,
40510        AMF.Internals.Tables.UML_String_Data_02.MS_02B5'Access);
40511   end Initialize_2924;
40512
40513   ---------------------
40514   -- Initialize_2925 --
40515   ---------------------
40516
40517   procedure Initialize_2925 is
40518   begin
40519      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2925, (Is_Empty => True));
40520   end Initialize_2925;
40521
40522   ---------------------
40523   -- Initialize_2926 --
40524   ---------------------
40525
40526   procedure Initialize_2926 is
40527   begin
40528      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
40529       (Base + 2926,
40530        AMF.Internals.Tables.UML_String_Data_05.MS_057A'Access);
40531      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2926, (Is_Empty => True));
40532   end Initialize_2926;
40533
40534   ---------------------
40535   -- Initialize_2927 --
40536   ---------------------
40537
40538   procedure Initialize_2927 is
40539   begin
40540      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40541       (Base + 2927,
40542        AMF.Internals.Tables.UML_String_Data_03.MS_03EA'Access);
40543   end Initialize_2927;
40544
40545   ---------------------
40546   -- Initialize_2928 --
40547   ---------------------
40548
40549   procedure Initialize_2928 is
40550   begin
40551      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2928, (Is_Empty => True));
40552   end Initialize_2928;
40553
40554   ---------------------
40555   -- Initialize_2929 --
40556   ---------------------
40557
40558   procedure Initialize_2929 is
40559   begin
40560      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
40561       (Base + 2929,
40562        AMF.Internals.Tables.UML_String_Data_00.MS_0057'Access);
40563      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2929, (Is_Empty => True));
40564   end Initialize_2929;
40565
40566   ---------------------
40567   -- Initialize_2930 --
40568   ---------------------
40569
40570   procedure Initialize_2930 is
40571   begin
40572      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40573       (Base + 2930,
40574        AMF.Internals.Tables.UML_String_Data_07.MS_079D'Access);
40575   end Initialize_2930;
40576
40577   ---------------------
40578   -- Initialize_2931 --
40579   ---------------------
40580
40581   procedure Initialize_2931 is
40582   begin
40583      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2931, (Is_Empty => True));
40584   end Initialize_2931;
40585
40586   ---------------------
40587   -- Initialize_2932 --
40588   ---------------------
40589
40590   procedure Initialize_2932 is
40591   begin
40592      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
40593       (Base + 2932,
40594        AMF.Internals.Tables.UML_String_Data_05.MS_05EE'Access);
40595      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2932, (Is_Empty => True));
40596   end Initialize_2932;
40597
40598   ---------------------
40599   -- Initialize_2933 --
40600   ---------------------
40601
40602   procedure Initialize_2933 is
40603   begin
40604      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40605       (Base + 2933,
40606        AMF.Internals.Tables.UML_String_Data_00.MS_0097'Access);
40607   end Initialize_2933;
40608
40609   ---------------------
40610   -- Initialize_2934 --
40611   ---------------------
40612
40613   procedure Initialize_2934 is
40614   begin
40615      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2934, (Is_Empty => True));
40616   end Initialize_2934;
40617
40618   ---------------------
40619   -- Initialize_2935 --
40620   ---------------------
40621
40622   procedure Initialize_2935 is
40623   begin
40624      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40625       (Base + 2935,
40626        AMF.Internals.Tables.UML_String_Data_0B.MS_0B8E'Access);
40627   end Initialize_2935;
40628
40629   ---------------------
40630   -- Initialize_2936 --
40631   ---------------------
40632
40633   procedure Initialize_2936 is
40634   begin
40635      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40636       (Base + 2936,
40637        AMF.Internals.Tables.UML_String_Data_0C.MS_0C45'Access);
40638   end Initialize_2936;
40639
40640   ---------------------
40641   -- Initialize_2937 --
40642   ---------------------
40643
40644   procedure Initialize_2937 is
40645   begin
40646      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40647       (Base + 2937,
40648        AMF.Internals.Tables.UML_String_Data_01.MS_01CC'Access);
40649   end Initialize_2937;
40650
40651   ---------------------
40652   -- Initialize_2938 --
40653   ---------------------
40654
40655   procedure Initialize_2938 is
40656   begin
40657      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40658       (Base + 2938,
40659        AMF.Internals.Tables.UML_String_Data_02.MS_028B'Access);
40660   end Initialize_2938;
40661
40662   ---------------------
40663   -- Initialize_2939 --
40664   ---------------------
40665
40666   procedure Initialize_2939 is
40667   begin
40668      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
40669       (Base + 2939,
40670        AMF.Internals.Tables.UML_String_Data_06.MS_06B3'Access);
40671      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2939, (Is_Empty => True));
40672   end Initialize_2939;
40673
40674   ---------------------
40675   -- Initialize_2940 --
40676   ---------------------
40677
40678   procedure Initialize_2940 is
40679   begin
40680      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40681       (Base + 2940,
40682        AMF.Internals.Tables.UML_String_Data_0C.MS_0C02'Access);
40683   end Initialize_2940;
40684
40685   ---------------------
40686   -- Initialize_2941 --
40687   ---------------------
40688
40689   procedure Initialize_2941 is
40690   begin
40691      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2941, (Is_Empty => True));
40692   end Initialize_2941;
40693
40694   ---------------------
40695   -- Initialize_2942 --
40696   ---------------------
40697
40698   procedure Initialize_2942 is
40699   begin
40700      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
40701       (Base + 2942,
40702        AMF.Internals.Tables.UML_String_Data_04.MS_0419'Access);
40703      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2942, (Is_Empty => True));
40704   end Initialize_2942;
40705
40706   ---------------------
40707   -- Initialize_2943 --
40708   ---------------------
40709
40710   procedure Initialize_2943 is
40711   begin
40712      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40713       (Base + 2943,
40714        AMF.Internals.Tables.UML_String_Data_03.MS_03BD'Access);
40715   end Initialize_2943;
40716
40717   ---------------------
40718   -- Initialize_2944 --
40719   ---------------------
40720
40721   procedure Initialize_2944 is
40722   begin
40723      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2944, (Is_Empty => True));
40724   end Initialize_2944;
40725
40726   ---------------------
40727   -- Initialize_2945 --
40728   ---------------------
40729
40730   procedure Initialize_2945 is
40731   begin
40732      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40733       (Base + 2945,
40734        AMF.Internals.Tables.UML_String_Data_02.MS_020F'Access);
40735   end Initialize_2945;
40736
40737   ---------------------
40738   -- Initialize_2946 --
40739   ---------------------
40740
40741   procedure Initialize_2946 is
40742   begin
40743      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40744       (Base + 2946,
40745        AMF.Internals.Tables.UML_String_Data_05.MS_05A5'Access);
40746   end Initialize_2946;
40747
40748   ---------------------
40749   -- Initialize_2947 --
40750   ---------------------
40751
40752   procedure Initialize_2947 is
40753   begin
40754      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40755       (Base + 2947,
40756        AMF.Internals.Tables.UML_String_Data_00.MS_0015'Access);
40757   end Initialize_2947;
40758
40759   ---------------------
40760   -- Initialize_2948 --
40761   ---------------------
40762
40763   procedure Initialize_2948 is
40764   begin
40765      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40766       (Base + 2948,
40767        AMF.Internals.Tables.UML_String_Data_00.MS_0011'Access);
40768   end Initialize_2948;
40769
40770   ---------------------
40771   -- Initialize_2949 --
40772   ---------------------
40773
40774   procedure Initialize_2949 is
40775   begin
40776      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2949, True);
40777      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
40778       (Base + 2949,
40779        AMF.Internals.Tables.UML_String_Data_03.MS_03AB'Access);
40780      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2949, (False, AMF.CMOF.Public_Visibility));
40781   end Initialize_2949;
40782
40783   ---------------------
40784   -- Initialize_2950 --
40785   ---------------------
40786
40787   procedure Initialize_2950 is
40788   begin
40789      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40790       (Base + 2950,
40791        AMF.Internals.Tables.UML_String_Data_00.MS_00CA'Access);
40792   end Initialize_2950;
40793
40794   ---------------------
40795   -- Initialize_2951 --
40796   ---------------------
40797
40798   procedure Initialize_2951 is
40799   begin
40800      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
40801       (Base + 2951,
40802        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
40803      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2951, (Is_Empty => True));
40804   end Initialize_2951;
40805
40806   ---------------------
40807   -- Initialize_2952 --
40808   ---------------------
40809
40810   procedure Initialize_2952 is
40811   begin
40812      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2952, (Is_Empty => True));
40813   end Initialize_2952;
40814
40815   ---------------------
40816   -- Initialize_2953 --
40817   ---------------------
40818
40819   procedure Initialize_2953 is
40820   begin
40821      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2953, AMF.CMOF.Return_Parameter);
40822      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
40823       (Base + 2953,
40824        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
40825      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2953, (False, AMF.CMOF.Public_Visibility));
40826   end Initialize_2953;
40827
40828   ---------------------
40829   -- Initialize_2954 --
40830   ---------------------
40831
40832   procedure Initialize_2954 is
40833   begin
40834      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2954, True);
40835      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
40836       (Base + 2954,
40837        AMF.Internals.Tables.UML_String_Data_03.MS_03CD'Access);
40838      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2954, (False, AMF.CMOF.Public_Visibility));
40839   end Initialize_2954;
40840
40841   ---------------------
40842   -- Initialize_2955 --
40843   ---------------------
40844
40845   procedure Initialize_2955 is
40846   begin
40847      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40848       (Base + 2955,
40849        AMF.Internals.Tables.UML_String_Data_00.MS_002D'Access);
40850   end Initialize_2955;
40851
40852   ---------------------
40853   -- Initialize_2956 --
40854   ---------------------
40855
40856   procedure Initialize_2956 is
40857   begin
40858      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
40859       (Base + 2956,
40860        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
40861      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2956, (Is_Empty => True));
40862   end Initialize_2956;
40863
40864   ---------------------
40865   -- Initialize_2957 --
40866   ---------------------
40867
40868   procedure Initialize_2957 is
40869   begin
40870      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2957, (Is_Empty => True));
40871   end Initialize_2957;
40872
40873   ---------------------
40874   -- Initialize_2958 --
40875   ---------------------
40876
40877   procedure Initialize_2958 is
40878   begin
40879      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2958, AMF.CMOF.Return_Parameter);
40880      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
40881       (Base + 2958,
40882        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
40883      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2958, (False, AMF.CMOF.Public_Visibility));
40884   end Initialize_2958;
40885
40886   ---------------------
40887   -- Initialize_2959 --
40888   ---------------------
40889
40890   procedure Initialize_2959 is
40891   begin
40892      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40893       (Base + 2959,
40894        AMF.Internals.Tables.UML_String_Data_05.MS_05C6'Access);
40895   end Initialize_2959;
40896
40897   ---------------------
40898   -- Initialize_2960 --
40899   ---------------------
40900
40901   procedure Initialize_2960 is
40902   begin
40903      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40904       (Base + 2960,
40905        AMF.Internals.Tables.UML_String_Data_07.MS_07B5'Access);
40906   end Initialize_2960;
40907
40908   ---------------------
40909   -- Initialize_2961 --
40910   ---------------------
40911
40912   procedure Initialize_2961 is
40913   begin
40914      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2961, True);
40915      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
40916       (Base + 2961,
40917        AMF.Internals.Tables.UML_String_Data_0B.MS_0B69'Access);
40918      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2961, (False, AMF.CMOF.Public_Visibility));
40919   end Initialize_2961;
40920
40921   ---------------------
40922   -- Initialize_2962 --
40923   ---------------------
40924
40925   procedure Initialize_2962 is
40926   begin
40927      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40928       (Base + 2962,
40929        AMF.Internals.Tables.UML_String_Data_00.MS_0088'Access);
40930   end Initialize_2962;
40931
40932   ---------------------
40933   -- Initialize_2963 --
40934   ---------------------
40935
40936   procedure Initialize_2963 is
40937   begin
40938      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
40939       (Base + 2963,
40940        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
40941      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2963, (Is_Empty => True));
40942   end Initialize_2963;
40943
40944   ---------------------
40945   -- Initialize_2964 --
40946   ---------------------
40947
40948   procedure Initialize_2964 is
40949   begin
40950      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2964, (Is_Empty => True));
40951   end Initialize_2964;
40952
40953   ---------------------
40954   -- Initialize_2965 --
40955   ---------------------
40956
40957   procedure Initialize_2965 is
40958   begin
40959      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2965, AMF.CMOF.Return_Parameter);
40960      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
40961       (Base + 2965,
40962        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
40963      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2965, (False, AMF.CMOF.Public_Visibility));
40964   end Initialize_2965;
40965
40966   ---------------------
40967   -- Initialize_2966 --
40968   ---------------------
40969
40970   procedure Initialize_2966 is
40971   begin
40972      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2966, True);
40973      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
40974       (Base + 2966,
40975        AMF.Internals.Tables.UML_String_Data_03.MS_03CD'Access);
40976      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2966, (False, AMF.CMOF.Public_Visibility));
40977   end Initialize_2966;
40978
40979   ---------------------
40980   -- Initialize_2967 --
40981   ---------------------
40982
40983   procedure Initialize_2967 is
40984   begin
40985      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
40986       (Base + 2967,
40987        AMF.Internals.Tables.UML_String_Data_00.MS_002D'Access);
40988   end Initialize_2967;
40989
40990   ---------------------
40991   -- Initialize_2968 --
40992   ---------------------
40993
40994   procedure Initialize_2968 is
40995   begin
40996      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
40997       (Base + 2968,
40998        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
40999      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2968, (Is_Empty => True));
41000   end Initialize_2968;
41001
41002   ---------------------
41003   -- Initialize_2969 --
41004   ---------------------
41005
41006   procedure Initialize_2969 is
41007   begin
41008      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2969, (Is_Empty => True));
41009   end Initialize_2969;
41010
41011   ---------------------
41012   -- Initialize_2970 --
41013   ---------------------
41014
41015   procedure Initialize_2970 is
41016   begin
41017      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2970, AMF.CMOF.Return_Parameter);
41018      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
41019       (Base + 2970,
41020        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
41021      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2970, (False, AMF.CMOF.Public_Visibility));
41022   end Initialize_2970;
41023
41024   ---------------------
41025   -- Initialize_2971 --
41026   ---------------------
41027
41028   procedure Initialize_2971 is
41029   begin
41030      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41031       (Base + 2971,
41032        AMF.Internals.Tables.UML_String_Data_09.MS_09FD'Access);
41033   end Initialize_2971;
41034
41035   ---------------------
41036   -- Initialize_2972 --
41037   ---------------------
41038
41039   procedure Initialize_2972 is
41040   begin
41041      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2972, True);
41042      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
41043       (Base + 2972,
41044        AMF.Internals.Tables.UML_String_Data_03.MS_03CD'Access);
41045      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2972, (False, AMF.CMOF.Public_Visibility));
41046   end Initialize_2972;
41047
41048   ---------------------
41049   -- Initialize_2973 --
41050   ---------------------
41051
41052   procedure Initialize_2973 is
41053   begin
41054      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41055       (Base + 2973,
41056        AMF.Internals.Tables.UML_String_Data_00.MS_002D'Access);
41057   end Initialize_2973;
41058
41059   ---------------------
41060   -- Initialize_2974 --
41061   ---------------------
41062
41063   procedure Initialize_2974 is
41064   begin
41065      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
41066       (Base + 2974,
41067        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
41068      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2974, (Is_Empty => True));
41069   end Initialize_2974;
41070
41071   ---------------------
41072   -- Initialize_2975 --
41073   ---------------------
41074
41075   procedure Initialize_2975 is
41076   begin
41077      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2975, (Is_Empty => True));
41078   end Initialize_2975;
41079
41080   ---------------------
41081   -- Initialize_2976 --
41082   ---------------------
41083
41084   procedure Initialize_2976 is
41085   begin
41086      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2976, AMF.CMOF.Return_Parameter);
41087      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
41088       (Base + 2976,
41089        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
41090      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2976, (False, AMF.CMOF.Public_Visibility));
41091   end Initialize_2976;
41092
41093   ---------------------
41094   -- Initialize_2977 --
41095   ---------------------
41096
41097   procedure Initialize_2977 is
41098   begin
41099      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2977, True);
41100      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
41101       (Base + 2977,
41102        AMF.Internals.Tables.UML_String_Data_04.MS_0423'Access);
41103      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2977, (False, AMF.CMOF.Public_Visibility));
41104   end Initialize_2977;
41105
41106   ---------------------
41107   -- Initialize_2978 --
41108   ---------------------
41109
41110   procedure Initialize_2978 is
41111   begin
41112      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41113       (Base + 2978,
41114        AMF.Internals.Tables.UML_String_Data_03.MS_03D1'Access);
41115   end Initialize_2978;
41116
41117   ---------------------
41118   -- Initialize_2979 --
41119   ---------------------
41120
41121   procedure Initialize_2979 is
41122   begin
41123      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
41124       (Base + 2979,
41125        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
41126      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2979, (Is_Empty => True));
41127   end Initialize_2979;
41128
41129   ---------------------
41130   -- Initialize_2980 --
41131   ---------------------
41132
41133   procedure Initialize_2980 is
41134   begin
41135      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2980, (Is_Empty => True));
41136   end Initialize_2980;
41137
41138   ---------------------
41139   -- Initialize_2981 --
41140   ---------------------
41141
41142   procedure Initialize_2981 is
41143   begin
41144      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2981, AMF.CMOF.Return_Parameter);
41145      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
41146       (Base + 2981,
41147        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
41148      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2981, (False, AMF.CMOF.Public_Visibility));
41149   end Initialize_2981;
41150
41151   ---------------------
41152   -- Initialize_2982 --
41153   ---------------------
41154
41155   procedure Initialize_2982 is
41156   begin
41157      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41158       (Base + 2982,
41159        AMF.Internals.Tables.UML_String_Data_04.MS_0450'Access);
41160   end Initialize_2982;
41161
41162   ---------------------
41163   -- Initialize_2983 --
41164   ---------------------
41165
41166   procedure Initialize_2983 is
41167   begin
41168      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2983, True);
41169      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
41170       (Base + 2983,
41171        AMF.Internals.Tables.UML_String_Data_03.MS_03CD'Access);
41172      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2983, (False, AMF.CMOF.Public_Visibility));
41173   end Initialize_2983;
41174
41175   ---------------------
41176   -- Initialize_2984 --
41177   ---------------------
41178
41179   procedure Initialize_2984 is
41180   begin
41181      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41182       (Base + 2984,
41183        AMF.Internals.Tables.UML_String_Data_00.MS_002D'Access);
41184   end Initialize_2984;
41185
41186   ---------------------
41187   -- Initialize_2985 --
41188   ---------------------
41189
41190   procedure Initialize_2985 is
41191   begin
41192      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
41193       (Base + 2985,
41194        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
41195      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2985, (Is_Empty => True));
41196   end Initialize_2985;
41197
41198   ---------------------
41199   -- Initialize_2986 --
41200   ---------------------
41201
41202   procedure Initialize_2986 is
41203   begin
41204      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2986, (Is_Empty => True));
41205   end Initialize_2986;
41206
41207   ---------------------
41208   -- Initialize_2987 --
41209   ---------------------
41210
41211   procedure Initialize_2987 is
41212   begin
41213      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2987, AMF.CMOF.Return_Parameter);
41214      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
41215       (Base + 2987,
41216        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
41217      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2987, (False, AMF.CMOF.Public_Visibility));
41218   end Initialize_2987;
41219
41220   ---------------------
41221   -- Initialize_2988 --
41222   ---------------------
41223
41224   procedure Initialize_2988 is
41225   begin
41226      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2988, True);
41227      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
41228       (Base + 2988,
41229        AMF.Internals.Tables.UML_String_Data_00.MS_0036'Access);
41230      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2988, (False, AMF.CMOF.Public_Visibility));
41231   end Initialize_2988;
41232
41233   ---------------------
41234   -- Initialize_2989 --
41235   ---------------------
41236
41237   procedure Initialize_2989 is
41238   begin
41239      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41240       (Base + 2989,
41241        AMF.Internals.Tables.UML_String_Data_0A.MS_0AE5'Access);
41242   end Initialize_2989;
41243
41244   ---------------------
41245   -- Initialize_2990 --
41246   ---------------------
41247
41248   procedure Initialize_2990 is
41249   begin
41250      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
41251       (Base + 2990,
41252        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
41253      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2990, (Is_Empty => True));
41254   end Initialize_2990;
41255
41256   ---------------------
41257   -- Initialize_2991 --
41258   ---------------------
41259
41260   procedure Initialize_2991 is
41261   begin
41262      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2991, (Is_Empty => True));
41263   end Initialize_2991;
41264
41265   ---------------------
41266   -- Initialize_2992 --
41267   ---------------------
41268
41269   procedure Initialize_2992 is
41270   begin
41271      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 2992, AMF.CMOF.Return_Parameter);
41272      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
41273       (Base + 2992,
41274        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
41275      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2992, (False, AMF.CMOF.Public_Visibility));
41276   end Initialize_2992;
41277
41278   ---------------------
41279   -- Initialize_2993 --
41280   ---------------------
41281
41282   procedure Initialize_2993 is
41283   begin
41284      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41285       (Base + 2993,
41286        AMF.Internals.Tables.UML_String_Data_09.MS_093B'Access);
41287   end Initialize_2993;
41288
41289   ---------------------
41290   -- Initialize_2994 --
41291   ---------------------
41292
41293   procedure Initialize_2994 is
41294   begin
41295      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41296       (Base + 2994,
41297        AMF.Internals.Tables.UML_String_Data_04.MS_0467'Access);
41298   end Initialize_2994;
41299
41300   ---------------------
41301   -- Initialize_2995 --
41302   ---------------------
41303
41304   procedure Initialize_2995 is
41305   begin
41306      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41307       (Base + 2995,
41308        AMF.Internals.Tables.UML_String_Data_07.MS_0732'Access);
41309   end Initialize_2995;
41310
41311   ---------------------
41312   -- Initialize_2996 --
41313   ---------------------
41314
41315   procedure Initialize_2996 is
41316   begin
41317      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 2996, True);
41318      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
41319       (Base + 2996,
41320        AMF.Internals.Tables.UML_String_Data_03.MS_03CD'Access);
41321      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2996, (False, AMF.CMOF.Public_Visibility));
41322   end Initialize_2996;
41323
41324   ---------------------
41325   -- Initialize_2997 --
41326   ---------------------
41327
41328   procedure Initialize_2997 is
41329   begin
41330      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41331       (Base + 2997,
41332        AMF.Internals.Tables.UML_String_Data_00.MS_002D'Access);
41333   end Initialize_2997;
41334
41335   ---------------------
41336   -- Initialize_2998 --
41337   ---------------------
41338
41339   procedure Initialize_2998 is
41340   begin
41341      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
41342       (Base + 2998,
41343        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
41344      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2998, (Is_Empty => True));
41345   end Initialize_2998;
41346
41347   ---------------------
41348   -- Initialize_2999 --
41349   ---------------------
41350
41351   procedure Initialize_2999 is
41352   begin
41353      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 2999, (Is_Empty => True));
41354   end Initialize_2999;
41355
41356   ---------------------
41357   -- Initialize_3000 --
41358   ---------------------
41359
41360   procedure Initialize_3000 is
41361   begin
41362      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3000, AMF.CMOF.Return_Parameter);
41363      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
41364       (Base + 3000,
41365        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
41366      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3000, (False, AMF.CMOF.Public_Visibility));
41367   end Initialize_3000;
41368
41369   ---------------------
41370   -- Initialize_3001 --
41371   ---------------------
41372
41373   procedure Initialize_3001 is
41374   begin
41375      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3001, True);
41376      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
41377       (Base + 3001,
41378        AMF.Internals.Tables.UML_String_Data_0B.MS_0BB7'Access);
41379      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3001, (False, AMF.CMOF.Public_Visibility));
41380   end Initialize_3001;
41381
41382   ---------------------
41383   -- Initialize_3002 --
41384   ---------------------
41385
41386   procedure Initialize_3002 is
41387   begin
41388      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41389       (Base + 3002,
41390        AMF.Internals.Tables.UML_String_Data_06.MS_0614'Access);
41391   end Initialize_3002;
41392
41393   ---------------------
41394   -- Initialize_3003 --
41395   ---------------------
41396
41397   procedure Initialize_3003 is
41398   begin
41399      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
41400       (Base + 3003,
41401        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
41402      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3003, (Is_Empty => True));
41403   end Initialize_3003;
41404
41405   ---------------------
41406   -- Initialize_3004 --
41407   ---------------------
41408
41409   procedure Initialize_3004 is
41410   begin
41411      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3004, (Is_Empty => True));
41412   end Initialize_3004;
41413
41414   ---------------------
41415   -- Initialize_3005 --
41416   ---------------------
41417
41418   procedure Initialize_3005 is
41419   begin
41420      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3005, AMF.CMOF.Return_Parameter);
41421      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
41422       (Base + 3005,
41423        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
41424      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3005, (False, AMF.CMOF.Public_Visibility));
41425   end Initialize_3005;
41426
41427   ---------------------
41428   -- Initialize_3006 --
41429   ---------------------
41430
41431   procedure Initialize_3006 is
41432   begin
41433      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41434       (Base + 3006,
41435        AMF.Internals.Tables.UML_String_Data_04.MS_046E'Access);
41436   end Initialize_3006;
41437
41438   ---------------------
41439   -- Initialize_3007 --
41440   ---------------------
41441
41442   procedure Initialize_3007 is
41443   begin
41444      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41445       (Base + 3007,
41446        AMF.Internals.Tables.UML_String_Data_03.MS_0370'Access);
41447   end Initialize_3007;
41448
41449   ---------------------
41450   -- Initialize_3008 --
41451   ---------------------
41452
41453   procedure Initialize_3008 is
41454   begin
41455      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3008, True);
41456      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
41457       (Base + 3008,
41458        AMF.Internals.Tables.UML_String_Data_03.MS_03CD'Access);
41459      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3008, (False, AMF.CMOF.Public_Visibility));
41460   end Initialize_3008;
41461
41462   ---------------------
41463   -- Initialize_3009 --
41464   ---------------------
41465
41466   procedure Initialize_3009 is
41467   begin
41468      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41469       (Base + 3009,
41470        AMF.Internals.Tables.UML_String_Data_00.MS_002D'Access);
41471   end Initialize_3009;
41472
41473   ---------------------
41474   -- Initialize_3010 --
41475   ---------------------
41476
41477   procedure Initialize_3010 is
41478   begin
41479      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
41480       (Base + 3010,
41481        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
41482      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3010, (Is_Empty => True));
41483   end Initialize_3010;
41484
41485   ---------------------
41486   -- Initialize_3011 --
41487   ---------------------
41488
41489   procedure Initialize_3011 is
41490   begin
41491      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3011, (Is_Empty => True));
41492   end Initialize_3011;
41493
41494   ---------------------
41495   -- Initialize_3012 --
41496   ---------------------
41497
41498   procedure Initialize_3012 is
41499   begin
41500      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3012, AMF.CMOF.Return_Parameter);
41501      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
41502       (Base + 3012,
41503        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
41504      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3012, (False, AMF.CMOF.Public_Visibility));
41505   end Initialize_3012;
41506
41507   ---------------------
41508   -- Initialize_3013 --
41509   ---------------------
41510
41511   procedure Initialize_3013 is
41512   begin
41513      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3013, True);
41514      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
41515       (Base + 3013,
41516        AMF.Internals.Tables.UML_String_Data_00.MS_00B5'Access);
41517      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3013, (False, AMF.CMOF.Public_Visibility));
41518   end Initialize_3013;
41519
41520   ---------------------
41521   -- Initialize_3014 --
41522   ---------------------
41523
41524   procedure Initialize_3014 is
41525   begin
41526      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41527       (Base + 3014,
41528        AMF.Internals.Tables.UML_String_Data_04.MS_04F1'Access);
41529   end Initialize_3014;
41530
41531   ---------------------
41532   -- Initialize_3015 --
41533   ---------------------
41534
41535   procedure Initialize_3015 is
41536   begin
41537      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
41538       (Base + 3015,
41539        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
41540      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3015, (Is_Empty => True));
41541   end Initialize_3015;
41542
41543   ---------------------
41544   -- Initialize_3016 --
41545   ---------------------
41546
41547   procedure Initialize_3016 is
41548   begin
41549      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3016, (Is_Empty => True));
41550   end Initialize_3016;
41551
41552   ---------------------
41553   -- Initialize_3017 --
41554   ---------------------
41555
41556   procedure Initialize_3017 is
41557   begin
41558      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3017, AMF.CMOF.Return_Parameter);
41559      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
41560       (Base + 3017,
41561        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
41562      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3017, (False, AMF.CMOF.Public_Visibility));
41563   end Initialize_3017;
41564
41565   ---------------------
41566   -- Initialize_3018 --
41567   ---------------------
41568
41569   procedure Initialize_3018 is
41570   begin
41571      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41572       (Base + 3018,
41573        AMF.Internals.Tables.UML_String_Data_04.MS_047E'Access);
41574   end Initialize_3018;
41575
41576   ---------------------
41577   -- Initialize_3019 --
41578   ---------------------
41579
41580   procedure Initialize_3019 is
41581   begin
41582      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
41583       (Base + 3019,
41584        AMF.Internals.Tables.UML_String_Data_05.MS_0549'Access);
41585      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3019, (Is_Empty => True));
41586   end Initialize_3019;
41587
41588   ---------------------
41589   -- Initialize_3020 --
41590   ---------------------
41591
41592   procedure Initialize_3020 is
41593   begin
41594      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41595       (Base + 3020,
41596        AMF.Internals.Tables.UML_String_Data_00.MS_0025'Access);
41597   end Initialize_3020;
41598
41599   ---------------------
41600   -- Initialize_3021 --
41601   ---------------------
41602
41603   procedure Initialize_3021 is
41604   begin
41605      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3021, (Is_Empty => True));
41606   end Initialize_3021;
41607
41608   ---------------------
41609   -- Initialize_3022 --
41610   ---------------------
41611
41612   procedure Initialize_3022 is
41613   begin
41614      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
41615       (Base + 3022,
41616        AMF.Internals.Tables.UML_String_Data_01.MS_017F'Access);
41617      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3022, (Is_Empty => True));
41618   end Initialize_3022;
41619
41620   ---------------------
41621   -- Initialize_3023 --
41622   ---------------------
41623
41624   procedure Initialize_3023 is
41625   begin
41626      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41627       (Base + 3023,
41628        AMF.Internals.Tables.UML_String_Data_04.MS_04B9'Access);
41629   end Initialize_3023;
41630
41631   ---------------------
41632   -- Initialize_3024 --
41633   ---------------------
41634
41635   procedure Initialize_3024 is
41636   begin
41637      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3024, (Is_Empty => True));
41638   end Initialize_3024;
41639
41640   ---------------------
41641   -- Initialize_3025 --
41642   ---------------------
41643
41644   procedure Initialize_3025 is
41645   begin
41646      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
41647       (Base + 3025,
41648        AMF.Internals.Tables.UML_String_Data_01.MS_01D5'Access);
41649      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3025, (Is_Empty => True));
41650   end Initialize_3025;
41651
41652   ---------------------
41653   -- Initialize_3026 --
41654   ---------------------
41655
41656   procedure Initialize_3026 is
41657   begin
41658      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41659       (Base + 3026,
41660        AMF.Internals.Tables.UML_String_Data_09.MS_095E'Access);
41661   end Initialize_3026;
41662
41663   ---------------------
41664   -- Initialize_3027 --
41665   ---------------------
41666
41667   procedure Initialize_3027 is
41668   begin
41669      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3027, (Is_Empty => True));
41670   end Initialize_3027;
41671
41672   ---------------------
41673   -- Initialize_3028 --
41674   ---------------------
41675
41676   procedure Initialize_3028 is
41677   begin
41678      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
41679       (Base + 3028,
41680        AMF.Internals.Tables.UML_String_Data_0A.MS_0A58'Access);
41681      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3028, (Is_Empty => True));
41682   end Initialize_3028;
41683
41684   ---------------------
41685   -- Initialize_3029 --
41686   ---------------------
41687
41688   procedure Initialize_3029 is
41689   begin
41690      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41691       (Base + 3029,
41692        AMF.Internals.Tables.UML_String_Data_09.MS_0948'Access);
41693   end Initialize_3029;
41694
41695   ---------------------
41696   -- Initialize_3030 --
41697   ---------------------
41698
41699   procedure Initialize_3030 is
41700   begin
41701      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3030, (Is_Empty => True));
41702   end Initialize_3030;
41703
41704   ---------------------
41705   -- Initialize_3031 --
41706   ---------------------
41707
41708   procedure Initialize_3031 is
41709   begin
41710      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41711       (Base + 3031,
41712        AMF.Internals.Tables.UML_String_Data_06.MS_0667'Access);
41713   end Initialize_3031;
41714
41715   ---------------------
41716   -- Initialize_3032 --
41717   ---------------------
41718
41719   procedure Initialize_3032 is
41720   begin
41721      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41722       (Base + 3032,
41723        AMF.Internals.Tables.UML_String_Data_03.MS_03EF'Access);
41724   end Initialize_3032;
41725
41726   ---------------------
41727   -- Initialize_3033 --
41728   ---------------------
41729
41730   procedure Initialize_3033 is
41731   begin
41732      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41733       (Base + 3033,
41734        AMF.Internals.Tables.UML_String_Data_05.MS_0522'Access);
41735   end Initialize_3033;
41736
41737   ---------------------
41738   -- Initialize_3034 --
41739   ---------------------
41740
41741   procedure Initialize_3034 is
41742   begin
41743      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41744       (Base + 3034,
41745        AMF.Internals.Tables.UML_String_Data_06.MS_0672'Access);
41746   end Initialize_3034;
41747
41748   ---------------------
41749   -- Initialize_3035 --
41750   ---------------------
41751
41752   procedure Initialize_3035 is
41753   begin
41754      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41755       (Base + 3035,
41756        AMF.Internals.Tables.UML_String_Data_00.MS_0001'Access);
41757   end Initialize_3035;
41758
41759   ---------------------
41760   -- Initialize_3036 --
41761   ---------------------
41762
41763   procedure Initialize_3036 is
41764   begin
41765      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41766       (Base + 3036,
41767        AMF.Internals.Tables.UML_String_Data_04.MS_0477'Access);
41768   end Initialize_3036;
41769
41770   ---------------------
41771   -- Initialize_3037 --
41772   ---------------------
41773
41774   procedure Initialize_3037 is
41775   begin
41776      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41777       (Base + 3037,
41778        AMF.Internals.Tables.UML_String_Data_02.MS_0257'Access);
41779   end Initialize_3037;
41780
41781   ---------------------
41782   -- Initialize_3038 --
41783   ---------------------
41784
41785   procedure Initialize_3038 is
41786   begin
41787      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41788       (Base + 3038,
41789        AMF.Internals.Tables.UML_String_Data_0B.MS_0B96'Access);
41790   end Initialize_3038;
41791
41792   ---------------------
41793   -- Initialize_3039 --
41794   ---------------------
41795
41796   procedure Initialize_3039 is
41797   begin
41798      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41799       (Base + 3039,
41800        AMF.Internals.Tables.UML_String_Data_04.MS_04DC'Access);
41801   end Initialize_3039;
41802
41803   ---------------------
41804   -- Initialize_3040 --
41805   ---------------------
41806
41807   procedure Initialize_3040 is
41808   begin
41809      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41810       (Base + 3040,
41811        AMF.Internals.Tables.UML_String_Data_03.MS_0375'Access);
41812   end Initialize_3040;
41813
41814   ---------------------
41815   -- Initialize_3041 --
41816   ---------------------
41817
41818   procedure Initialize_3041 is
41819   begin
41820      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41821       (Base + 3041,
41822        AMF.Internals.Tables.UML_String_Data_02.MS_0283'Access);
41823   end Initialize_3041;
41824
41825   ---------------------
41826   -- Initialize_3042 --
41827   ---------------------
41828
41829   procedure Initialize_3042 is
41830   begin
41831      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41832       (Base + 3042,
41833        AMF.Internals.Tables.UML_String_Data_02.MS_024E'Access);
41834   end Initialize_3042;
41835
41836   ---------------------
41837   -- Initialize_3043 --
41838   ---------------------
41839
41840   procedure Initialize_3043 is
41841   begin
41842      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
41843       (Base + 3043,
41844        AMF.Internals.Tables.UML_String_Data_04.MS_0402'Access);
41845      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3043, (Is_Empty => True));
41846   end Initialize_3043;
41847
41848   ---------------------
41849   -- Initialize_3044 --
41850   ---------------------
41851
41852   procedure Initialize_3044 is
41853   begin
41854      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41855       (Base + 3044,
41856        AMF.Internals.Tables.UML_String_Data_01.MS_011C'Access);
41857   end Initialize_3044;
41858
41859   ---------------------
41860   -- Initialize_3045 --
41861   ---------------------
41862
41863   procedure Initialize_3045 is
41864   begin
41865      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3045, (Is_Empty => True));
41866   end Initialize_3045;
41867
41868   ---------------------
41869   -- Initialize_3046 --
41870   ---------------------
41871
41872   procedure Initialize_3046 is
41873   begin
41874      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
41875       (Base + 3046,
41876        AMF.Internals.Tables.UML_String_Data_09.MS_099B'Access);
41877      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3046, (Is_Empty => True));
41878   end Initialize_3046;
41879
41880   ---------------------
41881   -- Initialize_3047 --
41882   ---------------------
41883
41884   procedure Initialize_3047 is
41885   begin
41886      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41887       (Base + 3047,
41888        AMF.Internals.Tables.UML_String_Data_01.MS_01D6'Access);
41889   end Initialize_3047;
41890
41891   ---------------------
41892   -- Initialize_3048 --
41893   ---------------------
41894
41895   procedure Initialize_3048 is
41896   begin
41897      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3048, (Is_Empty => True));
41898   end Initialize_3048;
41899
41900   ---------------------
41901   -- Initialize_3049 --
41902   ---------------------
41903
41904   procedure Initialize_3049 is
41905   begin
41906      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41907       (Base + 3049,
41908        AMF.Internals.Tables.UML_String_Data_03.MS_031D'Access);
41909   end Initialize_3049;
41910
41911   ---------------------
41912   -- Initialize_3050 --
41913   ---------------------
41914
41915   procedure Initialize_3050 is
41916   begin
41917      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
41918       (Base + 3050,
41919        AMF.Internals.Tables.UML_String_Data_03.MS_0309'Access);
41920      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3050, (Is_Empty => True));
41921   end Initialize_3050;
41922
41923   ---------------------
41924   -- Initialize_3051 --
41925   ---------------------
41926
41927   procedure Initialize_3051 is
41928   begin
41929      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41930       (Base + 3051,
41931        AMF.Internals.Tables.UML_String_Data_00.MS_00CB'Access);
41932   end Initialize_3051;
41933
41934   ---------------------
41935   -- Initialize_3052 --
41936   ---------------------
41937
41938   procedure Initialize_3052 is
41939   begin
41940      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3052, (Is_Empty => True));
41941   end Initialize_3052;
41942
41943   ---------------------
41944   -- Initialize_3053 --
41945   ---------------------
41946
41947   procedure Initialize_3053 is
41948   begin
41949      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
41950       (Base + 3053,
41951        AMF.Internals.Tables.UML_String_Data_06.MS_066F'Access);
41952      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3053, (Is_Empty => True));
41953   end Initialize_3053;
41954
41955   ---------------------
41956   -- Initialize_3054 --
41957   ---------------------
41958
41959   procedure Initialize_3054 is
41960   begin
41961      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41962       (Base + 3054,
41963        AMF.Internals.Tables.UML_String_Data_03.MS_03AF'Access);
41964   end Initialize_3054;
41965
41966   ---------------------
41967   -- Initialize_3055 --
41968   ---------------------
41969
41970   procedure Initialize_3055 is
41971   begin
41972      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3055, (Is_Empty => True));
41973   end Initialize_3055;
41974
41975   ---------------------
41976   -- Initialize_3056 --
41977   ---------------------
41978
41979   procedure Initialize_3056 is
41980   begin
41981      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
41982       (Base + 3056,
41983        AMF.Internals.Tables.UML_String_Data_0B.MS_0BE4'Access);
41984      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3056, (Is_Empty => True));
41985   end Initialize_3056;
41986
41987   ---------------------
41988   -- Initialize_3057 --
41989   ---------------------
41990
41991   procedure Initialize_3057 is
41992   begin
41993      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
41994       (Base + 3057,
41995        AMF.Internals.Tables.UML_String_Data_05.MS_0551'Access);
41996   end Initialize_3057;
41997
41998   ---------------------
41999   -- Initialize_3058 --
42000   ---------------------
42001
42002   procedure Initialize_3058 is
42003   begin
42004      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3058, (Is_Empty => True));
42005   end Initialize_3058;
42006
42007   ---------------------
42008   -- Initialize_3059 --
42009   ---------------------
42010
42011   procedure Initialize_3059 is
42012   begin
42013      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42014       (Base + 3059,
42015        AMF.Internals.Tables.UML_String_Data_06.MS_0617'Access);
42016      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3059, (Is_Empty => True));
42017   end Initialize_3059;
42018
42019   ---------------------
42020   -- Initialize_3060 --
42021   ---------------------
42022
42023   procedure Initialize_3060 is
42024   begin
42025      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42026       (Base + 3060,
42027        AMF.Internals.Tables.UML_String_Data_05.MS_051F'Access);
42028   end Initialize_3060;
42029
42030   ---------------------
42031   -- Initialize_3061 --
42032   ---------------------
42033
42034   procedure Initialize_3061 is
42035   begin
42036      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3061, (Is_Empty => True));
42037   end Initialize_3061;
42038
42039   ---------------------
42040   -- Initialize_3062 --
42041   ---------------------
42042
42043   procedure Initialize_3062 is
42044   begin
42045      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42046       (Base + 3062,
42047        AMF.Internals.Tables.UML_String_Data_02.MS_02AC'Access);
42048      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3062, (Is_Empty => True));
42049   end Initialize_3062;
42050
42051   ---------------------
42052   -- Initialize_3063 --
42053   ---------------------
42054
42055   procedure Initialize_3063 is
42056   begin
42057      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42058       (Base + 3063,
42059        AMF.Internals.Tables.UML_String_Data_0C.MS_0C9F'Access);
42060   end Initialize_3063;
42061
42062   ---------------------
42063   -- Initialize_3064 --
42064   ---------------------
42065
42066   procedure Initialize_3064 is
42067   begin
42068      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3064, (Is_Empty => True));
42069   end Initialize_3064;
42070
42071   ---------------------
42072   -- Initialize_3065 --
42073   ---------------------
42074
42075   procedure Initialize_3065 is
42076   begin
42077      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42078       (Base + 3065,
42079        AMF.Internals.Tables.UML_String_Data_06.MS_06EE'Access);
42080      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3065, (Is_Empty => True));
42081   end Initialize_3065;
42082
42083   ---------------------
42084   -- Initialize_3066 --
42085   ---------------------
42086
42087   procedure Initialize_3066 is
42088   begin
42089      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42090       (Base + 3066,
42091        AMF.Internals.Tables.UML_String_Data_05.MS_0558'Access);
42092   end Initialize_3066;
42093
42094   ---------------------
42095   -- Initialize_3067 --
42096   ---------------------
42097
42098   procedure Initialize_3067 is
42099   begin
42100      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3067, (Is_Empty => True));
42101   end Initialize_3067;
42102
42103   ---------------------
42104   -- Initialize_3068 --
42105   ---------------------
42106
42107   procedure Initialize_3068 is
42108   begin
42109      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42110       (Base + 3068,
42111        AMF.Internals.Tables.UML_String_Data_0B.MS_0BE6'Access);
42112      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3068, (Is_Empty => True));
42113   end Initialize_3068;
42114
42115   ---------------------
42116   -- Initialize_3069 --
42117   ---------------------
42118
42119   procedure Initialize_3069 is
42120   begin
42121      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42122       (Base + 3069,
42123        AMF.Internals.Tables.UML_String_Data_0B.MS_0BA0'Access);
42124   end Initialize_3069;
42125
42126   ---------------------
42127   -- Initialize_3070 --
42128   ---------------------
42129
42130   procedure Initialize_3070 is
42131   begin
42132      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3070, (Is_Empty => True));
42133   end Initialize_3070;
42134
42135   ---------------------
42136   -- Initialize_3071 --
42137   ---------------------
42138
42139   procedure Initialize_3071 is
42140   begin
42141      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42142       (Base + 3071,
42143        AMF.Internals.Tables.UML_String_Data_09.MS_0981'Access);
42144   end Initialize_3071;
42145
42146   ---------------------
42147   -- Initialize_3072 --
42148   ---------------------
42149
42150   procedure Initialize_3072 is
42151   begin
42152      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42153       (Base + 3072,
42154        AMF.Internals.Tables.UML_String_Data_0A.MS_0AC2'Access);
42155   end Initialize_3072;
42156
42157   ---------------------
42158   -- Initialize_3073 --
42159   ---------------------
42160
42161   procedure Initialize_3073 is
42162   begin
42163      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42164       (Base + 3073,
42165        AMF.Internals.Tables.UML_String_Data_0C.MS_0C15'Access);
42166   end Initialize_3073;
42167
42168   ---------------------
42169   -- Initialize_3074 --
42170   ---------------------
42171
42172   procedure Initialize_3074 is
42173   begin
42174      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42175       (Base + 3074,
42176        AMF.Internals.Tables.UML_String_Data_04.MS_04E8'Access);
42177   end Initialize_3074;
42178
42179   ---------------------
42180   -- Initialize_3075 --
42181   ---------------------
42182
42183   procedure Initialize_3075 is
42184   begin
42185      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42186       (Base + 3075,
42187        AMF.Internals.Tables.UML_String_Data_03.MS_0399'Access);
42188   end Initialize_3075;
42189
42190   ---------------------
42191   -- Initialize_3076 --
42192   ---------------------
42193
42194   procedure Initialize_3076 is
42195   begin
42196      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42197       (Base + 3076,
42198        AMF.Internals.Tables.UML_String_Data_08.MS_081B'Access);
42199   end Initialize_3076;
42200
42201   ---------------------
42202   -- Initialize_3077 --
42203   ---------------------
42204
42205   procedure Initialize_3077 is
42206   begin
42207      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42208       (Base + 3077,
42209        AMF.Internals.Tables.UML_String_Data_06.MS_0677'Access);
42210   end Initialize_3077;
42211
42212   ---------------------
42213   -- Initialize_3078 --
42214   ---------------------
42215
42216   procedure Initialize_3078 is
42217   begin
42218      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42219       (Base + 3078,
42220        AMF.Internals.Tables.UML_String_Data_0B.MS_0B3A'Access);
42221   end Initialize_3078;
42222
42223   ---------------------
42224   -- Initialize_3079 --
42225   ---------------------
42226
42227   procedure Initialize_3079 is
42228   begin
42229      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3079, True);
42230      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42231       (Base + 3079,
42232        AMF.Internals.Tables.UML_String_Data_08.MS_08BC'Access);
42233      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3079, (False, AMF.CMOF.Public_Visibility));
42234   end Initialize_3079;
42235
42236   ---------------------
42237   -- Initialize_3080 --
42238   ---------------------
42239
42240   procedure Initialize_3080 is
42241   begin
42242      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42243       (Base + 3080,
42244        AMF.Internals.Tables.UML_String_Data_0A.MS_0A2A'Access);
42245   end Initialize_3080;
42246
42247   ---------------------
42248   -- Initialize_3081 --
42249   ---------------------
42250
42251   procedure Initialize_3081 is
42252   begin
42253      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42254       (Base + 3081,
42255        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
42256      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3081, (Is_Empty => True));
42257   end Initialize_3081;
42258
42259   ---------------------
42260   -- Initialize_3082 --
42261   ---------------------
42262
42263   procedure Initialize_3082 is
42264   begin
42265      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3082, (Is_Empty => True));
42266   end Initialize_3082;
42267
42268   ---------------------
42269   -- Initialize_3083 --
42270   ---------------------
42271
42272   procedure Initialize_3083 is
42273   begin
42274      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3083, AMF.CMOF.Return_Parameter);
42275      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42276       (Base + 3083,
42277        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
42278      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3083, (False, AMF.CMOF.Public_Visibility));
42279   end Initialize_3083;
42280
42281   ---------------------
42282   -- Initialize_3084 --
42283   ---------------------
42284
42285   procedure Initialize_3084 is
42286   begin
42287      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42288       (Base + 3084,
42289        AMF.Internals.Tables.UML_String_Data_01.MS_016B'Access);
42290   end Initialize_3084;
42291
42292   ---------------------
42293   -- Initialize_3085 --
42294   ---------------------
42295
42296   procedure Initialize_3085 is
42297   begin
42298      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42299       (Base + 3085,
42300        AMF.Internals.Tables.UML_String_Data_03.MS_032F'Access);
42301   end Initialize_3085;
42302
42303   ---------------------
42304   -- Initialize_3086 --
42305   ---------------------
42306
42307   procedure Initialize_3086 is
42308   begin
42309      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42310       (Base + 3086,
42311        AMF.Internals.Tables.UML_String_Data_01.MS_011E'Access);
42312   end Initialize_3086;
42313
42314   ---------------------
42315   -- Initialize_3087 --
42316   ---------------------
42317
42318   procedure Initialize_3087 is
42319   begin
42320      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42321       (Base + 3087,
42322        AMF.Internals.Tables.UML_String_Data_06.MS_06CC'Access);
42323   end Initialize_3087;
42324
42325   ---------------------
42326   -- Initialize_3088 --
42327   ---------------------
42328
42329   procedure Initialize_3088 is
42330   begin
42331      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42332       (Base + 3088,
42333        AMF.Internals.Tables.UML_String_Data_06.MS_06DD'Access);
42334   end Initialize_3088;
42335
42336   ---------------------
42337   -- Initialize_3089 --
42338   ---------------------
42339
42340   procedure Initialize_3089 is
42341   begin
42342      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42343       (Base + 3089,
42344        AMF.Internals.Tables.UML_String_Data_00.MS_00F5'Access);
42345   end Initialize_3089;
42346
42347   ---------------------
42348   -- Initialize_3090 --
42349   ---------------------
42350
42351   procedure Initialize_3090 is
42352   begin
42353      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42354       (Base + 3090,
42355        AMF.Internals.Tables.UML_String_Data_0A.MS_0A08'Access);
42356   end Initialize_3090;
42357
42358   ---------------------
42359   -- Initialize_3091 --
42360   ---------------------
42361
42362   procedure Initialize_3091 is
42363   begin
42364      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42365       (Base + 3091,
42366        AMF.Internals.Tables.UML_String_Data_02.MS_02DC'Access);
42367      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3091, (Is_Empty => True));
42368   end Initialize_3091;
42369
42370   ---------------------
42371   -- Initialize_3092 --
42372   ---------------------
42373
42374   procedure Initialize_3092 is
42375   begin
42376      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42377       (Base + 3092,
42378        AMF.Internals.Tables.UML_String_Data_0C.MS_0C4C'Access);
42379   end Initialize_3092;
42380
42381   ---------------------
42382   -- Initialize_3093 --
42383   ---------------------
42384
42385   procedure Initialize_3093 is
42386   begin
42387      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3093, (Is_Empty => True));
42388   end Initialize_3093;
42389
42390   ---------------------
42391   -- Initialize_3094 --
42392   ---------------------
42393
42394   procedure Initialize_3094 is
42395   begin
42396      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42397       (Base + 3094,
42398        AMF.Internals.Tables.UML_String_Data_06.MS_063A'Access);
42399      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3094, (Is_Empty => True));
42400   end Initialize_3094;
42401
42402   ---------------------
42403   -- Initialize_3095 --
42404   ---------------------
42405
42406   procedure Initialize_3095 is
42407   begin
42408      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42409       (Base + 3095,
42410        AMF.Internals.Tables.UML_String_Data_0B.MS_0BFE'Access);
42411   end Initialize_3095;
42412
42413   ---------------------
42414   -- Initialize_3096 --
42415   ---------------------
42416
42417   procedure Initialize_3096 is
42418   begin
42419      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3096, (Is_Empty => True));
42420   end Initialize_3096;
42421
42422   ---------------------
42423   -- Initialize_3097 --
42424   ---------------------
42425
42426   procedure Initialize_3097 is
42427   begin
42428      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42429       (Base + 3097,
42430        AMF.Internals.Tables.UML_String_Data_09.MS_092C'Access);
42431      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3097, (Is_Empty => True));
42432   end Initialize_3097;
42433
42434   ---------------------
42435   -- Initialize_3098 --
42436   ---------------------
42437
42438   procedure Initialize_3098 is
42439   begin
42440      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42441       (Base + 3098,
42442        AMF.Internals.Tables.UML_String_Data_02.MS_029B'Access);
42443   end Initialize_3098;
42444
42445   ---------------------
42446   -- Initialize_3099 --
42447   ---------------------
42448
42449   procedure Initialize_3099 is
42450   begin
42451      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3099, (Is_Empty => True));
42452   end Initialize_3099;
42453
42454   ---------------------
42455   -- Initialize_3100 --
42456   ---------------------
42457
42458   procedure Initialize_3100 is
42459   begin
42460      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42461       (Base + 3100,
42462        AMF.Internals.Tables.UML_String_Data_07.MS_077B'Access);
42463      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3100, (Is_Empty => True));
42464   end Initialize_3100;
42465
42466   ---------------------
42467   -- Initialize_3101 --
42468   ---------------------
42469
42470   procedure Initialize_3101 is
42471   begin
42472      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42473       (Base + 3101,
42474        AMF.Internals.Tables.UML_String_Data_08.MS_0826'Access);
42475   end Initialize_3101;
42476
42477   ---------------------
42478   -- Initialize_3102 --
42479   ---------------------
42480
42481   procedure Initialize_3102 is
42482   begin
42483      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3102, (Is_Empty => True));
42484   end Initialize_3102;
42485
42486   ---------------------
42487   -- Initialize_3103 --
42488   ---------------------
42489
42490   procedure Initialize_3103 is
42491   begin
42492      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42493       (Base + 3103,
42494        AMF.Internals.Tables.UML_String_Data_0A.MS_0A1C'Access);
42495   end Initialize_3103;
42496
42497   ---------------------
42498   -- Initialize_3104 --
42499   ---------------------
42500
42501   procedure Initialize_3104 is
42502   begin
42503      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42504       (Base + 3104,
42505        AMF.Internals.Tables.UML_String_Data_0B.MS_0BCB'Access);
42506   end Initialize_3104;
42507
42508   ---------------------
42509   -- Initialize_3105 --
42510   ---------------------
42511
42512   procedure Initialize_3105 is
42513   begin
42514      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42515       (Base + 3105,
42516        AMF.Internals.Tables.UML_String_Data_03.MS_039D'Access);
42517   end Initialize_3105;
42518
42519   ---------------------
42520   -- Initialize_3106 --
42521   ---------------------
42522
42523   procedure Initialize_3106 is
42524   begin
42525      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42526       (Base + 3106,
42527        AMF.Internals.Tables.UML_String_Data_0A.MS_0ADE'Access);
42528   end Initialize_3106;
42529
42530   ---------------------
42531   -- Initialize_3107 --
42532   ---------------------
42533
42534   procedure Initialize_3107 is
42535   begin
42536      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42537       (Base + 3107,
42538        AMF.Internals.Tables.UML_String_Data_06.MS_0678'Access);
42539   end Initialize_3107;
42540
42541   ---------------------
42542   -- Initialize_3108 --
42543   ---------------------
42544
42545   procedure Initialize_3108 is
42546   begin
42547      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42548       (Base + 3108,
42549        AMF.Internals.Tables.UML_String_Data_0B.MS_0BB2'Access);
42550   end Initialize_3108;
42551
42552   ---------------------
42553   -- Initialize_3109 --
42554   ---------------------
42555
42556   procedure Initialize_3109 is
42557   begin
42558      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3109, True);
42559      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42560       (Base + 3109,
42561        AMF.Internals.Tables.UML_String_Data_01.MS_01C5'Access);
42562      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3109, (False, AMF.CMOF.Public_Visibility));
42563   end Initialize_3109;
42564
42565   ---------------------
42566   -- Initialize_3110 --
42567   ---------------------
42568
42569   procedure Initialize_3110 is
42570   begin
42571      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42572       (Base + 3110,
42573        AMF.Internals.Tables.UML_String_Data_04.MS_0408'Access);
42574   end Initialize_3110;
42575
42576   ---------------------
42577   -- Initialize_3111 --
42578   ---------------------
42579
42580   procedure Initialize_3111 is
42581   begin
42582      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42583       (Base + 3111,
42584        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
42585      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3111, (Is_Empty => True));
42586   end Initialize_3111;
42587
42588   ---------------------
42589   -- Initialize_3112 --
42590   ---------------------
42591
42592   procedure Initialize_3112 is
42593   begin
42594      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3112, (Is_Empty => True));
42595   end Initialize_3112;
42596
42597   ---------------------
42598   -- Initialize_3113 --
42599   ---------------------
42600
42601   procedure Initialize_3113 is
42602   begin
42603      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3113, AMF.CMOF.Return_Parameter);
42604      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42605       (Base + 3113,
42606        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
42607      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3113, (False, AMF.CMOF.Public_Visibility));
42608   end Initialize_3113;
42609
42610   ---------------------
42611   -- Initialize_3114 --
42612   ---------------------
42613
42614   procedure Initialize_3114 is
42615   begin
42616      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3114, AMF.CMOF.In_Parameter);
42617      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42618       (Base + 3114,
42619        AMF.Internals.Tables.UML_String_Data_00.MS_008C'Access);
42620      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3114, (False, AMF.CMOF.Public_Visibility));
42621   end Initialize_3114;
42622
42623   ---------------------
42624   -- Initialize_3115 --
42625   ---------------------
42626
42627   procedure Initialize_3115 is
42628   begin
42629      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3115, True);
42630      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42631       (Base + 3115,
42632        AMF.Internals.Tables.UML_String_Data_02.MS_0284'Access);
42633      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3115, (False, AMF.CMOF.Public_Visibility));
42634   end Initialize_3115;
42635
42636   ---------------------
42637   -- Initialize_3116 --
42638   ---------------------
42639
42640   procedure Initialize_3116 is
42641   begin
42642      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42643       (Base + 3116,
42644        AMF.Internals.Tables.UML_String_Data_05.MS_055E'Access);
42645   end Initialize_3116;
42646
42647   ---------------------
42648   -- Initialize_3117 --
42649   ---------------------
42650
42651   procedure Initialize_3117 is
42652   begin
42653      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42654       (Base + 3117,
42655        AMF.Internals.Tables.UML_String_Data_0B.MS_0BFB'Access);
42656      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3117, (Is_Empty => True));
42657   end Initialize_3117;
42658
42659   ---------------------
42660   -- Initialize_3118 --
42661   ---------------------
42662
42663   procedure Initialize_3118 is
42664   begin
42665      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3118, (Is_Empty => True));
42666   end Initialize_3118;
42667
42668   ---------------------
42669   -- Initialize_3119 --
42670   ---------------------
42671
42672   procedure Initialize_3119 is
42673   begin
42674      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42675       (Base + 3119,
42676        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
42677      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3119, (Is_Empty => True));
42678   end Initialize_3119;
42679
42680   ---------------------
42681   -- Initialize_3120 --
42682   ---------------------
42683
42684   procedure Initialize_3120 is
42685   begin
42686      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3120, (Is_Empty => True));
42687   end Initialize_3120;
42688
42689   ---------------------
42690   -- Initialize_3121 --
42691   ---------------------
42692
42693   procedure Initialize_3121 is
42694   begin
42695      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3121, AMF.CMOF.Return_Parameter);
42696      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42697       (Base + 3121,
42698        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
42699      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3121, (False, AMF.CMOF.Public_Visibility));
42700   end Initialize_3121;
42701
42702   ---------------------
42703   -- Initialize_3122 --
42704   ---------------------
42705
42706   procedure Initialize_3122 is
42707   begin
42708      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3122, AMF.CMOF.In_Parameter);
42709      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42710       (Base + 3122,
42711        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD1'Access);
42712      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3122, (False, AMF.CMOF.Public_Visibility));
42713   end Initialize_3122;
42714
42715   ---------------------
42716   -- Initialize_3123 --
42717   ---------------------
42718
42719   procedure Initialize_3123 is
42720   begin
42721      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3123, True);
42722      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42723       (Base + 3123,
42724        AMF.Internals.Tables.UML_String_Data_05.MS_0585'Access);
42725      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3123, (False, AMF.CMOF.Public_Visibility));
42726   end Initialize_3123;
42727
42728   ---------------------
42729   -- Initialize_3124 --
42730   ---------------------
42731
42732   procedure Initialize_3124 is
42733   begin
42734      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42735       (Base + 3124,
42736        AMF.Internals.Tables.UML_String_Data_0A.MS_0A13'Access);
42737   end Initialize_3124;
42738
42739   ---------------------
42740   -- Initialize_3125 --
42741   ---------------------
42742
42743   procedure Initialize_3125 is
42744   begin
42745      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42746       (Base + 3125,
42747        AMF.Internals.Tables.UML_String_Data_0B.MS_0BFB'Access);
42748      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3125, (Is_Empty => True));
42749   end Initialize_3125;
42750
42751   ---------------------
42752   -- Initialize_3126 --
42753   ---------------------
42754
42755   procedure Initialize_3126 is
42756   begin
42757      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3126, (Is_Empty => True));
42758   end Initialize_3126;
42759
42760   ---------------------
42761   -- Initialize_3127 --
42762   ---------------------
42763
42764   procedure Initialize_3127 is
42765   begin
42766      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42767       (Base + 3127,
42768        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
42769      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3127, (Is_Empty => True));
42770   end Initialize_3127;
42771
42772   ---------------------
42773   -- Initialize_3128 --
42774   ---------------------
42775
42776   procedure Initialize_3128 is
42777   begin
42778      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3128, (Is_Empty => True));
42779   end Initialize_3128;
42780
42781   ---------------------
42782   -- Initialize_3129 --
42783   ---------------------
42784
42785   procedure Initialize_3129 is
42786   begin
42787      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3129, AMF.CMOF.Return_Parameter);
42788      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42789       (Base + 3129,
42790        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
42791      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3129, (False, AMF.CMOF.Public_Visibility));
42792   end Initialize_3129;
42793
42794   ---------------------
42795   -- Initialize_3130 --
42796   ---------------------
42797
42798   procedure Initialize_3130 is
42799   begin
42800      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3130, AMF.CMOF.In_Parameter);
42801      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42802       (Base + 3130,
42803        AMF.Internals.Tables.UML_String_Data_01.MS_0179'Access);
42804      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3130, (False, AMF.CMOF.Public_Visibility));
42805   end Initialize_3130;
42806
42807   ---------------------
42808   -- Initialize_3131 --
42809   ---------------------
42810
42811   procedure Initialize_3131 is
42812   begin
42813      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3131, True);
42814      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42815       (Base + 3131,
42816        AMF.Internals.Tables.UML_String_Data_01.MS_0159'Access);
42817      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3131, (False, AMF.CMOF.Public_Visibility));
42818   end Initialize_3131;
42819
42820   ---------------------
42821   -- Initialize_3132 --
42822   ---------------------
42823
42824   procedure Initialize_3132 is
42825   begin
42826      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42827       (Base + 3132,
42828        AMF.Internals.Tables.UML_String_Data_07.MS_07B3'Access);
42829   end Initialize_3132;
42830
42831   ---------------------
42832   -- Initialize_3133 --
42833   ---------------------
42834
42835   procedure Initialize_3133 is
42836   begin
42837      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42838       (Base + 3133,
42839        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
42840      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3133, (Is_Empty => True));
42841   end Initialize_3133;
42842
42843   ---------------------
42844   -- Initialize_3134 --
42845   ---------------------
42846
42847   procedure Initialize_3134 is
42848   begin
42849      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3134, (Is_Empty => True));
42850   end Initialize_3134;
42851
42852   ---------------------
42853   -- Initialize_3135 --
42854   ---------------------
42855
42856   procedure Initialize_3135 is
42857   begin
42858      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3135, AMF.CMOF.Return_Parameter);
42859      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42860       (Base + 3135,
42861        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
42862      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3135, (False, AMF.CMOF.Public_Visibility));
42863   end Initialize_3135;
42864
42865   ---------------------
42866   -- Initialize_3136 --
42867   ---------------------
42868
42869   procedure Initialize_3136 is
42870   begin
42871      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3136, AMF.CMOF.In_Parameter);
42872      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42873       (Base + 3136,
42874        AMF.Internals.Tables.UML_String_Data_05.MS_054C'Access);
42875      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3136, (False, AMF.CMOF.Public_Visibility));
42876   end Initialize_3136;
42877
42878   ---------------------
42879   -- Initialize_3137 --
42880   ---------------------
42881
42882   procedure Initialize_3137 is
42883   begin
42884      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3137, AMF.CMOF.In_Parameter);
42885      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42886       (Base + 3137,
42887        AMF.Internals.Tables.UML_String_Data_00.MS_00D6'Access);
42888      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3137, (False, AMF.CMOF.Public_Visibility));
42889   end Initialize_3137;
42890
42891   ---------------------
42892   -- Initialize_3138 --
42893   ---------------------
42894
42895   procedure Initialize_3138 is
42896   begin
42897      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3138, True);
42898      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42899       (Base + 3138,
42900        AMF.Internals.Tables.UML_String_Data_08.MS_081D'Access);
42901      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3138, (False, AMF.CMOF.Public_Visibility));
42902   end Initialize_3138;
42903
42904   ---------------------
42905   -- Initialize_3139 --
42906   ---------------------
42907
42908   procedure Initialize_3139 is
42909   begin
42910      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42911       (Base + 3139,
42912        AMF.Internals.Tables.UML_String_Data_09.MS_0926'Access);
42913   end Initialize_3139;
42914
42915   ---------------------
42916   -- Initialize_3140 --
42917   ---------------------
42918
42919   procedure Initialize_3140 is
42920   begin
42921      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42922       (Base + 3140,
42923        AMF.Internals.Tables.UML_String_Data_0B.MS_0BFB'Access);
42924      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3140, (Is_Empty => True));
42925   end Initialize_3140;
42926
42927   ---------------------
42928   -- Initialize_3141 --
42929   ---------------------
42930
42931   procedure Initialize_3141 is
42932   begin
42933      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3141, (Is_Empty => True));
42934   end Initialize_3141;
42935
42936   ---------------------
42937   -- Initialize_3142 --
42938   ---------------------
42939
42940   procedure Initialize_3142 is
42941   begin
42942      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42943       (Base + 3142,
42944        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
42945      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3142, (Is_Empty => True));
42946   end Initialize_3142;
42947
42948   ---------------------
42949   -- Initialize_3143 --
42950   ---------------------
42951
42952   procedure Initialize_3143 is
42953   begin
42954      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3143, (Is_Empty => True));
42955   end Initialize_3143;
42956
42957   ---------------------
42958   -- Initialize_3144 --
42959   ---------------------
42960
42961   procedure Initialize_3144 is
42962   begin
42963      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3144, AMF.CMOF.Return_Parameter);
42964      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42965       (Base + 3144,
42966        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
42967      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3144, (False, AMF.CMOF.Public_Visibility));
42968   end Initialize_3144;
42969
42970   ---------------------
42971   -- Initialize_3145 --
42972   ---------------------
42973
42974   procedure Initialize_3145 is
42975   begin
42976      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3145, True);
42977      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
42978       (Base + 3145,
42979        AMF.Internals.Tables.UML_String_Data_04.MS_04AC'Access);
42980      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3145, (False, AMF.CMOF.Public_Visibility));
42981   end Initialize_3145;
42982
42983   ---------------------
42984   -- Initialize_3146 --
42985   ---------------------
42986
42987   procedure Initialize_3146 is
42988   begin
42989      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
42990       (Base + 3146,
42991        AMF.Internals.Tables.UML_String_Data_01.MS_01D3'Access);
42992   end Initialize_3146;
42993
42994   ---------------------
42995   -- Initialize_3147 --
42996   ---------------------
42997
42998   procedure Initialize_3147 is
42999   begin
43000      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43001       (Base + 3147,
43002        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
43003      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3147, (Is_Empty => True));
43004   end Initialize_3147;
43005
43006   ---------------------
43007   -- Initialize_3148 --
43008   ---------------------
43009
43010   procedure Initialize_3148 is
43011   begin
43012      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3148, (Is_Empty => True));
43013   end Initialize_3148;
43014
43015   ---------------------
43016   -- Initialize_3149 --
43017   ---------------------
43018
43019   procedure Initialize_3149 is
43020   begin
43021      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3149, AMF.CMOF.Return_Parameter);
43022      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 3149, (False, 0));
43023      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43024       (Base + 3149,
43025        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
43026      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3149, (False, AMF.CMOF.Public_Visibility));
43027   end Initialize_3149;
43028
43029   ---------------------
43030   -- Initialize_3150 --
43031   ---------------------
43032
43033   procedure Initialize_3150 is
43034   begin
43035      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3150, True);
43036      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43037       (Base + 3150,
43038        AMF.Internals.Tables.UML_String_Data_07.MS_0730'Access);
43039      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3150, (False, AMF.CMOF.Public_Visibility));
43040   end Initialize_3150;
43041
43042   ---------------------
43043   -- Initialize_3151 --
43044   ---------------------
43045
43046   procedure Initialize_3151 is
43047   begin
43048      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
43049       (Base + 3151,
43050        AMF.Internals.Tables.UML_String_Data_05.MS_0560'Access);
43051   end Initialize_3151;
43052
43053   ---------------------
43054   -- Initialize_3152 --
43055   ---------------------
43056
43057   procedure Initialize_3152 is
43058   begin
43059      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43060       (Base + 3152,
43061        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
43062      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3152, (Is_Empty => True));
43063   end Initialize_3152;
43064
43065   ---------------------
43066   -- Initialize_3153 --
43067   ---------------------
43068
43069   procedure Initialize_3153 is
43070   begin
43071      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3153, (Is_Empty => True));
43072   end Initialize_3153;
43073
43074   ---------------------
43075   -- Initialize_3154 --
43076   ---------------------
43077
43078   procedure Initialize_3154 is
43079   begin
43080      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3154, AMF.CMOF.Return_Parameter);
43081      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 3154, (False, 0));
43082      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43083       (Base + 3154,
43084        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
43085      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3154, (False, AMF.CMOF.Public_Visibility));
43086   end Initialize_3154;
43087
43088   ---------------------
43089   -- Initialize_3155 --
43090   ---------------------
43091
43092   procedure Initialize_3155 is
43093   begin
43094      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3155, True);
43095      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43096       (Base + 3155,
43097        AMF.Internals.Tables.UML_String_Data_06.MS_06C8'Access);
43098      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3155, (False, AMF.CMOF.Public_Visibility));
43099   end Initialize_3155;
43100
43101   ---------------------
43102   -- Initialize_3156 --
43103   ---------------------
43104
43105   procedure Initialize_3156 is
43106   begin
43107      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
43108       (Base + 3156,
43109        AMF.Internals.Tables.UML_String_Data_07.MS_07A9'Access);
43110   end Initialize_3156;
43111
43112   ---------------------
43113   -- Initialize_3157 --
43114   ---------------------
43115
43116   procedure Initialize_3157 is
43117   begin
43118      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43119       (Base + 3157,
43120        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
43121      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3157, (Is_Empty => True));
43122   end Initialize_3157;
43123
43124   ---------------------
43125   -- Initialize_3158 --
43126   ---------------------
43127
43128   procedure Initialize_3158 is
43129   begin
43130      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3158, (Is_Empty => True));
43131   end Initialize_3158;
43132
43133   ---------------------
43134   -- Initialize_3159 --
43135   ---------------------
43136
43137   procedure Initialize_3159 is
43138   begin
43139      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3159, AMF.CMOF.Return_Parameter);
43140      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 3159, (False, 0));
43141      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43142       (Base + 3159,
43143        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
43144      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3159, (False, AMF.CMOF.Public_Visibility));
43145   end Initialize_3159;
43146
43147   ---------------------
43148   -- Initialize_3160 --
43149   ---------------------
43150
43151   procedure Initialize_3160 is
43152   begin
43153      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3160, True);
43154      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43155       (Base + 3160,
43156        AMF.Internals.Tables.UML_String_Data_04.MS_044E'Access);
43157      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3160, (False, AMF.CMOF.Public_Visibility));
43158   end Initialize_3160;
43159
43160   ---------------------
43161   -- Initialize_3161 --
43162   ---------------------
43163
43164   procedure Initialize_3161 is
43165   begin
43166      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
43167       (Base + 3161,
43168        AMF.Internals.Tables.UML_String_Data_02.MS_0278'Access);
43169   end Initialize_3161;
43170
43171   ---------------------
43172   -- Initialize_3162 --
43173   ---------------------
43174
43175   procedure Initialize_3162 is
43176   begin
43177      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43178       (Base + 3162,
43179        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
43180      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3162, (Is_Empty => True));
43181   end Initialize_3162;
43182
43183   ---------------------
43184   -- Initialize_3163 --
43185   ---------------------
43186
43187   procedure Initialize_3163 is
43188   begin
43189      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3163, (Is_Empty => True));
43190   end Initialize_3163;
43191
43192   ---------------------
43193   -- Initialize_3164 --
43194   ---------------------
43195
43196   procedure Initialize_3164 is
43197   begin
43198      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3164, AMF.CMOF.Return_Parameter);
43199      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 3164, (False, 0));
43200      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43201       (Base + 3164,
43202        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
43203      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3164, (False, AMF.CMOF.Public_Visibility));
43204   end Initialize_3164;
43205
43206   ---------------------
43207   -- Initialize_3165 --
43208   ---------------------
43209
43210   procedure Initialize_3165 is
43211   begin
43212      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
43213       (Base + 3165,
43214        AMF.Internals.Tables.UML_String_Data_00.MS_000E'Access);
43215   end Initialize_3165;
43216
43217   ---------------------
43218   -- Initialize_3166 --
43219   ---------------------
43220
43221   procedure Initialize_3166 is
43222   begin
43223      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
43224       (Base + 3166,
43225        AMF.Internals.Tables.UML_String_Data_0A.MS_0A78'Access);
43226   end Initialize_3166;
43227
43228   ---------------------
43229   -- Initialize_3167 --
43230   ---------------------
43231
43232   procedure Initialize_3167 is
43233   begin
43234      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43235       (Base + 3167,
43236        AMF.Internals.Tables.UML_String_Data_06.MS_069A'Access);
43237      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3167, (Is_Empty => True));
43238   end Initialize_3167;
43239
43240   ---------------------
43241   -- Initialize_3168 --
43242   ---------------------
43243
43244   procedure Initialize_3168 is
43245   begin
43246      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
43247       (Base + 3168,
43248        AMF.Internals.Tables.UML_String_Data_00.MS_00A7'Access);
43249   end Initialize_3168;
43250
43251   ---------------------
43252   -- Initialize_3169 --
43253   ---------------------
43254
43255   procedure Initialize_3169 is
43256   begin
43257      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3169, (Is_Empty => True));
43258   end Initialize_3169;
43259
43260   ---------------------
43261   -- Initialize_3170 --
43262   ---------------------
43263
43264   procedure Initialize_3170 is
43265   begin
43266      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43267       (Base + 3170,
43268        AMF.Internals.Tables.UML_String_Data_02.MS_022F'Access);
43269      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3170, (Is_Empty => True));
43270   end Initialize_3170;
43271
43272   ---------------------
43273   -- Initialize_3171 --
43274   ---------------------
43275
43276   procedure Initialize_3171 is
43277   begin
43278      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
43279       (Base + 3171,
43280        AMF.Internals.Tables.UML_String_Data_01.MS_010D'Access);
43281   end Initialize_3171;
43282
43283   ---------------------
43284   -- Initialize_3172 --
43285   ---------------------
43286
43287   procedure Initialize_3172 is
43288   begin
43289      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3172, (Is_Empty => True));
43290   end Initialize_3172;
43291
43292   ---------------------
43293   -- Initialize_3173 --
43294   ---------------------
43295
43296   procedure Initialize_3173 is
43297   begin
43298      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43299       (Base + 3173,
43300        AMF.Internals.Tables.UML_String_Data_02.MS_02E0'Access);
43301      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3173, (Is_Empty => True));
43302   end Initialize_3173;
43303
43304   ---------------------
43305   -- Initialize_3174 --
43306   ---------------------
43307
43308   procedure Initialize_3174 is
43309   begin
43310      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
43311       (Base + 3174,
43312        AMF.Internals.Tables.UML_String_Data_02.MS_0240'Access);
43313   end Initialize_3174;
43314
43315   ---------------------
43316   -- Initialize_3175 --
43317   ---------------------
43318
43319   procedure Initialize_3175 is
43320   begin
43321      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3175, (Is_Empty => True));
43322   end Initialize_3175;
43323
43324   ---------------------
43325   -- Initialize_3176 --
43326   ---------------------
43327
43328   procedure Initialize_3176 is
43329   begin
43330      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
43331       (Base + 3176,
43332        AMF.Internals.Tables.UML_String_Data_03.MS_034D'Access);
43333   end Initialize_3176;
43334
43335   ---------------------
43336   -- Initialize_3177 --
43337   ---------------------
43338
43339   procedure Initialize_3177 is
43340   begin
43341      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
43342       (Base + 3177,
43343        AMF.Internals.Tables.UML_String_Data_03.MS_030E'Access);
43344   end Initialize_3177;
43345
43346   ---------------------
43347   -- Initialize_3178 --
43348   ---------------------
43349
43350   procedure Initialize_3178 is
43351   begin
43352      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
43353       (Base + 3178,
43354        AMF.Internals.Tables.UML_String_Data_04.MS_044A'Access);
43355   end Initialize_3178;
43356
43357   ---------------------
43358   -- Initialize_3179 --
43359   ---------------------
43360
43361   procedure Initialize_3179 is
43362   begin
43363      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
43364       (Base + 3179,
43365        AMF.Internals.Tables.UML_String_Data_02.MS_0272'Access);
43366   end Initialize_3179;
43367
43368   ---------------------
43369   -- Initialize_3180 --
43370   ---------------------
43371
43372   procedure Initialize_3180 is
43373   begin
43374      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
43375       (Base + 3180,
43376        AMF.Internals.Tables.UML_String_Data_09.MS_09B6'Access);
43377   end Initialize_3180;
43378
43379   ---------------------
43380   -- Initialize_3181 --
43381   ---------------------
43382
43383   procedure Initialize_3181 is
43384   begin
43385      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
43386       (Base + 3181,
43387        AMF.Internals.Tables.UML_String_Data_05.MS_05E1'Access);
43388   end Initialize_3181;
43389
43390   ---------------------
43391   -- Initialize_3182 --
43392   ---------------------
43393
43394   procedure Initialize_3182 is
43395   begin
43396      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3182, True);
43397      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43398       (Base + 3182,
43399        AMF.Internals.Tables.UML_String_Data_0A.MS_0AAA'Access);
43400      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3182, (False, AMF.CMOF.Public_Visibility));
43401   end Initialize_3182;
43402
43403   ---------------------
43404   -- Initialize_3183 --
43405   ---------------------
43406
43407   procedure Initialize_3183 is
43408   begin
43409      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
43410       (Base + 3183,
43411        AMF.Internals.Tables.UML_String_Data_01.MS_01C8'Access);
43412   end Initialize_3183;
43413
43414   ---------------------
43415   -- Initialize_3184 --
43416   ---------------------
43417
43418   procedure Initialize_3184 is
43419   begin
43420      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43421       (Base + 3184,
43422        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
43423      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3184, (Is_Empty => True));
43424   end Initialize_3184;
43425
43426   ---------------------
43427   -- Initialize_3185 --
43428   ---------------------
43429
43430   procedure Initialize_3185 is
43431   begin
43432      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3185, (Is_Empty => True));
43433   end Initialize_3185;
43434
43435   ---------------------
43436   -- Initialize_3186 --
43437   ---------------------
43438
43439   procedure Initialize_3186 is
43440   begin
43441      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3186, AMF.CMOF.Return_Parameter);
43442      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Ordered (Base + 3186, True);
43443      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 3186, (False, 0));
43444      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43445       (Base + 3186,
43446        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
43447      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 3186, (False, (Unlimited => True)));
43448      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3186, (False, AMF.CMOF.Public_Visibility));
43449   end Initialize_3186;
43450
43451   ---------------------
43452   -- Initialize_3187 --
43453   ---------------------
43454
43455   procedure Initialize_3187 is
43456   begin
43457      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3187, True);
43458      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43459       (Base + 3187,
43460        AMF.Internals.Tables.UML_String_Data_06.MS_0655'Access);
43461      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3187, (False, AMF.CMOF.Public_Visibility));
43462   end Initialize_3187;
43463
43464   ---------------------
43465   -- Initialize_3188 --
43466   ---------------------
43467
43468   procedure Initialize_3188 is
43469   begin
43470      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
43471       (Base + 3188,
43472        AMF.Internals.Tables.UML_String_Data_04.MS_04AE'Access);
43473   end Initialize_3188;
43474
43475   ---------------------
43476   -- Initialize_3189 --
43477   ---------------------
43478
43479   procedure Initialize_3189 is
43480   begin
43481      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43482       (Base + 3189,
43483        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
43484      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3189, (Is_Empty => True));
43485   end Initialize_3189;
43486
43487   ---------------------
43488   -- Initialize_3190 --
43489   ---------------------
43490
43491   procedure Initialize_3190 is
43492   begin
43493      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3190, (Is_Empty => True));
43494   end Initialize_3190;
43495
43496   ---------------------
43497   -- Initialize_3191 --
43498   ---------------------
43499
43500   procedure Initialize_3191 is
43501   begin
43502      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3191, AMF.CMOF.Return_Parameter);
43503      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 3191, (False, 0));
43504      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43505       (Base + 3191,
43506        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
43507      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 3191, (False, (Unlimited => True)));
43508      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3191, (False, AMF.CMOF.Public_Visibility));
43509   end Initialize_3191;
43510
43511   ---------------------
43512   -- Initialize_3192 --
43513   ---------------------
43514
43515   procedure Initialize_3192 is
43516   begin
43517      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3192, True);
43518      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43519       (Base + 3192,
43520        AMF.Internals.Tables.UML_String_Data_04.MS_0400'Access);
43521      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3192, (False, AMF.CMOF.Public_Visibility));
43522   end Initialize_3192;
43523
43524   ---------------------
43525   -- Initialize_3193 --
43526   ---------------------
43527
43528   procedure Initialize_3193 is
43529   begin
43530      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
43531       (Base + 3193,
43532        AMF.Internals.Tables.UML_String_Data_0C.MS_0C8E'Access);
43533   end Initialize_3193;
43534
43535   ---------------------
43536   -- Initialize_3194 --
43537   ---------------------
43538
43539   procedure Initialize_3194 is
43540   begin
43541      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43542       (Base + 3194,
43543        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
43544      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3194, (Is_Empty => True));
43545   end Initialize_3194;
43546
43547   ---------------------
43548   -- Initialize_3195 --
43549   ---------------------
43550
43551   procedure Initialize_3195 is
43552   begin
43553      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3195, (Is_Empty => True));
43554   end Initialize_3195;
43555
43556   ---------------------
43557   -- Initialize_3196 --
43558   ---------------------
43559
43560   procedure Initialize_3196 is
43561   begin
43562      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3196, AMF.CMOF.Return_Parameter);
43563      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43564       (Base + 3196,
43565        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
43566      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3196, (False, AMF.CMOF.Public_Visibility));
43567   end Initialize_3196;
43568
43569   ---------------------
43570   -- Initialize_3197 --
43571   ---------------------
43572
43573   procedure Initialize_3197 is
43574   begin
43575      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3197, AMF.CMOF.In_Parameter);
43576      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43577       (Base + 3197,
43578        AMF.Internals.Tables.UML_String_Data_0B.MS_0BA8'Access);
43579      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3197, (False, AMF.CMOF.Public_Visibility));
43580   end Initialize_3197;
43581
43582   ---------------------
43583   -- Initialize_3198 --
43584   ---------------------
43585
43586   procedure Initialize_3198 is
43587   begin
43588      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3198, AMF.CMOF.In_Parameter);
43589      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43590       (Base + 3198,
43591        AMF.Internals.Tables.UML_String_Data_02.MS_0242'Access);
43592      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3198, (False, AMF.CMOF.Public_Visibility));
43593   end Initialize_3198;
43594
43595   ---------------------
43596   -- Initialize_3199 --
43597   ---------------------
43598
43599   procedure Initialize_3199 is
43600   begin
43601      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3199, True);
43602      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43603       (Base + 3199,
43604        AMF.Internals.Tables.UML_String_Data_05.MS_05FF'Access);
43605      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3199, (False, AMF.CMOF.Public_Visibility));
43606   end Initialize_3199;
43607
43608   ---------------------
43609   -- Initialize_3200 --
43610   ---------------------
43611
43612   procedure Initialize_3200 is
43613   begin
43614      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
43615       (Base + 3200,
43616        AMF.Internals.Tables.UML_String_Data_08.MS_0845'Access);
43617   end Initialize_3200;
43618
43619   ---------------------
43620   -- Initialize_3201 --
43621   ---------------------
43622
43623   procedure Initialize_3201 is
43624   begin
43625      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43626       (Base + 3201,
43627        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
43628      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3201, (Is_Empty => True));
43629   end Initialize_3201;
43630
43631   ---------------------
43632   -- Initialize_3202 --
43633   ---------------------
43634
43635   procedure Initialize_3202 is
43636   begin
43637      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3202, (Is_Empty => True));
43638   end Initialize_3202;
43639
43640   ---------------------
43641   -- Initialize_3203 --
43642   ---------------------
43643
43644   procedure Initialize_3203 is
43645   begin
43646      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3203, AMF.CMOF.Return_Parameter);
43647      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 3203, (False, 0));
43648      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43649       (Base + 3203,
43650        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
43651      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3203, (False, AMF.CMOF.Public_Visibility));
43652   end Initialize_3203;
43653
43654   ---------------------
43655   -- Initialize_3204 --
43656   ---------------------
43657
43658   procedure Initialize_3204 is
43659   begin
43660      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3204, True);
43661      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43662       (Base + 3204,
43663        AMF.Internals.Tables.UML_String_Data_01.MS_011F'Access);
43664      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3204, (False, AMF.CMOF.Public_Visibility));
43665   end Initialize_3204;
43666
43667   ---------------------
43668   -- Initialize_3205 --
43669   ---------------------
43670
43671   procedure Initialize_3205 is
43672   begin
43673      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
43674       (Base + 3205,
43675        AMF.Internals.Tables.UML_String_Data_01.MS_010D'Access);
43676   end Initialize_3205;
43677
43678   ---------------------
43679   -- Initialize_3206 --
43680   ---------------------
43681
43682   procedure Initialize_3206 is
43683   begin
43684      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43685       (Base + 3206,
43686        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
43687      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3206, (Is_Empty => True));
43688   end Initialize_3206;
43689
43690   ---------------------
43691   -- Initialize_3207 --
43692   ---------------------
43693
43694   procedure Initialize_3207 is
43695   begin
43696      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3207, (Is_Empty => True));
43697   end Initialize_3207;
43698
43699   ---------------------
43700   -- Initialize_3208 --
43701   ---------------------
43702
43703   procedure Initialize_3208 is
43704   begin
43705      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3208, AMF.CMOF.Return_Parameter);
43706      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43707       (Base + 3208,
43708        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
43709      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3208, (False, AMF.CMOF.Public_Visibility));
43710   end Initialize_3208;
43711
43712   ---------------------
43713   -- Initialize_3209 --
43714   ---------------------
43715
43716   procedure Initialize_3209 is
43717   begin
43718      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3209, True);
43719      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43720       (Base + 3209,
43721        AMF.Internals.Tables.UML_String_Data_05.MS_053F'Access);
43722      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3209, (False, AMF.CMOF.Public_Visibility));
43723   end Initialize_3209;
43724
43725   ---------------------
43726   -- Initialize_3210 --
43727   ---------------------
43728
43729   procedure Initialize_3210 is
43730   begin
43731      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
43732       (Base + 3210,
43733        AMF.Internals.Tables.UML_String_Data_09.MS_09B4'Access);
43734   end Initialize_3210;
43735
43736   ---------------------
43737   -- Initialize_3211 --
43738   ---------------------
43739
43740   procedure Initialize_3211 is
43741   begin
43742      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43743       (Base + 3211,
43744        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
43745      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3211, (Is_Empty => True));
43746   end Initialize_3211;
43747
43748   ---------------------
43749   -- Initialize_3212 --
43750   ---------------------
43751
43752   procedure Initialize_3212 is
43753   begin
43754      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3212, (Is_Empty => True));
43755   end Initialize_3212;
43756
43757   ---------------------
43758   -- Initialize_3213 --
43759   ---------------------
43760
43761   procedure Initialize_3213 is
43762   begin
43763      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3213, AMF.CMOF.Return_Parameter);
43764      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43765       (Base + 3213,
43766        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
43767      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3213, (False, AMF.CMOF.Public_Visibility));
43768   end Initialize_3213;
43769
43770   ---------------------
43771   -- Initialize_3214 --
43772   ---------------------
43773
43774   procedure Initialize_3214 is
43775   begin
43776      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
43777       (Base + 3214,
43778        AMF.Internals.Tables.UML_String_Data_00.MS_005E'Access);
43779   end Initialize_3214;
43780
43781   ---------------------
43782   -- Initialize_3215 --
43783   ---------------------
43784
43785   procedure Initialize_3215 is
43786   begin
43787      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43788       (Base + 3215,
43789        AMF.Internals.Tables.UML_String_Data_02.MS_0219'Access);
43790      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3215, (Is_Empty => True));
43791   end Initialize_3215;
43792
43793   ---------------------
43794   -- Initialize_3216 --
43795   ---------------------
43796
43797   procedure Initialize_3216 is
43798   begin
43799      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
43800       (Base + 3216,
43801        AMF.Internals.Tables.UML_String_Data_07.MS_07C2'Access);
43802   end Initialize_3216;
43803
43804   ---------------------
43805   -- Initialize_3217 --
43806   ---------------------
43807
43808   procedure Initialize_3217 is
43809   begin
43810      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3217, (Is_Empty => True));
43811   end Initialize_3217;
43812
43813   ---------------------
43814   -- Initialize_3218 --
43815   ---------------------
43816
43817   procedure Initialize_3218 is
43818   begin
43819      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
43820       (Base + 3218,
43821        AMF.Internals.Tables.UML_String_Data_0B.MS_0B79'Access);
43822   end Initialize_3218;
43823
43824   ---------------------
43825   -- Initialize_3219 --
43826   ---------------------
43827
43828   procedure Initialize_3219 is
43829   begin
43830      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
43831       (Base + 3219,
43832        AMF.Internals.Tables.UML_String_Data_06.MS_060A'Access);
43833   end Initialize_3219;
43834
43835   ---------------------
43836   -- Initialize_3220 --
43837   ---------------------
43838
43839   procedure Initialize_3220 is
43840   begin
43841      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
43842       (Base + 3220,
43843        AMF.Internals.Tables.UML_String_Data_0A.MS_0A36'Access);
43844   end Initialize_3220;
43845
43846   ---------------------
43847   -- Initialize_3221 --
43848   ---------------------
43849
43850   procedure Initialize_3221 is
43851   begin
43852      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
43853       (Base + 3221,
43854        AMF.Internals.Tables.UML_String_Data_05.MS_05F8'Access);
43855   end Initialize_3221;
43856
43857   ---------------------
43858   -- Initialize_3222 --
43859   ---------------------
43860
43861   procedure Initialize_3222 is
43862   begin
43863      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
43864       (Base + 3222,
43865        AMF.Internals.Tables.UML_String_Data_07.MS_0792'Access);
43866   end Initialize_3222;
43867
43868   ---------------------
43869   -- Initialize_3223 --
43870   ---------------------
43871
43872   procedure Initialize_3223 is
43873   begin
43874      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
43875       (Base + 3223,
43876        AMF.Internals.Tables.UML_String_Data_06.MS_068F'Access);
43877   end Initialize_3223;
43878
43879   ---------------------
43880   -- Initialize_3224 --
43881   ---------------------
43882
43883   procedure Initialize_3224 is
43884   begin
43885      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3224, True);
43886      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43887       (Base + 3224,
43888        AMF.Internals.Tables.UML_String_Data_08.MS_08C7'Access);
43889      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3224, (False, AMF.CMOF.Public_Visibility));
43890   end Initialize_3224;
43891
43892   ---------------------
43893   -- Initialize_3225 --
43894   ---------------------
43895
43896   procedure Initialize_3225 is
43897   begin
43898      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
43899       (Base + 3225,
43900        AMF.Internals.Tables.UML_String_Data_0B.MS_0B38'Access);
43901   end Initialize_3225;
43902
43903   ---------------------
43904   -- Initialize_3226 --
43905   ---------------------
43906
43907   procedure Initialize_3226 is
43908   begin
43909      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43910       (Base + 3226,
43911        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
43912      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3226, (Is_Empty => True));
43913   end Initialize_3226;
43914
43915   ---------------------
43916   -- Initialize_3227 --
43917   ---------------------
43918
43919   procedure Initialize_3227 is
43920   begin
43921      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3227, (Is_Empty => True));
43922   end Initialize_3227;
43923
43924   ---------------------
43925   -- Initialize_3228 --
43926   ---------------------
43927
43928   procedure Initialize_3228 is
43929   begin
43930      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3228, AMF.CMOF.Return_Parameter);
43931      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 3228, (False, 0));
43932      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43933       (Base + 3228,
43934        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
43935      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 3228, (False, (Unlimited => True)));
43936      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3228, (False, AMF.CMOF.Public_Visibility));
43937   end Initialize_3228;
43938
43939   ---------------------
43940   -- Initialize_3229 --
43941   ---------------------
43942
43943   procedure Initialize_3229 is
43944   begin
43945      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3229, AMF.CMOF.In_Parameter);
43946      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 3229, (False, 0));
43947      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43948       (Base + 3229,
43949        AMF.Internals.Tables.UML_String_Data_0A.MS_0A99'Access);
43950      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 3229, (False, (Unlimited => True)));
43951      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3229, (False, AMF.CMOF.Public_Visibility));
43952   end Initialize_3229;
43953
43954   ---------------------
43955   -- Initialize_3230 --
43956   ---------------------
43957
43958   procedure Initialize_3230 is
43959   begin
43960      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3230, True);
43961      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43962       (Base + 3230,
43963        AMF.Internals.Tables.UML_String_Data_01.MS_0114'Access);
43964      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3230, (False, AMF.CMOF.Public_Visibility));
43965   end Initialize_3230;
43966
43967   ---------------------
43968   -- Initialize_3231 --
43969   ---------------------
43970
43971   procedure Initialize_3231 is
43972   begin
43973      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
43974       (Base + 3231,
43975        AMF.Internals.Tables.UML_String_Data_05.MS_05C5'Access);
43976   end Initialize_3231;
43977
43978   ---------------------
43979   -- Initialize_3232 --
43980   ---------------------
43981
43982   procedure Initialize_3232 is
43983   begin
43984      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
43985       (Base + 3232,
43986        AMF.Internals.Tables.UML_String_Data_01.MS_01C0'Access);
43987   end Initialize_3232;
43988
43989   ---------------------
43990   -- Initialize_3233 --
43991   ---------------------
43992
43993   procedure Initialize_3233 is
43994   begin
43995      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
43996       (Base + 3233,
43997        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
43998      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3233, (Is_Empty => True));
43999   end Initialize_3233;
44000
44001   ---------------------
44002   -- Initialize_3234 --
44003   ---------------------
44004
44005   procedure Initialize_3234 is
44006   begin
44007      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3234, (Is_Empty => True));
44008   end Initialize_3234;
44009
44010   ---------------------
44011   -- Initialize_3235 --
44012   ---------------------
44013
44014   procedure Initialize_3235 is
44015   begin
44016      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3235, AMF.CMOF.Return_Parameter);
44017      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 3235, (False, 0));
44018      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
44019       (Base + 3235,
44020        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
44021      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 3235, (False, (Unlimited => True)));
44022      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3235, (False, AMF.CMOF.Public_Visibility));
44023   end Initialize_3235;
44024
44025   ---------------------
44026   -- Initialize_3236 --
44027   ---------------------
44028
44029   procedure Initialize_3236 is
44030   begin
44031      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3236, AMF.CMOF.In_Parameter);
44032      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
44033       (Base + 3236,
44034        AMF.Internals.Tables.UML_String_Data_08.MS_08C1'Access);
44035      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3236, (False, AMF.CMOF.Public_Visibility));
44036   end Initialize_3236;
44037
44038   ---------------------
44039   -- Initialize_3237 --
44040   ---------------------
44041
44042   procedure Initialize_3237 is
44043   begin
44044      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3237, True);
44045      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
44046       (Base + 3237,
44047        AMF.Internals.Tables.UML_String_Data_07.MS_0799'Access);
44048      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3237, (False, AMF.CMOF.Public_Visibility));
44049   end Initialize_3237;
44050
44051   ---------------------
44052   -- Initialize_3238 --
44053   ---------------------
44054
44055   procedure Initialize_3238 is
44056   begin
44057      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44058       (Base + 3238,
44059        AMF.Internals.Tables.UML_String_Data_09.MS_094E'Access);
44060   end Initialize_3238;
44061
44062   ---------------------
44063   -- Initialize_3239 --
44064   ---------------------
44065
44066   procedure Initialize_3239 is
44067   begin
44068      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
44069       (Base + 3239,
44070        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
44071      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3239, (Is_Empty => True));
44072   end Initialize_3239;
44073
44074   ---------------------
44075   -- Initialize_3240 --
44076   ---------------------
44077
44078   procedure Initialize_3240 is
44079   begin
44080      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3240, (Is_Empty => True));
44081   end Initialize_3240;
44082
44083   ---------------------
44084   -- Initialize_3241 --
44085   ---------------------
44086
44087   procedure Initialize_3241 is
44088   begin
44089      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3241, AMF.CMOF.Return_Parameter);
44090      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 3241, (False, 0));
44091      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
44092       (Base + 3241,
44093        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
44094      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 3241, (False, (Unlimited => True)));
44095      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3241, (False, AMF.CMOF.Public_Visibility));
44096   end Initialize_3241;
44097
44098   ---------------------
44099   -- Initialize_3242 --
44100   ---------------------
44101
44102   procedure Initialize_3242 is
44103   begin
44104      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3242, AMF.CMOF.In_Parameter);
44105      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 3242, (False, 0));
44106      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
44107       (Base + 3242,
44108        AMF.Internals.Tables.UML_String_Data_0A.MS_0A99'Access);
44109      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 3242, (False, (Unlimited => True)));
44110      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3242, (False, AMF.CMOF.Public_Visibility));
44111   end Initialize_3242;
44112
44113   ---------------------
44114   -- Initialize_3243 --
44115   ---------------------
44116
44117   procedure Initialize_3243 is
44118   begin
44119      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3243, True);
44120      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
44121       (Base + 3243,
44122        AMF.Internals.Tables.UML_String_Data_04.MS_045D'Access);
44123      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3243, (False, AMF.CMOF.Public_Visibility));
44124   end Initialize_3243;
44125
44126   ---------------------
44127   -- Initialize_3244 --
44128   ---------------------
44129
44130   procedure Initialize_3244 is
44131   begin
44132      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44133       (Base + 3244,
44134        AMF.Internals.Tables.UML_String_Data_0B.MS_0BEF'Access);
44135   end Initialize_3244;
44136
44137   ---------------------
44138   -- Initialize_3245 --
44139   ---------------------
44140
44141   procedure Initialize_3245 is
44142   begin
44143      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
44144       (Base + 3245,
44145        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
44146      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3245, (Is_Empty => True));
44147   end Initialize_3245;
44148
44149   ---------------------
44150   -- Initialize_3246 --
44151   ---------------------
44152
44153   procedure Initialize_3246 is
44154   begin
44155      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3246, (Is_Empty => True));
44156   end Initialize_3246;
44157
44158   ---------------------
44159   -- Initialize_3247 --
44160   ---------------------
44161
44162   procedure Initialize_3247 is
44163   begin
44164      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3247, AMF.CMOF.Return_Parameter);
44165      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 3247, (False, 0));
44166      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
44167       (Base + 3247,
44168        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
44169      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 3247, (False, (Unlimited => True)));
44170      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3247, (False, AMF.CMOF.Public_Visibility));
44171   end Initialize_3247;
44172
44173   ---------------------
44174   -- Initialize_3248 --
44175   ---------------------
44176
44177   procedure Initialize_3248 is
44178   begin
44179      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3248, True);
44180      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
44181       (Base + 3248,
44182        AMF.Internals.Tables.UML_String_Data_0C.MS_0C5A'Access);
44183      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3248, (False, AMF.CMOF.Public_Visibility));
44184   end Initialize_3248;
44185
44186   ---------------------
44187   -- Initialize_3249 --
44188   ---------------------
44189
44190   procedure Initialize_3249 is
44191   begin
44192      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44193       (Base + 3249,
44194        AMF.Internals.Tables.UML_String_Data_0C.MS_0C56'Access);
44195   end Initialize_3249;
44196
44197   ---------------------
44198   -- Initialize_3250 --
44199   ---------------------
44200
44201   procedure Initialize_3250 is
44202   begin
44203      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
44204       (Base + 3250,
44205        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
44206      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3250, (Is_Empty => True));
44207   end Initialize_3250;
44208
44209   ---------------------
44210   -- Initialize_3251 --
44211   ---------------------
44212
44213   procedure Initialize_3251 is
44214   begin
44215      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3251, (Is_Empty => True));
44216   end Initialize_3251;
44217
44218   ---------------------
44219   -- Initialize_3252 --
44220   ---------------------
44221
44222   procedure Initialize_3252 is
44223   begin
44224      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3252, AMF.CMOF.Return_Parameter);
44225      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
44226       (Base + 3252,
44227        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
44228      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3252, (False, AMF.CMOF.Public_Visibility));
44229   end Initialize_3252;
44230
44231   ---------------------
44232   -- Initialize_3253 --
44233   ---------------------
44234
44235   procedure Initialize_3253 is
44236   begin
44237      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3253, True);
44238      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
44239       (Base + 3253,
44240        AMF.Internals.Tables.UML_String_Data_05.MS_0505'Access);
44241      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3253, (False, AMF.CMOF.Public_Visibility));
44242   end Initialize_3253;
44243
44244   ---------------------
44245   -- Initialize_3254 --
44246   ---------------------
44247
44248   procedure Initialize_3254 is
44249   begin
44250      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44251       (Base + 3254,
44252        AMF.Internals.Tables.UML_String_Data_02.MS_0287'Access);
44253   end Initialize_3254;
44254
44255   ---------------------
44256   -- Initialize_3255 --
44257   ---------------------
44258
44259   procedure Initialize_3255 is
44260   begin
44261      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
44262       (Base + 3255,
44263        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
44264      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3255, (Is_Empty => True));
44265   end Initialize_3255;
44266
44267   ---------------------
44268   -- Initialize_3256 --
44269   ---------------------
44270
44271   procedure Initialize_3256 is
44272   begin
44273      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3256, (Is_Empty => True));
44274   end Initialize_3256;
44275
44276   ---------------------
44277   -- Initialize_3257 --
44278   ---------------------
44279
44280   procedure Initialize_3257 is
44281   begin
44282      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3257, AMF.CMOF.Return_Parameter);
44283      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 3257, (False, 0));
44284      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
44285       (Base + 3257,
44286        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
44287      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 3257, (False, (Unlimited => True)));
44288      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3257, (False, AMF.CMOF.Public_Visibility));
44289   end Initialize_3257;
44290
44291   ---------------------
44292   -- Initialize_3258 --
44293   ---------------------
44294
44295   procedure Initialize_3258 is
44296   begin
44297      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44298       (Base + 3258,
44299        AMF.Internals.Tables.UML_String_Data_06.MS_06E4'Access);
44300   end Initialize_3258;
44301
44302   ---------------------
44303   -- Initialize_3259 --
44304   ---------------------
44305
44306   procedure Initialize_3259 is
44307   begin
44308      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
44309       (Base + 3259,
44310        AMF.Internals.Tables.UML_String_Data_0A.MS_0A6E'Access);
44311      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3259, (Is_Empty => True));
44312   end Initialize_3259;
44313
44314   ---------------------
44315   -- Initialize_3260 --
44316   ---------------------
44317
44318   procedure Initialize_3260 is
44319   begin
44320      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44321       (Base + 3260,
44322        AMF.Internals.Tables.UML_String_Data_09.MS_09DD'Access);
44323   end Initialize_3260;
44324
44325   ---------------------
44326   -- Initialize_3261 --
44327   ---------------------
44328
44329   procedure Initialize_3261 is
44330   begin
44331      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3261, (Is_Empty => True));
44332   end Initialize_3261;
44333
44334   ---------------------
44335   -- Initialize_3262 --
44336   ---------------------
44337
44338   procedure Initialize_3262 is
44339   begin
44340      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44341       (Base + 3262,
44342        AMF.Internals.Tables.UML_String_Data_09.MS_090F'Access);
44343   end Initialize_3262;
44344
44345   ---------------------
44346   -- Initialize_3263 --
44347   ---------------------
44348
44349   procedure Initialize_3263 is
44350   begin
44351      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44352       (Base + 3263,
44353        AMF.Internals.Tables.UML_String_Data_0A.MS_0ACC'Access);
44354   end Initialize_3263;
44355
44356   ---------------------
44357   -- Initialize_3264 --
44358   ---------------------
44359
44360   procedure Initialize_3264 is
44361   begin
44362      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44363       (Base + 3264,
44364        AMF.Internals.Tables.UML_String_Data_0B.MS_0BA2'Access);
44365   end Initialize_3264;
44366
44367   ---------------------
44368   -- Initialize_3265 --
44369   ---------------------
44370
44371   procedure Initialize_3265 is
44372   begin
44373      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
44374       (Base + 3265,
44375        AMF.Internals.Tables.UML_String_Data_0A.MS_0A30'Access);
44376      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3265, (Is_Empty => True));
44377   end Initialize_3265;
44378
44379   ---------------------
44380   -- Initialize_3266 --
44381   ---------------------
44382
44383   procedure Initialize_3266 is
44384   begin
44385      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44386       (Base + 3266,
44387        AMF.Internals.Tables.UML_String_Data_00.MS_007D'Access);
44388   end Initialize_3266;
44389
44390   ---------------------
44391   -- Initialize_3267 --
44392   ---------------------
44393
44394   procedure Initialize_3267 is
44395   begin
44396      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3267, (Is_Empty => True));
44397   end Initialize_3267;
44398
44399   ---------------------
44400   -- Initialize_3268 --
44401   ---------------------
44402
44403   procedure Initialize_3268 is
44404   begin
44405      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
44406       (Base + 3268,
44407        AMF.Internals.Tables.UML_String_Data_04.MS_040D'Access);
44408      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3268, (Is_Empty => True));
44409   end Initialize_3268;
44410
44411   ---------------------
44412   -- Initialize_3269 --
44413   ---------------------
44414
44415   procedure Initialize_3269 is
44416   begin
44417      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44418       (Base + 3269,
44419        AMF.Internals.Tables.UML_String_Data_01.MS_0183'Access);
44420   end Initialize_3269;
44421
44422   ---------------------
44423   -- Initialize_3270 --
44424   ---------------------
44425
44426   procedure Initialize_3270 is
44427   begin
44428      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3270, (Is_Empty => True));
44429   end Initialize_3270;
44430
44431   ---------------------
44432   -- Initialize_3271 --
44433   ---------------------
44434
44435   procedure Initialize_3271 is
44436   begin
44437      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
44438       (Base + 3271,
44439        AMF.Internals.Tables.UML_String_Data_0C.MS_0C70'Access);
44440      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3271, (Is_Empty => True));
44441   end Initialize_3271;
44442
44443   ---------------------
44444   -- Initialize_3272 --
44445   ---------------------
44446
44447   procedure Initialize_3272 is
44448   begin
44449      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44450       (Base + 3272,
44451        AMF.Internals.Tables.UML_String_Data_0C.MS_0C2C'Access);
44452   end Initialize_3272;
44453
44454   ---------------------
44455   -- Initialize_3273 --
44456   ---------------------
44457
44458   procedure Initialize_3273 is
44459   begin
44460      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3273, (Is_Empty => True));
44461   end Initialize_3273;
44462
44463   ---------------------
44464   -- Initialize_3274 --
44465   ---------------------
44466
44467   procedure Initialize_3274 is
44468   begin
44469      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
44470       (Base + 3274,
44471        AMF.Internals.Tables.UML_String_Data_08.MS_08FF'Access);
44472      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3274, (Is_Empty => True));
44473   end Initialize_3274;
44474
44475   ---------------------
44476   -- Initialize_3275 --
44477   ---------------------
44478
44479   procedure Initialize_3275 is
44480   begin
44481      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44482       (Base + 3275,
44483        AMF.Internals.Tables.UML_String_Data_08.MS_08EE'Access);
44484   end Initialize_3275;
44485
44486   ---------------------
44487   -- Initialize_3276 --
44488   ---------------------
44489
44490   procedure Initialize_3276 is
44491   begin
44492      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3276, (Is_Empty => True));
44493   end Initialize_3276;
44494
44495   ---------------------
44496   -- Initialize_3277 --
44497   ---------------------
44498
44499   procedure Initialize_3277 is
44500   begin
44501      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
44502       (Base + 3277,
44503        AMF.Internals.Tables.UML_String_Data_06.MS_06C2'Access);
44504      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3277, (Is_Empty => True));
44505   end Initialize_3277;
44506
44507   ---------------------
44508   -- Initialize_3278 --
44509   ---------------------
44510
44511   procedure Initialize_3278 is
44512   begin
44513      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44514       (Base + 3278,
44515        AMF.Internals.Tables.UML_String_Data_05.MS_054B'Access);
44516   end Initialize_3278;
44517
44518   ---------------------
44519   -- Initialize_3279 --
44520   ---------------------
44521
44522   procedure Initialize_3279 is
44523   begin
44524      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3279, (Is_Empty => True));
44525   end Initialize_3279;
44526
44527   ---------------------
44528   -- Initialize_3280 --
44529   ---------------------
44530
44531   procedure Initialize_3280 is
44532   begin
44533      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
44534       (Base + 3280,
44535        AMF.Internals.Tables.UML_String_Data_06.MS_06E0'Access);
44536      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3280, (Is_Empty => True));
44537   end Initialize_3280;
44538
44539   ---------------------
44540   -- Initialize_3281 --
44541   ---------------------
44542
44543   procedure Initialize_3281 is
44544   begin
44545      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44546       (Base + 3281,
44547        AMF.Internals.Tables.UML_String_Data_05.MS_05DD'Access);
44548   end Initialize_3281;
44549
44550   ---------------------
44551   -- Initialize_3282 --
44552   ---------------------
44553
44554   procedure Initialize_3282 is
44555   begin
44556      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3282, (Is_Empty => True));
44557   end Initialize_3282;
44558
44559   ---------------------
44560   -- Initialize_3283 --
44561   ---------------------
44562
44563   procedure Initialize_3283 is
44564   begin
44565      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
44566       (Base + 3283,
44567        AMF.Internals.Tables.UML_String_Data_05.MS_05D0'Access);
44568      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3283, (Is_Empty => True));
44569   end Initialize_3283;
44570
44571   ---------------------
44572   -- Initialize_3284 --
44573   ---------------------
44574
44575   procedure Initialize_3284 is
44576   begin
44577      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44578       (Base + 3284,
44579        AMF.Internals.Tables.UML_String_Data_01.MS_01BD'Access);
44580   end Initialize_3284;
44581
44582   ---------------------
44583   -- Initialize_3285 --
44584   ---------------------
44585
44586   procedure Initialize_3285 is
44587   begin
44588      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3285, (Is_Empty => True));
44589   end Initialize_3285;
44590
44591   ---------------------
44592   -- Initialize_3286 --
44593   ---------------------
44594
44595   procedure Initialize_3286 is
44596   begin
44597      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
44598       (Base + 3286,
44599        AMF.Internals.Tables.UML_String_Data_05.MS_053B'Access);
44600      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3286, (Is_Empty => True));
44601   end Initialize_3286;
44602
44603   ---------------------
44604   -- Initialize_3287 --
44605   ---------------------
44606
44607   procedure Initialize_3287 is
44608   begin
44609      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44610       (Base + 3287,
44611        AMF.Internals.Tables.UML_String_Data_00.MS_0046'Access);
44612   end Initialize_3287;
44613
44614   ---------------------
44615   -- Initialize_3288 --
44616   ---------------------
44617
44618   procedure Initialize_3288 is
44619   begin
44620      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3288, (Is_Empty => True));
44621   end Initialize_3288;
44622
44623   ---------------------
44624   -- Initialize_3289 --
44625   ---------------------
44626
44627   procedure Initialize_3289 is
44628   begin
44629      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44630       (Base + 3289,
44631        AMF.Internals.Tables.UML_String_Data_01.MS_0199'Access);
44632   end Initialize_3289;
44633
44634   ---------------------
44635   -- Initialize_3290 --
44636   ---------------------
44637
44638   procedure Initialize_3290 is
44639   begin
44640      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44641       (Base + 3290,
44642        AMF.Internals.Tables.UML_String_Data_07.MS_0756'Access);
44643   end Initialize_3290;
44644
44645   ---------------------
44646   -- Initialize_3291 --
44647   ---------------------
44648
44649   procedure Initialize_3291 is
44650   begin
44651      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44652       (Base + 3291,
44653        AMF.Internals.Tables.UML_String_Data_00.MS_00ED'Access);
44654   end Initialize_3291;
44655
44656   ---------------------
44657   -- Initialize_3292 --
44658   ---------------------
44659
44660   procedure Initialize_3292 is
44661   begin
44662      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44663       (Base + 3292,
44664        AMF.Internals.Tables.UML_String_Data_01.MS_0132'Access);
44665   end Initialize_3292;
44666
44667   ---------------------
44668   -- Initialize_3293 --
44669   ---------------------
44670
44671   procedure Initialize_3293 is
44672   begin
44673      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44674       (Base + 3293,
44675        AMF.Internals.Tables.UML_String_Data_01.MS_01EE'Access);
44676   end Initialize_3293;
44677
44678   ---------------------
44679   -- Initialize_3294 --
44680   ---------------------
44681
44682   procedure Initialize_3294 is
44683   begin
44684      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44685       (Base + 3294,
44686        AMF.Internals.Tables.UML_String_Data_03.MS_0320'Access);
44687   end Initialize_3294;
44688
44689   ---------------------
44690   -- Initialize_3295 --
44691   ---------------------
44692
44693   procedure Initialize_3295 is
44694   begin
44695      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
44696       (Base + 3295,
44697        AMF.Internals.Tables.UML_String_Data_03.MS_0300'Access);
44698      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3295, (Is_Empty => True));
44699   end Initialize_3295;
44700
44701   ---------------------
44702   -- Initialize_3296 --
44703   ---------------------
44704
44705   procedure Initialize_3296 is
44706   begin
44707      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44708       (Base + 3296,
44709        AMF.Internals.Tables.UML_String_Data_07.MS_072D'Access);
44710   end Initialize_3296;
44711
44712   ---------------------
44713   -- Initialize_3297 --
44714   ---------------------
44715
44716   procedure Initialize_3297 is
44717   begin
44718      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3297, (Is_Empty => True));
44719   end Initialize_3297;
44720
44721   ---------------------
44722   -- Initialize_3298 --
44723   ---------------------
44724
44725   procedure Initialize_3298 is
44726   begin
44727      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
44728       (Base + 3298,
44729        AMF.Internals.Tables.UML_String_Data_02.MS_0247'Access);
44730      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3298, (Is_Empty => True));
44731   end Initialize_3298;
44732
44733   ---------------------
44734   -- Initialize_3299 --
44735   ---------------------
44736
44737   procedure Initialize_3299 is
44738   begin
44739      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44740       (Base + 3299,
44741        AMF.Internals.Tables.UML_String_Data_02.MS_0215'Access);
44742   end Initialize_3299;
44743
44744   ---------------------
44745   -- Initialize_3300 --
44746   ---------------------
44747
44748   procedure Initialize_3300 is
44749   begin
44750      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3300, (Is_Empty => True));
44751   end Initialize_3300;
44752
44753   ---------------------
44754   -- Initialize_3301 --
44755   ---------------------
44756
44757   procedure Initialize_3301 is
44758   begin
44759      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
44760       (Base + 3301,
44761        AMF.Internals.Tables.UML_String_Data_02.MS_0294'Access);
44762      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3301, (Is_Empty => True));
44763   end Initialize_3301;
44764
44765   ---------------------
44766   -- Initialize_3302 --
44767   ---------------------
44768
44769   procedure Initialize_3302 is
44770   begin
44771      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44772       (Base + 3302,
44773        AMF.Internals.Tables.UML_String_Data_07.MS_07A0'Access);
44774   end Initialize_3302;
44775
44776   ---------------------
44777   -- Initialize_3303 --
44778   ---------------------
44779
44780   procedure Initialize_3303 is
44781   begin
44782      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3303, (Is_Empty => True));
44783   end Initialize_3303;
44784
44785   ---------------------
44786   -- Initialize_3304 --
44787   ---------------------
44788
44789   procedure Initialize_3304 is
44790   begin
44791      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44792       (Base + 3304,
44793        AMF.Internals.Tables.UML_String_Data_06.MS_0650'Access);
44794   end Initialize_3304;
44795
44796   ---------------------
44797   -- Initialize_3305 --
44798   ---------------------
44799
44800   procedure Initialize_3305 is
44801   begin
44802      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44803       (Base + 3305,
44804        AMF.Internals.Tables.UML_String_Data_02.MS_0244'Access);
44805   end Initialize_3305;
44806
44807   ---------------------
44808   -- Initialize_3306 --
44809   ---------------------
44810
44811   procedure Initialize_3306 is
44812   begin
44813      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44814       (Base + 3306,
44815        AMF.Internals.Tables.UML_String_Data_05.MS_0514'Access);
44816   end Initialize_3306;
44817
44818   ---------------------
44819   -- Initialize_3307 --
44820   ---------------------
44821
44822   procedure Initialize_3307 is
44823   begin
44824      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44825       (Base + 3307,
44826        AMF.Internals.Tables.UML_String_Data_08.MS_08D7'Access);
44827   end Initialize_3307;
44828
44829   ---------------------
44830   -- Initialize_3308 --
44831   ---------------------
44832
44833   procedure Initialize_3308 is
44834   begin
44835      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44836       (Base + 3308,
44837        AMF.Internals.Tables.UML_String_Data_05.MS_05A9'Access);
44838   end Initialize_3308;
44839
44840   ---------------------
44841   -- Initialize_3309 --
44842   ---------------------
44843
44844   procedure Initialize_3309 is
44845   begin
44846      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44847       (Base + 3309,
44848        AMF.Internals.Tables.UML_String_Data_0B.MS_0B53'Access);
44849   end Initialize_3309;
44850
44851   ---------------------
44852   -- Initialize_3310 --
44853   ---------------------
44854
44855   procedure Initialize_3310 is
44856   begin
44857      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44858       (Base + 3310,
44859        AMF.Internals.Tables.UML_String_Data_0A.MS_0A63'Access);
44860   end Initialize_3310;
44861
44862   ---------------------
44863   -- Initialize_3311 --
44864   ---------------------
44865
44866   procedure Initialize_3311 is
44867   begin
44868      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44869       (Base + 3311,
44870        AMF.Internals.Tables.UML_String_Data_0B.MS_0B58'Access);
44871   end Initialize_3311;
44872
44873   ---------------------
44874   -- Initialize_3312 --
44875   ---------------------
44876
44877   procedure Initialize_3312 is
44878   begin
44879      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44880       (Base + 3312,
44881        AMF.Internals.Tables.UML_String_Data_04.MS_0463'Access);
44882   end Initialize_3312;
44883
44884   ---------------------
44885   -- Initialize_3313 --
44886   ---------------------
44887
44888   procedure Initialize_3313 is
44889   begin
44890      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44891       (Base + 3313,
44892        AMF.Internals.Tables.UML_String_Data_09.MS_09C6'Access);
44893   end Initialize_3313;
44894
44895   ---------------------
44896   -- Initialize_3314 --
44897   ---------------------
44898
44899   procedure Initialize_3314 is
44900   begin
44901      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44902       (Base + 3314,
44903        AMF.Internals.Tables.UML_String_Data_00.MS_00A6'Access);
44904   end Initialize_3314;
44905
44906   ---------------------
44907   -- Initialize_3315 --
44908   ---------------------
44909
44910   procedure Initialize_3315 is
44911   begin
44912      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44913       (Base + 3315,
44914        AMF.Internals.Tables.UML_String_Data_02.MS_0282'Access);
44915   end Initialize_3315;
44916
44917   ---------------------
44918   -- Initialize_3316 --
44919   ---------------------
44920
44921   procedure Initialize_3316 is
44922   begin
44923      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44924       (Base + 3316,
44925        AMF.Internals.Tables.UML_String_Data_02.MS_0253'Access);
44926   end Initialize_3316;
44927
44928   ---------------------
44929   -- Initialize_3317 --
44930   ---------------------
44931
44932   procedure Initialize_3317 is
44933   begin
44934      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44935       (Base + 3317,
44936        AMF.Internals.Tables.UML_String_Data_09.MS_091A'Access);
44937   end Initialize_3317;
44938
44939   ---------------------
44940   -- Initialize_3318 --
44941   ---------------------
44942
44943   procedure Initialize_3318 is
44944   begin
44945      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44946       (Base + 3318,
44947        AMF.Internals.Tables.UML_String_Data_02.MS_0212'Access);
44948   end Initialize_3318;
44949
44950   ---------------------
44951   -- Initialize_3319 --
44952   ---------------------
44953
44954   procedure Initialize_3319 is
44955   begin
44956      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44957       (Base + 3319,
44958        AMF.Internals.Tables.UML_String_Data_08.MS_0871'Access);
44959   end Initialize_3319;
44960
44961   ---------------------
44962   -- Initialize_3320 --
44963   ---------------------
44964
44965   procedure Initialize_3320 is
44966   begin
44967      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44968       (Base + 3320,
44969        AMF.Internals.Tables.UML_String_Data_02.MS_020A'Access);
44970   end Initialize_3320;
44971
44972   ---------------------
44973   -- Initialize_3321 --
44974   ---------------------
44975
44976   procedure Initialize_3321 is
44977   begin
44978      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44979       (Base + 3321,
44980        AMF.Internals.Tables.UML_String_Data_09.MS_0965'Access);
44981   end Initialize_3321;
44982
44983   ---------------------
44984   -- Initialize_3322 --
44985   ---------------------
44986
44987   procedure Initialize_3322 is
44988   begin
44989      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
44990       (Base + 3322,
44991        AMF.Internals.Tables.UML_String_Data_04.MS_0435'Access);
44992   end Initialize_3322;
44993
44994   ---------------------
44995   -- Initialize_3323 --
44996   ---------------------
44997
44998   procedure Initialize_3323 is
44999   begin
45000      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45001       (Base + 3323,
45002        AMF.Internals.Tables.UML_String_Data_01.MS_0127'Access);
45003   end Initialize_3323;
45004
45005   ---------------------
45006   -- Initialize_3324 --
45007   ---------------------
45008
45009   procedure Initialize_3324 is
45010   begin
45011      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
45012       (Base + 3324,
45013        AMF.Internals.Tables.UML_String_Data_0C.MS_0C50'Access);
45014      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3324, (Is_Empty => True));
45015   end Initialize_3324;
45016
45017   ---------------------
45018   -- Initialize_3325 --
45019   ---------------------
45020
45021   procedure Initialize_3325 is
45022   begin
45023      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45024       (Base + 3325,
45025        AMF.Internals.Tables.UML_String_Data_03.MS_03B4'Access);
45026   end Initialize_3325;
45027
45028   ---------------------
45029   -- Initialize_3326 --
45030   ---------------------
45031
45032   procedure Initialize_3326 is
45033   begin
45034      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3326, (Is_Empty => True));
45035   end Initialize_3326;
45036
45037   ---------------------
45038   -- Initialize_3327 --
45039   ---------------------
45040
45041   procedure Initialize_3327 is
45042   begin
45043      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
45044       (Base + 3327,
45045        AMF.Internals.Tables.UML_String_Data_06.MS_06B0'Access);
45046      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3327, (Is_Empty => True));
45047   end Initialize_3327;
45048
45049   ---------------------
45050   -- Initialize_3328 --
45051   ---------------------
45052
45053   procedure Initialize_3328 is
45054   begin
45055      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45056       (Base + 3328,
45057        AMF.Internals.Tables.UML_String_Data_0A.MS_0A61'Access);
45058   end Initialize_3328;
45059
45060   ---------------------
45061   -- Initialize_3329 --
45062   ---------------------
45063
45064   procedure Initialize_3329 is
45065   begin
45066      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3329, (Is_Empty => True));
45067   end Initialize_3329;
45068
45069   ---------------------
45070   -- Initialize_3330 --
45071   ---------------------
45072
45073   procedure Initialize_3330 is
45074   begin
45075      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
45076       (Base + 3330,
45077        AMF.Internals.Tables.UML_String_Data_09.MS_0939'Access);
45078      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3330, (Is_Empty => True));
45079   end Initialize_3330;
45080
45081   ---------------------
45082   -- Initialize_3331 --
45083   ---------------------
45084
45085   procedure Initialize_3331 is
45086   begin
45087      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45088       (Base + 3331,
45089        AMF.Internals.Tables.UML_String_Data_0B.MS_0B45'Access);
45090   end Initialize_3331;
45091
45092   ---------------------
45093   -- Initialize_3332 --
45094   ---------------------
45095
45096   procedure Initialize_3332 is
45097   begin
45098      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3332, (Is_Empty => True));
45099   end Initialize_3332;
45100
45101   ---------------------
45102   -- Initialize_3333 --
45103   ---------------------
45104
45105   procedure Initialize_3333 is
45106   begin
45107      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45108       (Base + 3333,
45109        AMF.Internals.Tables.UML_String_Data_09.MS_09D5'Access);
45110   end Initialize_3333;
45111
45112   ---------------------
45113   -- Initialize_3334 --
45114   ---------------------
45115
45116   procedure Initialize_3334 is
45117   begin
45118      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45119       (Base + 3334,
45120        AMF.Internals.Tables.UML_String_Data_07.MS_07D7'Access);
45121   end Initialize_3334;
45122
45123   ---------------------
45124   -- Initialize_3335 --
45125   ---------------------
45126
45127   procedure Initialize_3335 is
45128   begin
45129      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45130       (Base + 3335,
45131        AMF.Internals.Tables.UML_String_Data_02.MS_0221'Access);
45132   end Initialize_3335;
45133
45134   ---------------------
45135   -- Initialize_3336 --
45136   ---------------------
45137
45138   procedure Initialize_3336 is
45139   begin
45140      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45141       (Base + 3336,
45142        AMF.Internals.Tables.UML_String_Data_08.MS_0881'Access);
45143   end Initialize_3336;
45144
45145   ---------------------
45146   -- Initialize_3337 --
45147   ---------------------
45148
45149   procedure Initialize_3337 is
45150   begin
45151      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3337, True);
45152      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
45153       (Base + 3337,
45154        AMF.Internals.Tables.UML_String_Data_0A.MS_0A5B'Access);
45155      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3337, (False, AMF.CMOF.Public_Visibility));
45156   end Initialize_3337;
45157
45158   ---------------------
45159   -- Initialize_3338 --
45160   ---------------------
45161
45162   procedure Initialize_3338 is
45163   begin
45164      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45165       (Base + 3338,
45166        AMF.Internals.Tables.UML_String_Data_09.MS_0994'Access);
45167   end Initialize_3338;
45168
45169   ---------------------
45170   -- Initialize_3339 --
45171   ---------------------
45172
45173   procedure Initialize_3339 is
45174   begin
45175      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
45176       (Base + 3339,
45177        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
45178      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3339, (Is_Empty => True));
45179   end Initialize_3339;
45180
45181   ---------------------
45182   -- Initialize_3340 --
45183   ---------------------
45184
45185   procedure Initialize_3340 is
45186   begin
45187      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3340, (Is_Empty => True));
45188   end Initialize_3340;
45189
45190   ---------------------
45191   -- Initialize_3341 --
45192   ---------------------
45193
45194   procedure Initialize_3341 is
45195   begin
45196      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3341, AMF.CMOF.Return_Parameter);
45197      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
45198       (Base + 3341,
45199        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
45200      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3341, (False, AMF.CMOF.Public_Visibility));
45201   end Initialize_3341;
45202
45203   ---------------------
45204   -- Initialize_3342 --
45205   ---------------------
45206
45207   procedure Initialize_3342 is
45208   begin
45209      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3342, True);
45210      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
45211       (Base + 3342,
45212        AMF.Internals.Tables.UML_String_Data_00.MS_0086'Access);
45213      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3342, (False, AMF.CMOF.Public_Visibility));
45214   end Initialize_3342;
45215
45216   ---------------------
45217   -- Initialize_3343 --
45218   ---------------------
45219
45220   procedure Initialize_3343 is
45221   begin
45222      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45223       (Base + 3343,
45224        AMF.Internals.Tables.UML_String_Data_01.MS_0195'Access);
45225   end Initialize_3343;
45226
45227   ---------------------
45228   -- Initialize_3344 --
45229   ---------------------
45230
45231   procedure Initialize_3344 is
45232   begin
45233      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
45234       (Base + 3344,
45235        AMF.Internals.Tables.UML_String_Data_0B.MS_0BFB'Access);
45236      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3344, (Is_Empty => True));
45237   end Initialize_3344;
45238
45239   ---------------------
45240   -- Initialize_3345 --
45241   ---------------------
45242
45243   procedure Initialize_3345 is
45244   begin
45245      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3345, (Is_Empty => True));
45246   end Initialize_3345;
45247
45248   ---------------------
45249   -- Initialize_3346 --
45250   ---------------------
45251
45252   procedure Initialize_3346 is
45253   begin
45254      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
45255       (Base + 3346,
45256        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
45257      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3346, (Is_Empty => True));
45258   end Initialize_3346;
45259
45260   ---------------------
45261   -- Initialize_3347 --
45262   ---------------------
45263
45264   procedure Initialize_3347 is
45265   begin
45266      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3347, (Is_Empty => True));
45267   end Initialize_3347;
45268
45269   ---------------------
45270   -- Initialize_3348 --
45271   ---------------------
45272
45273   procedure Initialize_3348 is
45274   begin
45275      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3348, AMF.CMOF.Return_Parameter);
45276      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
45277       (Base + 3348,
45278        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
45279      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3348, (False, AMF.CMOF.Public_Visibility));
45280   end Initialize_3348;
45281
45282   ---------------------
45283   -- Initialize_3349 --
45284   ---------------------
45285
45286   procedure Initialize_3349 is
45287   begin
45288      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3349, True);
45289      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
45290       (Base + 3349,
45291        AMF.Internals.Tables.UML_String_Data_0A.MS_0A4A'Access);
45292      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3349, (False, AMF.CMOF.Public_Visibility));
45293   end Initialize_3349;
45294
45295   ---------------------
45296   -- Initialize_3350 --
45297   ---------------------
45298
45299   procedure Initialize_3350 is
45300   begin
45301      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45302       (Base + 3350,
45303        AMF.Internals.Tables.UML_String_Data_0B.MS_0B25'Access);
45304   end Initialize_3350;
45305
45306   ---------------------
45307   -- Initialize_3351 --
45308   ---------------------
45309
45310   procedure Initialize_3351 is
45311   begin
45312      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
45313       (Base + 3351,
45314        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
45315      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3351, (Is_Empty => True));
45316   end Initialize_3351;
45317
45318   ---------------------
45319   -- Initialize_3352 --
45320   ---------------------
45321
45322   procedure Initialize_3352 is
45323   begin
45324      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3352, (Is_Empty => True));
45325   end Initialize_3352;
45326
45327   ---------------------
45328   -- Initialize_3353 --
45329   ---------------------
45330
45331   procedure Initialize_3353 is
45332   begin
45333      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
45334       (Base + 3353,
45335        AMF.Internals.Tables.UML_String_Data_0B.MS_0BFB'Access);
45336      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3353, (Is_Empty => True));
45337   end Initialize_3353;
45338
45339   ---------------------
45340   -- Initialize_3354 --
45341   ---------------------
45342
45343   procedure Initialize_3354 is
45344   begin
45345      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3354, (Is_Empty => True));
45346   end Initialize_3354;
45347
45348   ---------------------
45349   -- Initialize_3355 --
45350   ---------------------
45351
45352   procedure Initialize_3355 is
45353   begin
45354      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3355, AMF.CMOF.Return_Parameter);
45355      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
45356       (Base + 3355,
45357        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
45358      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3355, (False, AMF.CMOF.Public_Visibility));
45359   end Initialize_3355;
45360
45361   ---------------------
45362   -- Initialize_3356 --
45363   ---------------------
45364
45365   procedure Initialize_3356 is
45366   begin
45367      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3356, True);
45368      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
45369       (Base + 3356,
45370        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
45371      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3356, (False, AMF.CMOF.Public_Visibility));
45372   end Initialize_3356;
45373
45374   ---------------------
45375   -- Initialize_3357 --
45376   ---------------------
45377
45378   procedure Initialize_3357 is
45379   begin
45380      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45381       (Base + 3357,
45382        AMF.Internals.Tables.UML_String_Data_06.MS_0659'Access);
45383   end Initialize_3357;
45384
45385   ---------------------
45386   -- Initialize_3358 --
45387   ---------------------
45388
45389   procedure Initialize_3358 is
45390   begin
45391      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
45392       (Base + 3358,
45393        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
45394      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3358, (Is_Empty => True));
45395   end Initialize_3358;
45396
45397   ---------------------
45398   -- Initialize_3359 --
45399   ---------------------
45400
45401   procedure Initialize_3359 is
45402   begin
45403      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3359, (Is_Empty => True));
45404   end Initialize_3359;
45405
45406   ---------------------
45407   -- Initialize_3360 --
45408   ---------------------
45409
45410   procedure Initialize_3360 is
45411   begin
45412      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3360, AMF.CMOF.Return_Parameter);
45413      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 3360, (False, 0));
45414      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
45415       (Base + 3360,
45416        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
45417      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3360, (False, AMF.CMOF.Public_Visibility));
45418   end Initialize_3360;
45419
45420   ---------------------
45421   -- Initialize_3361 --
45422   ---------------------
45423
45424   procedure Initialize_3361 is
45425   begin
45426      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3361, True);
45427      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
45428       (Base + 3361,
45429        AMF.Internals.Tables.UML_String_Data_04.MS_0406'Access);
45430      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3361, (False, AMF.CMOF.Public_Visibility));
45431   end Initialize_3361;
45432
45433   ---------------------
45434   -- Initialize_3362 --
45435   ---------------------
45436
45437   procedure Initialize_3362 is
45438   begin
45439      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45440       (Base + 3362,
45441        AMF.Internals.Tables.UML_String_Data_04.MS_04F6'Access);
45442   end Initialize_3362;
45443
45444   ---------------------
45445   -- Initialize_3363 --
45446   ---------------------
45447
45448   procedure Initialize_3363 is
45449   begin
45450      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
45451       (Base + 3363,
45452        AMF.Internals.Tables.UML_String_Data_0B.MS_0BFB'Access);
45453      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3363, (Is_Empty => True));
45454   end Initialize_3363;
45455
45456   ---------------------
45457   -- Initialize_3364 --
45458   ---------------------
45459
45460   procedure Initialize_3364 is
45461   begin
45462      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3364, (Is_Empty => True));
45463   end Initialize_3364;
45464
45465   ---------------------
45466   -- Initialize_3365 --
45467   ---------------------
45468
45469   procedure Initialize_3365 is
45470   begin
45471      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
45472       (Base + 3365,
45473        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
45474      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3365, (Is_Empty => True));
45475   end Initialize_3365;
45476
45477   ---------------------
45478   -- Initialize_3366 --
45479   ---------------------
45480
45481   procedure Initialize_3366 is
45482   begin
45483      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3366, (Is_Empty => True));
45484   end Initialize_3366;
45485
45486   ---------------------
45487   -- Initialize_3367 --
45488   ---------------------
45489
45490   procedure Initialize_3367 is
45491   begin
45492      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3367, AMF.CMOF.Return_Parameter);
45493      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
45494       (Base + 3367,
45495        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
45496      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3367, (False, AMF.CMOF.Public_Visibility));
45497   end Initialize_3367;
45498
45499   ---------------------
45500   -- Initialize_3368 --
45501   ---------------------
45502
45503   procedure Initialize_3368 is
45504   begin
45505      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45506       (Base + 3368,
45507        AMF.Internals.Tables.UML_String_Data_01.MS_0162'Access);
45508   end Initialize_3368;
45509
45510   ---------------------
45511   -- Initialize_3369 --
45512   ---------------------
45513
45514   procedure Initialize_3369 is
45515   begin
45516      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45517       (Base + 3369,
45518        AMF.Internals.Tables.UML_String_Data_05.MS_05D3'Access);
45519   end Initialize_3369;
45520
45521   ---------------------
45522   -- Initialize_3370 --
45523   ---------------------
45524
45525   procedure Initialize_3370 is
45526   begin
45527      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45528       (Base + 3370,
45529        AMF.Internals.Tables.UML_String_Data_04.MS_0442'Access);
45530   end Initialize_3370;
45531
45532   ---------------------
45533   -- Initialize_3371 --
45534   ---------------------
45535
45536   procedure Initialize_3371 is
45537   begin
45538      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
45539       (Base + 3371,
45540        AMF.Internals.Tables.UML_String_Data_07.MS_0752'Access);
45541      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3371, (Is_Empty => True));
45542   end Initialize_3371;
45543
45544   ---------------------
45545   -- Initialize_3372 --
45546   ---------------------
45547
45548   procedure Initialize_3372 is
45549   begin
45550      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45551       (Base + 3372,
45552        AMF.Internals.Tables.UML_String_Data_05.MS_056A'Access);
45553   end Initialize_3372;
45554
45555   ---------------------
45556   -- Initialize_3373 --
45557   ---------------------
45558
45559   procedure Initialize_3373 is
45560   begin
45561      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3373, (Is_Empty => True));
45562   end Initialize_3373;
45563
45564   ---------------------
45565   -- Initialize_3374 --
45566   ---------------------
45567
45568   procedure Initialize_3374 is
45569   begin
45570      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
45571       (Base + 3374,
45572        AMF.Internals.Tables.UML_String_Data_08.MS_0822'Access);
45573      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3374, (Is_Empty => True));
45574   end Initialize_3374;
45575
45576   ---------------------
45577   -- Initialize_3375 --
45578   ---------------------
45579
45580   procedure Initialize_3375 is
45581   begin
45582      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45583       (Base + 3375,
45584        AMF.Internals.Tables.UML_String_Data_03.MS_03B7'Access);
45585   end Initialize_3375;
45586
45587   ---------------------
45588   -- Initialize_3376 --
45589   ---------------------
45590
45591   procedure Initialize_3376 is
45592   begin
45593      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3376, (Is_Empty => True));
45594   end Initialize_3376;
45595
45596   ---------------------
45597   -- Initialize_3377 --
45598   ---------------------
45599
45600   procedure Initialize_3377 is
45601   begin
45602      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45603       (Base + 3377,
45604        AMF.Internals.Tables.UML_String_Data_00.MS_00E1'Access);
45605   end Initialize_3377;
45606
45607   ---------------------
45608   -- Initialize_3378 --
45609   ---------------------
45610
45611   procedure Initialize_3378 is
45612   begin
45613      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45614       (Base + 3378,
45615        AMF.Internals.Tables.UML_String_Data_06.MS_0635'Access);
45616   end Initialize_3378;
45617
45618   ---------------------
45619   -- Initialize_3379 --
45620   ---------------------
45621
45622   procedure Initialize_3379 is
45623   begin
45624      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45625       (Base + 3379,
45626        AMF.Internals.Tables.UML_String_Data_08.MS_086F'Access);
45627   end Initialize_3379;
45628
45629   ---------------------
45630   -- Initialize_3380 --
45631   ---------------------
45632
45633   procedure Initialize_3380 is
45634   begin
45635      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45636       (Base + 3380,
45637        AMF.Internals.Tables.UML_String_Data_02.MS_02BC'Access);
45638   end Initialize_3380;
45639
45640   ---------------------
45641   -- Initialize_3381 --
45642   ---------------------
45643
45644   procedure Initialize_3381 is
45645   begin
45646      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45647       (Base + 3381,
45648        AMF.Internals.Tables.UML_String_Data_04.MS_04B3'Access);
45649   end Initialize_3381;
45650
45651   ---------------------
45652   -- Initialize_3382 --
45653   ---------------------
45654
45655   procedure Initialize_3382 is
45656   begin
45657      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45658       (Base + 3382,
45659        AMF.Internals.Tables.UML_String_Data_0A.MS_0AD7'Access);
45660   end Initialize_3382;
45661
45662   ---------------------
45663   -- Initialize_3383 --
45664   ---------------------
45665
45666   procedure Initialize_3383 is
45667   begin
45668      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45669       (Base + 3383,
45670        AMF.Internals.Tables.UML_String_Data_05.MS_05BE'Access);
45671   end Initialize_3383;
45672
45673   ---------------------
45674   -- Initialize_3384 --
45675   ---------------------
45676
45677   procedure Initialize_3384 is
45678   begin
45679      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45680       (Base + 3384,
45681        AMF.Internals.Tables.UML_String_Data_04.MS_04B3'Access);
45682   end Initialize_3384;
45683
45684   ---------------------
45685   -- Initialize_3385 --
45686   ---------------------
45687
45688   procedure Initialize_3385 is
45689   begin
45690      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45691       (Base + 3385,
45692        AMF.Internals.Tables.UML_String_Data_02.MS_0231'Access);
45693   end Initialize_3385;
45694
45695   ---------------------
45696   -- Initialize_3386 --
45697   ---------------------
45698
45699   procedure Initialize_3386 is
45700   begin
45701      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45702       (Base + 3386,
45703        AMF.Internals.Tables.UML_String_Data_00.MS_00D1'Access);
45704   end Initialize_3386;
45705
45706   ---------------------
45707   -- Initialize_3387 --
45708   ---------------------
45709
45710   procedure Initialize_3387 is
45711   begin
45712      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45713       (Base + 3387,
45714        AMF.Internals.Tables.UML_String_Data_04.MS_04B3'Access);
45715   end Initialize_3387;
45716
45717   ---------------------
45718   -- Initialize_3388 --
45719   ---------------------
45720
45721   procedure Initialize_3388 is
45722   begin
45723      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45724       (Base + 3388,
45725        AMF.Internals.Tables.UML_String_Data_07.MS_0742'Access);
45726   end Initialize_3388;
45727
45728   ---------------------
45729   -- Initialize_3389 --
45730   ---------------------
45731
45732   procedure Initialize_3389 is
45733   begin
45734      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45735       (Base + 3389,
45736        AMF.Internals.Tables.UML_String_Data_06.MS_06AD'Access);
45737   end Initialize_3389;
45738
45739   ---------------------
45740   -- Initialize_3390 --
45741   ---------------------
45742
45743   procedure Initialize_3390 is
45744   begin
45745      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45746       (Base + 3390,
45747        AMF.Internals.Tables.UML_String_Data_07.MS_07E7'Access);
45748   end Initialize_3390;
45749
45750   ---------------------
45751   -- Initialize_3391 --
45752   ---------------------
45753
45754   procedure Initialize_3391 is
45755   begin
45756      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45757       (Base + 3391,
45758        AMF.Internals.Tables.UML_String_Data_07.MS_07D3'Access);
45759   end Initialize_3391;
45760
45761   ---------------------
45762   -- Initialize_3392 --
45763   ---------------------
45764
45765   procedure Initialize_3392 is
45766   begin
45767      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45768       (Base + 3392,
45769        AMF.Internals.Tables.UML_String_Data_0B.MS_0BEA'Access);
45770   end Initialize_3392;
45771
45772   ---------------------
45773   -- Initialize_3393 --
45774   ---------------------
45775
45776   procedure Initialize_3393 is
45777   begin
45778      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45779       (Base + 3393,
45780        AMF.Internals.Tables.UML_String_Data_09.MS_097C'Access);
45781   end Initialize_3393;
45782
45783   ---------------------
45784   -- Initialize_3394 --
45785   ---------------------
45786
45787   procedure Initialize_3394 is
45788   begin
45789      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45790       (Base + 3394,
45791        AMF.Internals.Tables.UML_String_Data_07.MS_07A5'Access);
45792   end Initialize_3394;
45793
45794   ---------------------
45795   -- Initialize_3395 --
45796   ---------------------
45797
45798   procedure Initialize_3395 is
45799   begin
45800      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45801       (Base + 3395,
45802        AMF.Internals.Tables.UML_String_Data_04.MS_04B3'Access);
45803   end Initialize_3395;
45804
45805   ---------------------
45806   -- Initialize_3396 --
45807   ---------------------
45808
45809   procedure Initialize_3396 is
45810   begin
45811      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45812       (Base + 3396,
45813        AMF.Internals.Tables.UML_String_Data_08.MS_08DB'Access);
45814   end Initialize_3396;
45815
45816   ---------------------
45817   -- Initialize_3397 --
45818   ---------------------
45819
45820   procedure Initialize_3397 is
45821   begin
45822      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45823       (Base + 3397,
45824        AMF.Internals.Tables.UML_String_Data_03.MS_035E'Access);
45825   end Initialize_3397;
45826
45827   ---------------------
45828   -- Initialize_3398 --
45829   ---------------------
45830
45831   procedure Initialize_3398 is
45832   begin
45833      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45834       (Base + 3398,
45835        AMF.Internals.Tables.UML_String_Data_04.MS_04B3'Access);
45836   end Initialize_3398;
45837
45838   ---------------------
45839   -- Initialize_3399 --
45840   ---------------------
45841
45842   procedure Initialize_3399 is
45843   begin
45844      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3399, True);
45845      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
45846       (Base + 3399,
45847        AMF.Internals.Tables.UML_String_Data_08.MS_08AE'Access);
45848      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3399, (False, AMF.CMOF.Public_Visibility));
45849   end Initialize_3399;
45850
45851   ---------------------
45852   -- Initialize_3400 --
45853   ---------------------
45854
45855   procedure Initialize_3400 is
45856   begin
45857      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45858       (Base + 3400,
45859        AMF.Internals.Tables.UML_String_Data_01.MS_0182'Access);
45860   end Initialize_3400;
45861
45862   ---------------------
45863   -- Initialize_3401 --
45864   ---------------------
45865
45866   procedure Initialize_3401 is
45867   begin
45868      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45869       (Base + 3401,
45870        AMF.Internals.Tables.UML_String_Data_09.MS_092A'Access);
45871   end Initialize_3401;
45872
45873   ---------------------
45874   -- Initialize_3402 --
45875   ---------------------
45876
45877   procedure Initialize_3402 is
45878   begin
45879      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
45880       (Base + 3402,
45881        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
45882      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3402, (Is_Empty => True));
45883   end Initialize_3402;
45884
45885   ---------------------
45886   -- Initialize_3403 --
45887   ---------------------
45888
45889   procedure Initialize_3403 is
45890   begin
45891      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3403, (Is_Empty => True));
45892   end Initialize_3403;
45893
45894   ---------------------
45895   -- Initialize_3404 --
45896   ---------------------
45897
45898   procedure Initialize_3404 is
45899   begin
45900      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
45901       (Base + 3404,
45902        AMF.Internals.Tables.UML_String_Data_0B.MS_0BFB'Access);
45903      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3404, (Is_Empty => True));
45904   end Initialize_3404;
45905
45906   ---------------------
45907   -- Initialize_3405 --
45908   ---------------------
45909
45910   procedure Initialize_3405 is
45911   begin
45912      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3405, (Is_Empty => True));
45913   end Initialize_3405;
45914
45915   ---------------------
45916   -- Initialize_3406 --
45917   ---------------------
45918
45919   procedure Initialize_3406 is
45920   begin
45921      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3406, AMF.CMOF.Return_Parameter);
45922      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
45923       (Base + 3406,
45924        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
45925      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3406, (False, AMF.CMOF.Public_Visibility));
45926   end Initialize_3406;
45927
45928   ---------------------
45929   -- Initialize_3407 --
45930   ---------------------
45931
45932   procedure Initialize_3407 is
45933   begin
45934      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3407, AMF.CMOF.In_Parameter);
45935      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
45936       (Base + 3407,
45937        AMF.Internals.Tables.UML_String_Data_0B.MS_0B5C'Access);
45938      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3407, (False, AMF.CMOF.Public_Visibility));
45939   end Initialize_3407;
45940
45941   ---------------------
45942   -- Initialize_3408 --
45943   ---------------------
45944
45945   procedure Initialize_3408 is
45946   begin
45947      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3408, True);
45948      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
45949       (Base + 3408,
45950        AMF.Internals.Tables.UML_String_Data_07.MS_07DE'Access);
45951      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3408, (False, AMF.CMOF.Public_Visibility));
45952   end Initialize_3408;
45953
45954   ---------------------
45955   -- Initialize_3409 --
45956   ---------------------
45957
45958   procedure Initialize_3409 is
45959   begin
45960      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
45961       (Base + 3409,
45962        AMF.Internals.Tables.UML_String_Data_02.MS_0281'Access);
45963   end Initialize_3409;
45964
45965   ---------------------
45966   -- Initialize_3410 --
45967   ---------------------
45968
45969   procedure Initialize_3410 is
45970   begin
45971      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
45972       (Base + 3410,
45973        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
45974      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3410, (Is_Empty => True));
45975   end Initialize_3410;
45976
45977   ---------------------
45978   -- Initialize_3411 --
45979   ---------------------
45980
45981   procedure Initialize_3411 is
45982   begin
45983      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3411, (Is_Empty => True));
45984   end Initialize_3411;
45985
45986   ---------------------
45987   -- Initialize_3412 --
45988   ---------------------
45989
45990   procedure Initialize_3412 is
45991   begin
45992      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3412, AMF.CMOF.Return_Parameter);
45993      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
45994       (Base + 3412,
45995        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
45996      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3412, (False, AMF.CMOF.Public_Visibility));
45997   end Initialize_3412;
45998
45999   ---------------------
46000   -- Initialize_3413 --
46001   ---------------------
46002
46003   procedure Initialize_3413 is
46004   begin
46005      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3413, True);
46006      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46007       (Base + 3413,
46008        AMF.Internals.Tables.UML_String_Data_08.MS_08C3'Access);
46009      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3413, (False, AMF.CMOF.Public_Visibility));
46010   end Initialize_3413;
46011
46012   ---------------------
46013   -- Initialize_3414 --
46014   ---------------------
46015
46016   procedure Initialize_3414 is
46017   begin
46018      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
46019       (Base + 3414,
46020        AMF.Internals.Tables.UML_String_Data_02.MS_02ED'Access);
46021   end Initialize_3414;
46022
46023   ---------------------
46024   -- Initialize_3415 --
46025   ---------------------
46026
46027   procedure Initialize_3415 is
46028   begin
46029      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46030       (Base + 3415,
46031        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
46032      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3415, (Is_Empty => True));
46033   end Initialize_3415;
46034
46035   ---------------------
46036   -- Initialize_3416 --
46037   ---------------------
46038
46039   procedure Initialize_3416 is
46040   begin
46041      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3416, (Is_Empty => True));
46042   end Initialize_3416;
46043
46044   ---------------------
46045   -- Initialize_3417 --
46046   ---------------------
46047
46048   procedure Initialize_3417 is
46049   begin
46050      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3417, AMF.CMOF.Return_Parameter);
46051      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46052       (Base + 3417,
46053        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
46054      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3417, (False, AMF.CMOF.Public_Visibility));
46055   end Initialize_3417;
46056
46057   ---------------------
46058   -- Initialize_3418 --
46059   ---------------------
46060
46061   procedure Initialize_3418 is
46062   begin
46063      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3418, True);
46064      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46065       (Base + 3418,
46066        AMF.Internals.Tables.UML_String_Data_04.MS_04AC'Access);
46067      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3418, (False, AMF.CMOF.Public_Visibility));
46068   end Initialize_3418;
46069
46070   ---------------------
46071   -- Initialize_3419 --
46072   ---------------------
46073
46074   procedure Initialize_3419 is
46075   begin
46076      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
46077       (Base + 3419,
46078        AMF.Internals.Tables.UML_String_Data_08.MS_08AB'Access);
46079   end Initialize_3419;
46080
46081   ---------------------
46082   -- Initialize_3420 --
46083   ---------------------
46084
46085   procedure Initialize_3420 is
46086   begin
46087      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46088       (Base + 3420,
46089        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
46090      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3420, (Is_Empty => True));
46091   end Initialize_3420;
46092
46093   ---------------------
46094   -- Initialize_3421 --
46095   ---------------------
46096
46097   procedure Initialize_3421 is
46098   begin
46099      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3421, (Is_Empty => True));
46100   end Initialize_3421;
46101
46102   ---------------------
46103   -- Initialize_3422 --
46104   ---------------------
46105
46106   procedure Initialize_3422 is
46107   begin
46108      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3422, AMF.CMOF.Return_Parameter);
46109      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46110       (Base + 3422,
46111        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
46112      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3422, (False, AMF.CMOF.Public_Visibility));
46113   end Initialize_3422;
46114
46115   ---------------------
46116   -- Initialize_3423 --
46117   ---------------------
46118
46119   procedure Initialize_3423 is
46120   begin
46121      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3423, True);
46122      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46123       (Base + 3423,
46124        AMF.Internals.Tables.UML_String_Data_08.MS_08D5'Access);
46125      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3423, (False, AMF.CMOF.Public_Visibility));
46126   end Initialize_3423;
46127
46128   ---------------------
46129   -- Initialize_3424 --
46130   ---------------------
46131
46132   procedure Initialize_3424 is
46133   begin
46134      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
46135       (Base + 3424,
46136        AMF.Internals.Tables.UML_String_Data_07.MS_07BF'Access);
46137   end Initialize_3424;
46138
46139   ---------------------
46140   -- Initialize_3425 --
46141   ---------------------
46142
46143   procedure Initialize_3425 is
46144   begin
46145      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46146       (Base + 3425,
46147        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
46148      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3425, (Is_Empty => True));
46149   end Initialize_3425;
46150
46151   ---------------------
46152   -- Initialize_3426 --
46153   ---------------------
46154
46155   procedure Initialize_3426 is
46156   begin
46157      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3426, (Is_Empty => True));
46158   end Initialize_3426;
46159
46160   ---------------------
46161   -- Initialize_3427 --
46162   ---------------------
46163
46164   procedure Initialize_3427 is
46165   begin
46166      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3427, AMF.CMOF.Return_Parameter);
46167      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 3427, (False, 0));
46168      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46169       (Base + 3427,
46170        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
46171      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 3427, (False, (Unlimited => True)));
46172      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3427, (False, AMF.CMOF.Public_Visibility));
46173   end Initialize_3427;
46174
46175   ---------------------
46176   -- Initialize_3428 --
46177   ---------------------
46178
46179   procedure Initialize_3428 is
46180   begin
46181      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3428, True);
46182      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46183       (Base + 3428,
46184        AMF.Internals.Tables.UML_String_Data_0B.MS_0BB4'Access);
46185      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3428, (False, AMF.CMOF.Public_Visibility));
46186   end Initialize_3428;
46187
46188   ---------------------
46189   -- Initialize_3429 --
46190   ---------------------
46191
46192   procedure Initialize_3429 is
46193   begin
46194      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
46195       (Base + 3429,
46196        AMF.Internals.Tables.UML_String_Data_0A.MS_0AD6'Access);
46197   end Initialize_3429;
46198
46199   ---------------------
46200   -- Initialize_3430 --
46201   ---------------------
46202
46203   procedure Initialize_3430 is
46204   begin
46205      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46206       (Base + 3430,
46207        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
46208      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3430, (Is_Empty => True));
46209   end Initialize_3430;
46210
46211   ---------------------
46212   -- Initialize_3431 --
46213   ---------------------
46214
46215   procedure Initialize_3431 is
46216   begin
46217      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3431, (Is_Empty => True));
46218   end Initialize_3431;
46219
46220   ---------------------
46221   -- Initialize_3432 --
46222   ---------------------
46223
46224   procedure Initialize_3432 is
46225   begin
46226      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3432, AMF.CMOF.Return_Parameter);
46227      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46228       (Base + 3432,
46229        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
46230      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3432, (False, AMF.CMOF.Public_Visibility));
46231   end Initialize_3432;
46232
46233   ---------------------
46234   -- Initialize_3433 --
46235   ---------------------
46236
46237   procedure Initialize_3433 is
46238   begin
46239      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3433, True);
46240      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46241       (Base + 3433,
46242        AMF.Internals.Tables.UML_String_Data_06.MS_06C8'Access);
46243      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3433, (False, AMF.CMOF.Public_Visibility));
46244   end Initialize_3433;
46245
46246   ---------------------
46247   -- Initialize_3434 --
46248   ---------------------
46249
46250   procedure Initialize_3434 is
46251   begin
46252      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
46253       (Base + 3434,
46254        AMF.Internals.Tables.UML_String_Data_00.MS_00FA'Access);
46255   end Initialize_3434;
46256
46257   ---------------------
46258   -- Initialize_3435 --
46259   ---------------------
46260
46261   procedure Initialize_3435 is
46262   begin
46263      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46264       (Base + 3435,
46265        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
46266      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3435, (Is_Empty => True));
46267   end Initialize_3435;
46268
46269   ---------------------
46270   -- Initialize_3436 --
46271   ---------------------
46272
46273   procedure Initialize_3436 is
46274   begin
46275      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3436, (Is_Empty => True));
46276   end Initialize_3436;
46277
46278   ---------------------
46279   -- Initialize_3437 --
46280   ---------------------
46281
46282   procedure Initialize_3437 is
46283   begin
46284      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3437, AMF.CMOF.Return_Parameter);
46285      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46286       (Base + 3437,
46287        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
46288      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3437, (False, AMF.CMOF.Public_Visibility));
46289   end Initialize_3437;
46290
46291   ---------------------
46292   -- Initialize_3438 --
46293   ---------------------
46294
46295   procedure Initialize_3438 is
46296   begin
46297      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
46298       (Base + 3438,
46299        AMF.Internals.Tables.UML_String_Data_0A.MS_0AB3'Access);
46300   end Initialize_3438;
46301
46302   ---------------------
46303   -- Initialize_3439 --
46304   ---------------------
46305
46306   procedure Initialize_3439 is
46307   begin
46308      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
46309       (Base + 3439,
46310        AMF.Internals.Tables.UML_String_Data_00.MS_0018'Access);
46311   end Initialize_3439;
46312
46313   ---------------------
46314   -- Initialize_3440 --
46315   ---------------------
46316
46317   procedure Initialize_3440 is
46318   begin
46319      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
46320       (Base + 3440,
46321        AMF.Internals.Tables.UML_String_Data_0A.MS_0A86'Access);
46322   end Initialize_3440;
46323
46324   ---------------------
46325   -- Initialize_3441 --
46326   ---------------------
46327
46328   procedure Initialize_3441 is
46329   begin
46330      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46331       (Base + 3441,
46332        AMF.Internals.Tables.UML_String_Data_0C.MS_0C06'Access);
46333      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3441, (Is_Empty => True));
46334   end Initialize_3441;
46335
46336   ---------------------
46337   -- Initialize_3442 --
46338   ---------------------
46339
46340   procedure Initialize_3442 is
46341   begin
46342      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
46343       (Base + 3442,
46344        AMF.Internals.Tables.UML_String_Data_07.MS_07B8'Access);
46345   end Initialize_3442;
46346
46347   ---------------------
46348   -- Initialize_3443 --
46349   ---------------------
46350
46351   procedure Initialize_3443 is
46352   begin
46353      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3443, (Is_Empty => True));
46354   end Initialize_3443;
46355
46356   ---------------------
46357   -- Initialize_3444 --
46358   ---------------------
46359
46360   procedure Initialize_3444 is
46361   begin
46362      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
46363       (Base + 3444,
46364        AMF.Internals.Tables.UML_String_Data_05.MS_0555'Access);
46365   end Initialize_3444;
46366
46367   ---------------------
46368   -- Initialize_3445 --
46369   ---------------------
46370
46371   procedure Initialize_3445 is
46372   begin
46373      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
46374       (Base + 3445,
46375        AMF.Internals.Tables.UML_String_Data_02.MS_02C5'Access);
46376   end Initialize_3445;
46377
46378   ---------------------
46379   -- Initialize_3446 --
46380   ---------------------
46381
46382   procedure Initialize_3446 is
46383   begin
46384      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
46385       (Base + 3446,
46386        AMF.Internals.Tables.UML_String_Data_0C.MS_0C5E'Access);
46387   end Initialize_3446;
46388
46389   ---------------------
46390   -- Initialize_3447 --
46391   ---------------------
46392
46393   procedure Initialize_3447 is
46394   begin
46395      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46396       (Base + 3447,
46397        AMF.Internals.Tables.UML_String_Data_0B.MS_0BC4'Access);
46398      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3447, (Is_Empty => True));
46399   end Initialize_3447;
46400
46401   ---------------------
46402   -- Initialize_3448 --
46403   ---------------------
46404
46405   procedure Initialize_3448 is
46406   begin
46407      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
46408       (Base + 3448,
46409        AMF.Internals.Tables.UML_String_Data_07.MS_0701'Access);
46410   end Initialize_3448;
46411
46412   ---------------------
46413   -- Initialize_3449 --
46414   ---------------------
46415
46416   procedure Initialize_3449 is
46417   begin
46418      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3449, (Is_Empty => True));
46419   end Initialize_3449;
46420
46421   ---------------------
46422   -- Initialize_3450 --
46423   ---------------------
46424
46425   procedure Initialize_3450 is
46426   begin
46427      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
46428       (Base + 3450,
46429        AMF.Internals.Tables.UML_String_Data_00.MS_0056'Access);
46430   end Initialize_3450;
46431
46432   ---------------------
46433   -- Initialize_3451 --
46434   ---------------------
46435
46436   procedure Initialize_3451 is
46437   begin
46438      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
46439       (Base + 3451,
46440        AMF.Internals.Tables.UML_String_Data_08.MS_0804'Access);
46441   end Initialize_3451;
46442
46443   ---------------------
46444   -- Initialize_3452 --
46445   ---------------------
46446
46447   procedure Initialize_3452 is
46448   begin
46449      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
46450       (Base + 3452,
46451        AMF.Internals.Tables.UML_String_Data_02.MS_0229'Access);
46452   end Initialize_3452;
46453
46454   ---------------------
46455   -- Initialize_3453 --
46456   ---------------------
46457
46458   procedure Initialize_3453 is
46459   begin
46460      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
46461       (Base + 3453,
46462        AMF.Internals.Tables.UML_String_Data_0B.MS_0B6D'Access);
46463   end Initialize_3453;
46464
46465   ---------------------
46466   -- Initialize_3454 --
46467   ---------------------
46468
46469   procedure Initialize_3454 is
46470   begin
46471      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
46472       (Base + 3454,
46473        AMF.Internals.Tables.UML_String_Data_01.MS_015A'Access);
46474   end Initialize_3454;
46475
46476   ---------------------
46477   -- Initialize_3455 --
46478   ---------------------
46479
46480   procedure Initialize_3455 is
46481   begin
46482      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
46483       (Base + 3455,
46484        AMF.Internals.Tables.UML_String_Data_03.MS_037F'Access);
46485   end Initialize_3455;
46486
46487   ---------------------
46488   -- Initialize_3456 --
46489   ---------------------
46490
46491   procedure Initialize_3456 is
46492   begin
46493      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
46494       (Base + 3456,
46495        AMF.Internals.Tables.UML_String_Data_02.MS_023D'Access);
46496   end Initialize_3456;
46497
46498   ---------------------
46499   -- Initialize_3457 --
46500   ---------------------
46501
46502   procedure Initialize_3457 is
46503   begin
46504      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
46505       (Base + 3457,
46506        AMF.Internals.Tables.UML_String_Data_0A.MS_0A05'Access);
46507   end Initialize_3457;
46508
46509   ---------------------
46510   -- Initialize_3458 --
46511   ---------------------
46512
46513   procedure Initialize_3458 is
46514   begin
46515      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3458, True);
46516      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46517       (Base + 3458,
46518        AMF.Internals.Tables.UML_String_Data_00.MS_00D2'Access);
46519      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3458, (False, AMF.CMOF.Public_Visibility));
46520   end Initialize_3458;
46521
46522   ---------------------
46523   -- Initialize_3459 --
46524   ---------------------
46525
46526   procedure Initialize_3459 is
46527   begin
46528      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
46529       (Base + 3459,
46530        AMF.Internals.Tables.UML_String_Data_07.MS_07C8'Access);
46531   end Initialize_3459;
46532
46533   ---------------------
46534   -- Initialize_3460 --
46535   ---------------------
46536
46537   procedure Initialize_3460 is
46538   begin
46539      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46540       (Base + 3460,
46541        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
46542      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3460, (Is_Empty => True));
46543   end Initialize_3460;
46544
46545   ---------------------
46546   -- Initialize_3461 --
46547   ---------------------
46548
46549   procedure Initialize_3461 is
46550   begin
46551      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3461, (Is_Empty => True));
46552   end Initialize_3461;
46553
46554   ---------------------
46555   -- Initialize_3462 --
46556   ---------------------
46557
46558   procedure Initialize_3462 is
46559   begin
46560      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3462, AMF.CMOF.Return_Parameter);
46561      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 3462, (False, 0));
46562      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46563       (Base + 3462,
46564        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
46565      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 3462, (False, (Unlimited => True)));
46566      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3462, (False, AMF.CMOF.Public_Visibility));
46567   end Initialize_3462;
46568
46569   ---------------------
46570   -- Initialize_3463 --
46571   ---------------------
46572
46573   procedure Initialize_3463 is
46574   begin
46575      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3463, True);
46576      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46577       (Base + 3463,
46578        AMF.Internals.Tables.UML_String_Data_05.MS_05B0'Access);
46579      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3463, (False, AMF.CMOF.Public_Visibility));
46580   end Initialize_3463;
46581
46582   ---------------------
46583   -- Initialize_3464 --
46584   ---------------------
46585
46586   procedure Initialize_3464 is
46587   begin
46588      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
46589       (Base + 3464,
46590        AMF.Internals.Tables.UML_String_Data_03.MS_03FF'Access);
46591   end Initialize_3464;
46592
46593   ---------------------
46594   -- Initialize_3465 --
46595   ---------------------
46596
46597   procedure Initialize_3465 is
46598   begin
46599      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46600       (Base + 3465,
46601        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
46602      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3465, (Is_Empty => True));
46603   end Initialize_3465;
46604
46605   ---------------------
46606   -- Initialize_3466 --
46607   ---------------------
46608
46609   procedure Initialize_3466 is
46610   begin
46611      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3466, (Is_Empty => True));
46612   end Initialize_3466;
46613
46614   ---------------------
46615   -- Initialize_3467 --
46616   ---------------------
46617
46618   procedure Initialize_3467 is
46619   begin
46620      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3467, AMF.CMOF.Return_Parameter);
46621      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 3467, (False, 0));
46622      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46623       (Base + 3467,
46624        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
46625      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3467, (False, AMF.CMOF.Public_Visibility));
46626   end Initialize_3467;
46627
46628   ---------------------
46629   -- Initialize_3468 --
46630   ---------------------
46631
46632   procedure Initialize_3468 is
46633   begin
46634      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3468, True);
46635      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46636       (Base + 3468,
46637        AMF.Internals.Tables.UML_String_Data_08.MS_086E'Access);
46638      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3468, (False, AMF.CMOF.Public_Visibility));
46639   end Initialize_3468;
46640
46641   ---------------------
46642   -- Initialize_3469 --
46643   ---------------------
46644
46645   procedure Initialize_3469 is
46646   begin
46647      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
46648       (Base + 3469,
46649        AMF.Internals.Tables.UML_String_Data_00.MS_0061'Access);
46650   end Initialize_3469;
46651
46652   ---------------------
46653   -- Initialize_3470 --
46654   ---------------------
46655
46656   procedure Initialize_3470 is
46657   begin
46658      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46659       (Base + 3470,
46660        AMF.Internals.Tables.UML_String_Data_0B.MS_0BFB'Access);
46661      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3470, (Is_Empty => True));
46662   end Initialize_3470;
46663
46664   ---------------------
46665   -- Initialize_3471 --
46666   ---------------------
46667
46668   procedure Initialize_3471 is
46669   begin
46670      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3471, (Is_Empty => True));
46671   end Initialize_3471;
46672
46673   ---------------------
46674   -- Initialize_3472 --
46675   ---------------------
46676
46677   procedure Initialize_3472 is
46678   begin
46679      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46680       (Base + 3472,
46681        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
46682      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3472, (Is_Empty => True));
46683   end Initialize_3472;
46684
46685   ---------------------
46686   -- Initialize_3473 --
46687   ---------------------
46688
46689   procedure Initialize_3473 is
46690   begin
46691      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3473, (Is_Empty => True));
46692   end Initialize_3473;
46693
46694   ---------------------
46695   -- Initialize_3474 --
46696   ---------------------
46697
46698   procedure Initialize_3474 is
46699   begin
46700      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3474, AMF.CMOF.Return_Parameter);
46701      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46702       (Base + 3474,
46703        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
46704      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3474, (False, AMF.CMOF.Public_Visibility));
46705   end Initialize_3474;
46706
46707   ---------------------
46708   -- Initialize_3475 --
46709   ---------------------
46710
46711   procedure Initialize_3475 is
46712   begin
46713      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3475, AMF.CMOF.In_Parameter);
46714      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46715       (Base + 3475,
46716        AMF.Internals.Tables.UML_String_Data_08.MS_0816'Access);
46717      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3475, (False, AMF.CMOF.Public_Visibility));
46718   end Initialize_3475;
46719
46720   ---------------------
46721   -- Initialize_3476 --
46722   ---------------------
46723
46724   procedure Initialize_3476 is
46725   begin
46726      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3476, True);
46727      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46728       (Base + 3476,
46729        AMF.Internals.Tables.UML_String_Data_04.MS_040A'Access);
46730      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3476, (False, AMF.CMOF.Public_Visibility));
46731   end Initialize_3476;
46732
46733   ---------------------
46734   -- Initialize_3477 --
46735   ---------------------
46736
46737   procedure Initialize_3477 is
46738   begin
46739      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
46740       (Base + 3477,
46741        AMF.Internals.Tables.UML_String_Data_07.MS_079A'Access);
46742   end Initialize_3477;
46743
46744   ---------------------
46745   -- Initialize_3478 --
46746   ---------------------
46747
46748   procedure Initialize_3478 is
46749   begin
46750      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46751       (Base + 3478,
46752        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
46753      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3478, (Is_Empty => True));
46754   end Initialize_3478;
46755
46756   ---------------------
46757   -- Initialize_3479 --
46758   ---------------------
46759
46760   procedure Initialize_3479 is
46761   begin
46762      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3479, (Is_Empty => True));
46763   end Initialize_3479;
46764
46765   ---------------------
46766   -- Initialize_3480 --
46767   ---------------------
46768
46769   procedure Initialize_3480 is
46770   begin
46771      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3480, AMF.CMOF.Return_Parameter);
46772      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46773       (Base + 3480,
46774        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
46775      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3480, (False, AMF.CMOF.Public_Visibility));
46776   end Initialize_3480;
46777
46778   ---------------------
46779   -- Initialize_3481 --
46780   ---------------------
46781
46782   procedure Initialize_3481 is
46783   begin
46784      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3481, True);
46785      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46786       (Base + 3481,
46787        AMF.Internals.Tables.UML_String_Data_08.MS_084D'Access);
46788      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3481, (False, AMF.CMOF.Public_Visibility));
46789   end Initialize_3481;
46790
46791   ---------------------
46792   -- Initialize_3482 --
46793   ---------------------
46794
46795   procedure Initialize_3482 is
46796   begin
46797      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
46798       (Base + 3482,
46799        AMF.Internals.Tables.UML_String_Data_01.MS_0128'Access);
46800   end Initialize_3482;
46801
46802   ---------------------
46803   -- Initialize_3483 --
46804   ---------------------
46805
46806   procedure Initialize_3483 is
46807   begin
46808      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46809       (Base + 3483,
46810        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
46811      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3483, (Is_Empty => True));
46812   end Initialize_3483;
46813
46814   ---------------------
46815   -- Initialize_3484 --
46816   ---------------------
46817
46818   procedure Initialize_3484 is
46819   begin
46820      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3484, (Is_Empty => True));
46821   end Initialize_3484;
46822
46823   ---------------------
46824   -- Initialize_3485 --
46825   ---------------------
46826
46827   procedure Initialize_3485 is
46828   begin
46829      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3485, AMF.CMOF.Return_Parameter);
46830      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 3485, (False, 0));
46831      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46832       (Base + 3485,
46833        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
46834      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 3485, (False, (Unlimited => True)));
46835      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3485, (False, AMF.CMOF.Public_Visibility));
46836   end Initialize_3485;
46837
46838   ---------------------
46839   -- Initialize_3486 --
46840   ---------------------
46841
46842   procedure Initialize_3486 is
46843   begin
46844      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3486, True);
46845      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46846       (Base + 3486,
46847        AMF.Internals.Tables.UML_String_Data_08.MS_0866'Access);
46848      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3486, (False, AMF.CMOF.Public_Visibility));
46849   end Initialize_3486;
46850
46851   ---------------------
46852   -- Initialize_3487 --
46853   ---------------------
46854
46855   procedure Initialize_3487 is
46856   begin
46857      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
46858       (Base + 3487,
46859        AMF.Internals.Tables.UML_String_Data_04.MS_04F5'Access);
46860   end Initialize_3487;
46861
46862   ---------------------
46863   -- Initialize_3488 --
46864   ---------------------
46865
46866   procedure Initialize_3488 is
46867   begin
46868      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46869       (Base + 3488,
46870        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
46871      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3488, (Is_Empty => True));
46872   end Initialize_3488;
46873
46874   ---------------------
46875   -- Initialize_3489 --
46876   ---------------------
46877
46878   procedure Initialize_3489 is
46879   begin
46880      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3489, (Is_Empty => True));
46881   end Initialize_3489;
46882
46883   ---------------------
46884   -- Initialize_3490 --
46885   ---------------------
46886
46887   procedure Initialize_3490 is
46888   begin
46889      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3490, AMF.CMOF.Return_Parameter);
46890      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 3490, (False, 0));
46891      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46892       (Base + 3490,
46893        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
46894      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 3490, (False, (Unlimited => True)));
46895      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3490, (False, AMF.CMOF.Public_Visibility));
46896   end Initialize_3490;
46897
46898   ---------------------
46899   -- Initialize_3491 --
46900   ---------------------
46901
46902   procedure Initialize_3491 is
46903   begin
46904      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3491, True);
46905      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46906       (Base + 3491,
46907        AMF.Internals.Tables.UML_String_Data_03.MS_03AC'Access);
46908      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3491, (False, AMF.CMOF.Public_Visibility));
46909   end Initialize_3491;
46910
46911   ---------------------
46912   -- Initialize_3492 --
46913   ---------------------
46914
46915   procedure Initialize_3492 is
46916   begin
46917      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
46918       (Base + 3492,
46919        AMF.Internals.Tables.UML_String_Data_00.MS_0005'Access);
46920   end Initialize_3492;
46921
46922   ---------------------
46923   -- Initialize_3493 --
46924   ---------------------
46925
46926   procedure Initialize_3493 is
46927   begin
46928      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46929       (Base + 3493,
46930        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
46931      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3493, (Is_Empty => True));
46932   end Initialize_3493;
46933
46934   ---------------------
46935   -- Initialize_3494 --
46936   ---------------------
46937
46938   procedure Initialize_3494 is
46939   begin
46940      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3494, (Is_Empty => True));
46941   end Initialize_3494;
46942
46943   ---------------------
46944   -- Initialize_3495 --
46945   ---------------------
46946
46947   procedure Initialize_3495 is
46948   begin
46949      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3495, AMF.CMOF.Return_Parameter);
46950      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 3495, (False, 0));
46951      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46952       (Base + 3495,
46953        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
46954      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 3495, (False, (Unlimited => True)));
46955      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3495, (False, AMF.CMOF.Public_Visibility));
46956   end Initialize_3495;
46957
46958   ---------------------
46959   -- Initialize_3496 --
46960   ---------------------
46961
46962   procedure Initialize_3496 is
46963   begin
46964      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3496, True);
46965      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46966       (Base + 3496,
46967        AMF.Internals.Tables.UML_String_Data_03.MS_03E1'Access);
46968      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3496, (False, AMF.CMOF.Public_Visibility));
46969   end Initialize_3496;
46970
46971   ---------------------
46972   -- Initialize_3497 --
46973   ---------------------
46974
46975   procedure Initialize_3497 is
46976   begin
46977      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
46978       (Base + 3497,
46979        AMF.Internals.Tables.UML_String_Data_04.MS_04D4'Access);
46980   end Initialize_3497;
46981
46982   ---------------------
46983   -- Initialize_3498 --
46984   ---------------------
46985
46986   procedure Initialize_3498 is
46987   begin
46988      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
46989       (Base + 3498,
46990        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
46991      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3498, (Is_Empty => True));
46992   end Initialize_3498;
46993
46994   ---------------------
46995   -- Initialize_3499 --
46996   ---------------------
46997
46998   procedure Initialize_3499 is
46999   begin
47000      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3499, (Is_Empty => True));
47001   end Initialize_3499;
47002
47003   ---------------------
47004   -- Initialize_3500 --
47005   ---------------------
47006
47007   procedure Initialize_3500 is
47008   begin
47009      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3500, AMF.CMOF.Return_Parameter);
47010      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 3500, (False, 0));
47011      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
47012       (Base + 3500,
47013        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
47014      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 3500, (False, (Unlimited => True)));
47015      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3500, (False, AMF.CMOF.Public_Visibility));
47016   end Initialize_3500;
47017
47018   ---------------------
47019   -- Initialize_3501 --
47020   ---------------------
47021
47022   procedure Initialize_3501 is
47023   begin
47024      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47025       (Base + 3501,
47026        AMF.Internals.Tables.UML_String_Data_06.MS_0647'Access);
47027   end Initialize_3501;
47028
47029   ---------------------
47030   -- Initialize_3502 --
47031   ---------------------
47032
47033   procedure Initialize_3502 is
47034   begin
47035      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
47036       (Base + 3502,
47037        AMF.Internals.Tables.UML_String_Data_05.MS_0513'Access);
47038      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3502, (Is_Empty => True));
47039   end Initialize_3502;
47040
47041   ---------------------
47042   -- Initialize_3503 --
47043   ---------------------
47044
47045   procedure Initialize_3503 is
47046   begin
47047      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47048       (Base + 3503,
47049        AMF.Internals.Tables.UML_String_Data_0A.MS_0A02'Access);
47050   end Initialize_3503;
47051
47052   ---------------------
47053   -- Initialize_3504 --
47054   ---------------------
47055
47056   procedure Initialize_3504 is
47057   begin
47058      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3504, (Is_Empty => True));
47059   end Initialize_3504;
47060
47061   ---------------------
47062   -- Initialize_3505 --
47063   ---------------------
47064
47065   procedure Initialize_3505 is
47066   begin
47067      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47068       (Base + 3505,
47069        AMF.Internals.Tables.UML_String_Data_08.MS_085A'Access);
47070   end Initialize_3505;
47071
47072   ---------------------
47073   -- Initialize_3506 --
47074   ---------------------
47075
47076   procedure Initialize_3506 is
47077   begin
47078      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47079       (Base + 3506,
47080        AMF.Internals.Tables.UML_String_Data_07.MS_07F4'Access);
47081   end Initialize_3506;
47082
47083   ---------------------
47084   -- Initialize_3507 --
47085   ---------------------
47086
47087   procedure Initialize_3507 is
47088   begin
47089      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47090       (Base + 3507,
47091        AMF.Internals.Tables.UML_String_Data_0B.MS_0BBF'Access);
47092   end Initialize_3507;
47093
47094   ---------------------
47095   -- Initialize_3508 --
47096   ---------------------
47097
47098   procedure Initialize_3508 is
47099   begin
47100      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47101       (Base + 3508,
47102        AMF.Internals.Tables.UML_String_Data_02.MS_02B7'Access);
47103   end Initialize_3508;
47104
47105   ---------------------
47106   -- Initialize_3509 --
47107   ---------------------
47108
47109   procedure Initialize_3509 is
47110   begin
47111      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47112       (Base + 3509,
47113        AMF.Internals.Tables.UML_String_Data_0C.MS_0C48'Access);
47114   end Initialize_3509;
47115
47116   ---------------------
47117   -- Initialize_3510 --
47118   ---------------------
47119
47120   procedure Initialize_3510 is
47121   begin
47122      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47123       (Base + 3510,
47124        AMF.Internals.Tables.UML_String_Data_05.MS_056E'Access);
47125   end Initialize_3510;
47126
47127   ---------------------
47128   -- Initialize_3511 --
47129   ---------------------
47130
47131   procedure Initialize_3511 is
47132   begin
47133      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47134       (Base + 3511,
47135        AMF.Internals.Tables.UML_String_Data_0A.MS_0AE6'Access);
47136   end Initialize_3511;
47137
47138   ---------------------
47139   -- Initialize_3512 --
47140   ---------------------
47141
47142   procedure Initialize_3512 is
47143   begin
47144      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47145       (Base + 3512,
47146        AMF.Internals.Tables.UML_String_Data_0A.MS_0A65'Access);
47147   end Initialize_3512;
47148
47149   ---------------------
47150   -- Initialize_3513 --
47151   ---------------------
47152
47153   procedure Initialize_3513 is
47154   begin
47155      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47156       (Base + 3513,
47157        AMF.Internals.Tables.UML_String_Data_05.MS_0587'Access);
47158   end Initialize_3513;
47159
47160   ---------------------
47161   -- Initialize_3514 --
47162   ---------------------
47163
47164   procedure Initialize_3514 is
47165   begin
47166      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47167       (Base + 3514,
47168        AMF.Internals.Tables.UML_String_Data_00.MS_006F'Access);
47169   end Initialize_3514;
47170
47171   ---------------------
47172   -- Initialize_3515 --
47173   ---------------------
47174
47175   procedure Initialize_3515 is
47176   begin
47177      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47178       (Base + 3515,
47179        AMF.Internals.Tables.UML_String_Data_03.MS_032D'Access);
47180   end Initialize_3515;
47181
47182   ---------------------
47183   -- Initialize_3516 --
47184   ---------------------
47185
47186   procedure Initialize_3516 is
47187   begin
47188      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47189       (Base + 3516,
47190        AMF.Internals.Tables.UML_String_Data_09.MS_095A'Access);
47191   end Initialize_3516;
47192
47193   ---------------------
47194   -- Initialize_3517 --
47195   ---------------------
47196
47197   procedure Initialize_3517 is
47198   begin
47199      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
47200       (Base + 3517,
47201        AMF.Internals.Tables.UML_String_Data_06.MS_063E'Access);
47202      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3517, (Is_Empty => True));
47203   end Initialize_3517;
47204
47205   ---------------------
47206   -- Initialize_3518 --
47207   ---------------------
47208
47209   procedure Initialize_3518 is
47210   begin
47211      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47212       (Base + 3518,
47213        AMF.Internals.Tables.UML_String_Data_02.MS_028E'Access);
47214   end Initialize_3518;
47215
47216   ---------------------
47217   -- Initialize_3519 --
47218   ---------------------
47219
47220   procedure Initialize_3519 is
47221   begin
47222      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3519, (Is_Empty => True));
47223   end Initialize_3519;
47224
47225   ---------------------
47226   -- Initialize_3520 --
47227   ---------------------
47228
47229   procedure Initialize_3520 is
47230   begin
47231      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
47232       (Base + 3520,
47233        AMF.Internals.Tables.UML_String_Data_07.MS_07A3'Access);
47234      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3520, (Is_Empty => True));
47235   end Initialize_3520;
47236
47237   ---------------------
47238   -- Initialize_3521 --
47239   ---------------------
47240
47241   procedure Initialize_3521 is
47242   begin
47243      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47244       (Base + 3521,
47245        AMF.Internals.Tables.UML_String_Data_0B.MS_0BF8'Access);
47246   end Initialize_3521;
47247
47248   ---------------------
47249   -- Initialize_3522 --
47250   ---------------------
47251
47252   procedure Initialize_3522 is
47253   begin
47254      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3522, (Is_Empty => True));
47255   end Initialize_3522;
47256
47257   ---------------------
47258   -- Initialize_3523 --
47259   ---------------------
47260
47261   procedure Initialize_3523 is
47262   begin
47263      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
47264       (Base + 3523,
47265        AMF.Internals.Tables.UML_String_Data_05.MS_0530'Access);
47266      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3523, (Is_Empty => True));
47267   end Initialize_3523;
47268
47269   ---------------------
47270   -- Initialize_3524 --
47271   ---------------------
47272
47273   procedure Initialize_3524 is
47274   begin
47275      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47276       (Base + 3524,
47277        AMF.Internals.Tables.UML_String_Data_09.MS_098A'Access);
47278   end Initialize_3524;
47279
47280   ---------------------
47281   -- Initialize_3525 --
47282   ---------------------
47283
47284   procedure Initialize_3525 is
47285   begin
47286      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3525, (Is_Empty => True));
47287   end Initialize_3525;
47288
47289   ---------------------
47290   -- Initialize_3526 --
47291   ---------------------
47292
47293   procedure Initialize_3526 is
47294   begin
47295      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
47296       (Base + 3526,
47297        AMF.Internals.Tables.UML_String_Data_0C.MS_0C36'Access);
47298      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3526, (Is_Empty => True));
47299   end Initialize_3526;
47300
47301   ---------------------
47302   -- Initialize_3527 --
47303   ---------------------
47304
47305   procedure Initialize_3527 is
47306   begin
47307      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47308       (Base + 3527,
47309        AMF.Internals.Tables.UML_String_Data_04.MS_04CA'Access);
47310   end Initialize_3527;
47311
47312   ---------------------
47313   -- Initialize_3528 --
47314   ---------------------
47315
47316   procedure Initialize_3528 is
47317   begin
47318      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3528, (Is_Empty => True));
47319   end Initialize_3528;
47320
47321   ---------------------
47322   -- Initialize_3529 --
47323   ---------------------
47324
47325   procedure Initialize_3529 is
47326   begin
47327      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
47328       (Base + 3529,
47329        AMF.Internals.Tables.UML_String_Data_0C.MS_0C90'Access);
47330      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3529, (Is_Empty => True));
47331   end Initialize_3529;
47332
47333   ---------------------
47334   -- Initialize_3530 --
47335   ---------------------
47336
47337   procedure Initialize_3530 is
47338   begin
47339      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47340       (Base + 3530,
47341        AMF.Internals.Tables.UML_String_Data_04.MS_042B'Access);
47342   end Initialize_3530;
47343
47344   ---------------------
47345   -- Initialize_3531 --
47346   ---------------------
47347
47348   procedure Initialize_3531 is
47349   begin
47350      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3531, (Is_Empty => True));
47351   end Initialize_3531;
47352
47353   ---------------------
47354   -- Initialize_3532 --
47355   ---------------------
47356
47357   procedure Initialize_3532 is
47358   begin
47359      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47360       (Base + 3532,
47361        AMF.Internals.Tables.UML_String_Data_06.MS_063B'Access);
47362   end Initialize_3532;
47363
47364   ---------------------
47365   -- Initialize_3533 --
47366   ---------------------
47367
47368   procedure Initialize_3533 is
47369   begin
47370      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47371       (Base + 3533,
47372        AMF.Internals.Tables.UML_String_Data_0C.MS_0C59'Access);
47373   end Initialize_3533;
47374
47375   ---------------------
47376   -- Initialize_3534 --
47377   ---------------------
47378
47379   procedure Initialize_3534 is
47380   begin
47381      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47382       (Base + 3534,
47383        AMF.Internals.Tables.UML_String_Data_06.MS_06D7'Access);
47384   end Initialize_3534;
47385
47386   ---------------------
47387   -- Initialize_3535 --
47388   ---------------------
47389
47390   procedure Initialize_3535 is
47391   begin
47392      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47393       (Base + 3535,
47394        AMF.Internals.Tables.UML_String_Data_01.MS_0111'Access);
47395   end Initialize_3535;
47396
47397   ---------------------
47398   -- Initialize_3536 --
47399   ---------------------
47400
47401   procedure Initialize_3536 is
47402   begin
47403      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47404       (Base + 3536,
47405        AMF.Internals.Tables.UML_String_Data_0B.MS_0BC2'Access);
47406   end Initialize_3536;
47407
47408   ---------------------
47409   -- Initialize_3537 --
47410   ---------------------
47411
47412   procedure Initialize_3537 is
47413   begin
47414      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47415       (Base + 3537,
47416        AMF.Internals.Tables.UML_String_Data_08.MS_08E7'Access);
47417   end Initialize_3537;
47418
47419   ---------------------
47420   -- Initialize_3538 --
47421   ---------------------
47422
47423   procedure Initialize_3538 is
47424   begin
47425      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47426       (Base + 3538,
47427        AMF.Internals.Tables.UML_String_Data_04.MS_04A0'Access);
47428   end Initialize_3538;
47429
47430   ---------------------
47431   -- Initialize_3539 --
47432   ---------------------
47433
47434   procedure Initialize_3539 is
47435   begin
47436      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47437       (Base + 3539,
47438        AMF.Internals.Tables.UML_String_Data_00.MS_00C3'Access);
47439   end Initialize_3539;
47440
47441   ---------------------
47442   -- Initialize_3540 --
47443   ---------------------
47444
47445   procedure Initialize_3540 is
47446   begin
47447      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3540, True);
47448      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
47449       (Base + 3540,
47450        AMF.Internals.Tables.UML_String_Data_00.MS_00FB'Access);
47451      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3540, (False, AMF.CMOF.Public_Visibility));
47452   end Initialize_3540;
47453
47454   ---------------------
47455   -- Initialize_3541 --
47456   ---------------------
47457
47458   procedure Initialize_3541 is
47459   begin
47460      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47461       (Base + 3541,
47462        AMF.Internals.Tables.UML_String_Data_09.MS_0966'Access);
47463   end Initialize_3541;
47464
47465   ---------------------
47466   -- Initialize_3542 --
47467   ---------------------
47468
47469   procedure Initialize_3542 is
47470   begin
47471      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
47472       (Base + 3542,
47473        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
47474      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3542, (Is_Empty => True));
47475   end Initialize_3542;
47476
47477   ---------------------
47478   -- Initialize_3543 --
47479   ---------------------
47480
47481   procedure Initialize_3543 is
47482   begin
47483      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3543, (Is_Empty => True));
47484   end Initialize_3543;
47485
47486   ---------------------
47487   -- Initialize_3544 --
47488   ---------------------
47489
47490   procedure Initialize_3544 is
47491   begin
47492      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3544, AMF.CMOF.Return_Parameter);
47493      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 3544, (False, 0));
47494      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
47495       (Base + 3544,
47496        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
47497      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3544, (False, AMF.CMOF.Public_Visibility));
47498   end Initialize_3544;
47499
47500   ---------------------
47501   -- Initialize_3545 --
47502   ---------------------
47503
47504   procedure Initialize_3545 is
47505   begin
47506      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47507       (Base + 3545,
47508        AMF.Internals.Tables.UML_String_Data_0A.MS_0AEB'Access);
47509   end Initialize_3545;
47510
47511   ---------------------
47512   -- Initialize_3546 --
47513   ---------------------
47514
47515   procedure Initialize_3546 is
47516   begin
47517      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
47518       (Base + 3546,
47519        AMF.Internals.Tables.UML_String_Data_05.MS_0553'Access);
47520      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3546, (Is_Empty => True));
47521   end Initialize_3546;
47522
47523   ---------------------
47524   -- Initialize_3547 --
47525   ---------------------
47526
47527   procedure Initialize_3547 is
47528   begin
47529      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47530       (Base + 3547,
47531        AMF.Internals.Tables.UML_String_Data_02.MS_0243'Access);
47532   end Initialize_3547;
47533
47534   ---------------------
47535   -- Initialize_3548 --
47536   ---------------------
47537
47538   procedure Initialize_3548 is
47539   begin
47540      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3548, (Is_Empty => True));
47541   end Initialize_3548;
47542
47543   ---------------------
47544   -- Initialize_3549 --
47545   ---------------------
47546
47547   procedure Initialize_3549 is
47548   begin
47549      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
47550       (Base + 3549,
47551        AMF.Internals.Tables.UML_String_Data_05.MS_0576'Access);
47552      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3549, (Is_Empty => True));
47553   end Initialize_3549;
47554
47555   ---------------------
47556   -- Initialize_3550 --
47557   ---------------------
47558
47559   procedure Initialize_3550 is
47560   begin
47561      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47562       (Base + 3550,
47563        AMF.Internals.Tables.UML_String_Data_06.MS_0662'Access);
47564   end Initialize_3550;
47565
47566   ---------------------
47567   -- Initialize_3551 --
47568   ---------------------
47569
47570   procedure Initialize_3551 is
47571   begin
47572      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3551, (Is_Empty => True));
47573   end Initialize_3551;
47574
47575   ---------------------
47576   -- Initialize_3552 --
47577   ---------------------
47578
47579   procedure Initialize_3552 is
47580   begin
47581      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
47582       (Base + 3552,
47583        AMF.Internals.Tables.UML_String_Data_05.MS_056B'Access);
47584      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3552, (Is_Empty => True));
47585   end Initialize_3552;
47586
47587   ---------------------
47588   -- Initialize_3553 --
47589   ---------------------
47590
47591   procedure Initialize_3553 is
47592   begin
47593      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47594       (Base + 3553,
47595        AMF.Internals.Tables.UML_String_Data_01.MS_01D2'Access);
47596   end Initialize_3553;
47597
47598   ---------------------
47599   -- Initialize_3554 --
47600   ---------------------
47601
47602   procedure Initialize_3554 is
47603   begin
47604      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3554, (Is_Empty => True));
47605   end Initialize_3554;
47606
47607   ---------------------
47608   -- Initialize_3555 --
47609   ---------------------
47610
47611   procedure Initialize_3555 is
47612   begin
47613      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47614       (Base + 3555,
47615        AMF.Internals.Tables.UML_String_Data_07.MS_0735'Access);
47616   end Initialize_3555;
47617
47618   ---------------------
47619   -- Initialize_3556 --
47620   ---------------------
47621
47622   procedure Initialize_3556 is
47623   begin
47624      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47625       (Base + 3556,
47626        AMF.Internals.Tables.UML_String_Data_05.MS_05D7'Access);
47627   end Initialize_3556;
47628
47629   ---------------------
47630   -- Initialize_3557 --
47631   ---------------------
47632
47633   procedure Initialize_3557 is
47634   begin
47635      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47636       (Base + 3557,
47637        AMF.Internals.Tables.UML_String_Data_01.MS_019E'Access);
47638   end Initialize_3557;
47639
47640   ---------------------
47641   -- Initialize_3558 --
47642   ---------------------
47643
47644   procedure Initialize_3558 is
47645   begin
47646      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47647       (Base + 3558,
47648        AMF.Internals.Tables.UML_String_Data_01.MS_0175'Access);
47649   end Initialize_3558;
47650
47651   ---------------------
47652   -- Initialize_3559 --
47653   ---------------------
47654
47655   procedure Initialize_3559 is
47656   begin
47657      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47658       (Base + 3559,
47659        AMF.Internals.Tables.UML_String_Data_07.MS_07A5'Access);
47660   end Initialize_3559;
47661
47662   ---------------------
47663   -- Initialize_3560 --
47664   ---------------------
47665
47666   procedure Initialize_3560 is
47667   begin
47668      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3560, True);
47669      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
47670       (Base + 3560,
47671        AMF.Internals.Tables.UML_String_Data_08.MS_0820'Access);
47672      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3560, (False, AMF.CMOF.Public_Visibility));
47673   end Initialize_3560;
47674
47675   ---------------------
47676   -- Initialize_3561 --
47677   ---------------------
47678
47679   procedure Initialize_3561 is
47680   begin
47681      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47682       (Base + 3561,
47683        AMF.Internals.Tables.UML_String_Data_02.MS_02DB'Access);
47684   end Initialize_3561;
47685
47686   ---------------------
47687   -- Initialize_3562 --
47688   ---------------------
47689
47690   procedure Initialize_3562 is
47691   begin
47692      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
47693       (Base + 3562,
47694        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
47695      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3562, (Is_Empty => True));
47696   end Initialize_3562;
47697
47698   ---------------------
47699   -- Initialize_3563 --
47700   ---------------------
47701
47702   procedure Initialize_3563 is
47703   begin
47704      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3563, (Is_Empty => True));
47705   end Initialize_3563;
47706
47707   ---------------------
47708   -- Initialize_3564 --
47709   ---------------------
47710
47711   procedure Initialize_3564 is
47712   begin
47713      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3564, AMF.CMOF.Return_Parameter);
47714      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
47715       (Base + 3564,
47716        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
47717      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3564, (False, AMF.CMOF.Public_Visibility));
47718   end Initialize_3564;
47719
47720   ---------------------
47721   -- Initialize_3565 --
47722   ---------------------
47723
47724   procedure Initialize_3565 is
47725   begin
47726      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3565, AMF.CMOF.In_Parameter);
47727      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
47728       (Base + 3565,
47729        AMF.Internals.Tables.UML_String_Data_01.MS_01C3'Access);
47730      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3565, (False, AMF.CMOF.Public_Visibility));
47731   end Initialize_3565;
47732
47733   ---------------------
47734   -- Initialize_3566 --
47735   ---------------------
47736
47737   procedure Initialize_3566 is
47738   begin
47739      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3566, True);
47740      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
47741       (Base + 3566,
47742        AMF.Internals.Tables.UML_String_Data_03.MS_0397'Access);
47743      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3566, (False, AMF.CMOF.Public_Visibility));
47744   end Initialize_3566;
47745
47746   ---------------------
47747   -- Initialize_3567 --
47748   ---------------------
47749
47750   procedure Initialize_3567 is
47751   begin
47752      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47753       (Base + 3567,
47754        AMF.Internals.Tables.UML_String_Data_05.MS_05A6'Access);
47755   end Initialize_3567;
47756
47757   ---------------------
47758   -- Initialize_3568 --
47759   ---------------------
47760
47761   procedure Initialize_3568 is
47762   begin
47763      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
47764       (Base + 3568,
47765        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
47766      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3568, (Is_Empty => True));
47767   end Initialize_3568;
47768
47769   ---------------------
47770   -- Initialize_3569 --
47771   ---------------------
47772
47773   procedure Initialize_3569 is
47774   begin
47775      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3569, (Is_Empty => True));
47776   end Initialize_3569;
47777
47778   ---------------------
47779   -- Initialize_3570 --
47780   ---------------------
47781
47782   procedure Initialize_3570 is
47783   begin
47784      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3570, AMF.CMOF.Return_Parameter);
47785      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
47786       (Base + 3570,
47787        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
47788      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3570, (False, AMF.CMOF.Public_Visibility));
47789   end Initialize_3570;
47790
47791   ---------------------
47792   -- Initialize_3571 --
47793   ---------------------
47794
47795   procedure Initialize_3571 is
47796   begin
47797      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47798       (Base + 3571,
47799        AMF.Internals.Tables.UML_String_Data_09.MS_095C'Access);
47800   end Initialize_3571;
47801
47802   ---------------------
47803   -- Initialize_3572 --
47804   ---------------------
47805
47806   procedure Initialize_3572 is
47807   begin
47808      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
47809       (Base + 3572,
47810        AMF.Internals.Tables.UML_String_Data_0A.MS_0A91'Access);
47811      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3572, (Is_Empty => True));
47812   end Initialize_3572;
47813
47814   ---------------------
47815   -- Initialize_3573 --
47816   ---------------------
47817
47818   procedure Initialize_3573 is
47819   begin
47820      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47821       (Base + 3573,
47822        AMF.Internals.Tables.UML_String_Data_0C.MS_0C92'Access);
47823   end Initialize_3573;
47824
47825   ---------------------
47826   -- Initialize_3574 --
47827   ---------------------
47828
47829   procedure Initialize_3574 is
47830   begin
47831      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3574, (Is_Empty => True));
47832   end Initialize_3574;
47833
47834   ---------------------
47835   -- Initialize_3575 --
47836   ---------------------
47837
47838   procedure Initialize_3575 is
47839   begin
47840      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
47841       (Base + 3575,
47842        AMF.Internals.Tables.UML_String_Data_01.MS_0188'Access);
47843      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3575, (Is_Empty => True));
47844   end Initialize_3575;
47845
47846   ---------------------
47847   -- Initialize_3576 --
47848   ---------------------
47849
47850   procedure Initialize_3576 is
47851   begin
47852      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47853       (Base + 3576,
47854        AMF.Internals.Tables.UML_String_Data_08.MS_080A'Access);
47855   end Initialize_3576;
47856
47857   ---------------------
47858   -- Initialize_3577 --
47859   ---------------------
47860
47861   procedure Initialize_3577 is
47862   begin
47863      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3577, (Is_Empty => True));
47864   end Initialize_3577;
47865
47866   ---------------------
47867   -- Initialize_3578 --
47868   ---------------------
47869
47870   procedure Initialize_3578 is
47871   begin
47872      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
47873       (Base + 3578,
47874        AMF.Internals.Tables.UML_String_Data_0A.MS_0AA0'Access);
47875      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3578, (Is_Empty => True));
47876   end Initialize_3578;
47877
47878   ---------------------
47879   -- Initialize_3579 --
47880   ---------------------
47881
47882   procedure Initialize_3579 is
47883   begin
47884      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47885       (Base + 3579,
47886        AMF.Internals.Tables.UML_String_Data_03.MS_0332'Access);
47887   end Initialize_3579;
47888
47889   ---------------------
47890   -- Initialize_3580 --
47891   ---------------------
47892
47893   procedure Initialize_3580 is
47894   begin
47895      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3580, (Is_Empty => True));
47896   end Initialize_3580;
47897
47898   ---------------------
47899   -- Initialize_3581 --
47900   ---------------------
47901
47902   procedure Initialize_3581 is
47903   begin
47904      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47905       (Base + 3581,
47906        AMF.Internals.Tables.UML_String_Data_0C.MS_0C61'Access);
47907   end Initialize_3581;
47908
47909   ---------------------
47910   -- Initialize_3582 --
47911   ---------------------
47912
47913   procedure Initialize_3582 is
47914   begin
47915      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47916       (Base + 3582,
47917        AMF.Internals.Tables.UML_String_Data_08.MS_08A4'Access);
47918   end Initialize_3582;
47919
47920   ---------------------
47921   -- Initialize_3583 --
47922   ---------------------
47923
47924   procedure Initialize_3583 is
47925   begin
47926      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
47927       (Base + 3583,
47928        AMF.Internals.Tables.UML_String_Data_04.MS_0446'Access);
47929      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3583, (Is_Empty => True));
47930   end Initialize_3583;
47931
47932   ---------------------
47933   -- Initialize_3584 --
47934   ---------------------
47935
47936   procedure Initialize_3584 is
47937   begin
47938      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47939       (Base + 3584,
47940        AMF.Internals.Tables.UML_String_Data_09.MS_0988'Access);
47941   end Initialize_3584;
47942
47943   ---------------------
47944   -- Initialize_3585 --
47945   ---------------------
47946
47947   procedure Initialize_3585 is
47948   begin
47949      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3585, (Is_Empty => True));
47950   end Initialize_3585;
47951
47952   ---------------------
47953   -- Initialize_3586 --
47954   ---------------------
47955
47956   procedure Initialize_3586 is
47957   begin
47958      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47959       (Base + 3586,
47960        AMF.Internals.Tables.UML_String_Data_05.MS_0579'Access);
47961   end Initialize_3586;
47962
47963   ---------------------
47964   -- Initialize_3587 --
47965   ---------------------
47966
47967   procedure Initialize_3587 is
47968   begin
47969      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47970       (Base + 3587,
47971        AMF.Internals.Tables.UML_String_Data_07.MS_07EB'Access);
47972   end Initialize_3587;
47973
47974   ---------------------
47975   -- Initialize_3588 --
47976   ---------------------
47977
47978   procedure Initialize_3588 is
47979   begin
47980      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
47981       (Base + 3588,
47982        AMF.Internals.Tables.UML_String_Data_03.MS_0371'Access);
47983   end Initialize_3588;
47984
47985   ---------------------
47986   -- Initialize_3589 --
47987   ---------------------
47988
47989   procedure Initialize_3589 is
47990   begin
47991      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
47992       (Base + 3589,
47993        AMF.Internals.Tables.UML_String_Data_05.MS_056C'Access);
47994      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3589, (Is_Empty => True));
47995   end Initialize_3589;
47996
47997   ---------------------
47998   -- Initialize_3590 --
47999   ---------------------
48000
48001   procedure Initialize_3590 is
48002   begin
48003      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48004       (Base + 3590,
48005        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD8'Access);
48006   end Initialize_3590;
48007
48008   ---------------------
48009   -- Initialize_3591 --
48010   ---------------------
48011
48012   procedure Initialize_3591 is
48013   begin
48014      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3591, (Is_Empty => True));
48015   end Initialize_3591;
48016
48017   ---------------------
48018   -- Initialize_3592 --
48019   ---------------------
48020
48021   procedure Initialize_3592 is
48022   begin
48023      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
48024       (Base + 3592,
48025        AMF.Internals.Tables.UML_String_Data_06.MS_0642'Access);
48026      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3592, (Is_Empty => True));
48027   end Initialize_3592;
48028
48029   ---------------------
48030   -- Initialize_3593 --
48031   ---------------------
48032
48033   procedure Initialize_3593 is
48034   begin
48035      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48036       (Base + 3593,
48037        AMF.Internals.Tables.UML_String_Data_02.MS_027C'Access);
48038   end Initialize_3593;
48039
48040   ---------------------
48041   -- Initialize_3594 --
48042   ---------------------
48043
48044   procedure Initialize_3594 is
48045   begin
48046      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3594, (Is_Empty => True));
48047   end Initialize_3594;
48048
48049   ---------------------
48050   -- Initialize_3595 --
48051   ---------------------
48052
48053   procedure Initialize_3595 is
48054   begin
48055      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
48056       (Base + 3595,
48057        AMF.Internals.Tables.UML_String_Data_04.MS_0456'Access);
48058      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3595, (Is_Empty => True));
48059   end Initialize_3595;
48060
48061   ---------------------
48062   -- Initialize_3596 --
48063   ---------------------
48064
48065   procedure Initialize_3596 is
48066   begin
48067      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48068       (Base + 3596,
48069        AMF.Internals.Tables.UML_String_Data_07.MS_07C4'Access);
48070   end Initialize_3596;
48071
48072   ---------------------
48073   -- Initialize_3597 --
48074   ---------------------
48075
48076   procedure Initialize_3597 is
48077   begin
48078      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3597, (Is_Empty => True));
48079   end Initialize_3597;
48080
48081   ---------------------
48082   -- Initialize_3598 --
48083   ---------------------
48084
48085   procedure Initialize_3598 is
48086   begin
48087      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48088       (Base + 3598,
48089        AMF.Internals.Tables.UML_String_Data_09.MS_09A9'Access);
48090   end Initialize_3598;
48091
48092   ---------------------
48093   -- Initialize_3599 --
48094   ---------------------
48095
48096   procedure Initialize_3599 is
48097   begin
48098      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48099       (Base + 3599,
48100        AMF.Internals.Tables.UML_String_Data_0C.MS_0C6E'Access);
48101   end Initialize_3599;
48102
48103   ---------------------
48104   -- Initialize_3600 --
48105   ---------------------
48106
48107   procedure Initialize_3600 is
48108   begin
48109      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48110       (Base + 3600,
48111        AMF.Internals.Tables.UML_String_Data_0A.MS_0A93'Access);
48112   end Initialize_3600;
48113
48114   ---------------------
48115   -- Initialize_3601 --
48116   ---------------------
48117
48118   procedure Initialize_3601 is
48119   begin
48120      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48121       (Base + 3601,
48122        AMF.Internals.Tables.UML_String_Data_05.MS_0575'Access);
48123   end Initialize_3601;
48124
48125   ---------------------
48126   -- Initialize_3602 --
48127   ---------------------
48128
48129   procedure Initialize_3602 is
48130   begin
48131      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48132       (Base + 3602,
48133        AMF.Internals.Tables.UML_String_Data_02.MS_0223'Access);
48134   end Initialize_3602;
48135
48136   ---------------------
48137   -- Initialize_3603 --
48138   ---------------------
48139
48140   procedure Initialize_3603 is
48141   begin
48142      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48143       (Base + 3603,
48144        AMF.Internals.Tables.UML_String_Data_00.MS_0026'Access);
48145   end Initialize_3603;
48146
48147   ---------------------
48148   -- Initialize_3604 --
48149   ---------------------
48150
48151   procedure Initialize_3604 is
48152   begin
48153      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48154       (Base + 3604,
48155        AMF.Internals.Tables.UML_String_Data_08.MS_0827'Access);
48156   end Initialize_3604;
48157
48158   ---------------------
48159   -- Initialize_3605 --
48160   ---------------------
48161
48162   procedure Initialize_3605 is
48163   begin
48164      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3605, True);
48165      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
48166       (Base + 3605,
48167        AMF.Internals.Tables.UML_String_Data_0B.MS_0B2C'Access);
48168      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3605, (False, AMF.CMOF.Public_Visibility));
48169   end Initialize_3605;
48170
48171   ---------------------
48172   -- Initialize_3606 --
48173   ---------------------
48174
48175   procedure Initialize_3606 is
48176   begin
48177      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48178       (Base + 3606,
48179        AMF.Internals.Tables.UML_String_Data_0A.MS_0A82'Access);
48180   end Initialize_3606;
48181
48182   ---------------------
48183   -- Initialize_3607 --
48184   ---------------------
48185
48186   procedure Initialize_3607 is
48187   begin
48188      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
48189       (Base + 3607,
48190        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
48191      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3607, (Is_Empty => True));
48192   end Initialize_3607;
48193
48194   ---------------------
48195   -- Initialize_3608 --
48196   ---------------------
48197
48198   procedure Initialize_3608 is
48199   begin
48200      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3608, (Is_Empty => True));
48201   end Initialize_3608;
48202
48203   ---------------------
48204   -- Initialize_3609 --
48205   ---------------------
48206
48207   procedure Initialize_3609 is
48208   begin
48209      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3609, AMF.CMOF.Return_Parameter);
48210      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 3609, (False, 0));
48211      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
48212       (Base + 3609,
48213        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
48214      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 3609, (False, (Unlimited => True)));
48215      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3609, (False, AMF.CMOF.Public_Visibility));
48216   end Initialize_3609;
48217
48218   ---------------------
48219   -- Initialize_3610 --
48220   ---------------------
48221
48222   procedure Initialize_3610 is
48223   begin
48224      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3610, True);
48225      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
48226       (Base + 3610,
48227        AMF.Internals.Tables.UML_String_Data_01.MS_0108'Access);
48228      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3610, (False, AMF.CMOF.Public_Visibility));
48229   end Initialize_3610;
48230
48231   ---------------------
48232   -- Initialize_3611 --
48233   ---------------------
48234
48235   procedure Initialize_3611 is
48236   begin
48237      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48238       (Base + 3611,
48239        AMF.Internals.Tables.UML_String_Data_05.MS_0536'Access);
48240   end Initialize_3611;
48241
48242   ---------------------
48243   -- Initialize_3612 --
48244   ---------------------
48245
48246   procedure Initialize_3612 is
48247   begin
48248      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
48249       (Base + 3612,
48250        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
48251      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3612, (Is_Empty => True));
48252   end Initialize_3612;
48253
48254   ---------------------
48255   -- Initialize_3613 --
48256   ---------------------
48257
48258   procedure Initialize_3613 is
48259   begin
48260      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3613, (Is_Empty => True));
48261   end Initialize_3613;
48262
48263   ---------------------
48264   -- Initialize_3614 --
48265   ---------------------
48266
48267   procedure Initialize_3614 is
48268   begin
48269      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3614, AMF.CMOF.Return_Parameter);
48270      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 3614, (False, 0));
48271      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
48272       (Base + 3614,
48273        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
48274      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 3614, (False, (Unlimited => True)));
48275      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3614, (False, AMF.CMOF.Public_Visibility));
48276   end Initialize_3614;
48277
48278   ---------------------
48279   -- Initialize_3615 --
48280   ---------------------
48281
48282   procedure Initialize_3615 is
48283   begin
48284      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48285       (Base + 3615,
48286        AMF.Internals.Tables.UML_String_Data_07.MS_07F1'Access);
48287   end Initialize_3615;
48288
48289   ---------------------
48290   -- Initialize_3616 --
48291   ---------------------
48292
48293   procedure Initialize_3616 is
48294   begin
48295      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48296       (Base + 3616,
48297        AMF.Internals.Tables.UML_String_Data_06.MS_06A5'Access);
48298   end Initialize_3616;
48299
48300   ---------------------
48301   -- Initialize_3617 --
48302   ---------------------
48303
48304   procedure Initialize_3617 is
48305   begin
48306      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
48307       (Base + 3617,
48308        AMF.Internals.Tables.UML_String_Data_07.MS_0774'Access);
48309      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3617, (Is_Empty => True));
48310   end Initialize_3617;
48311
48312   ---------------------
48313   -- Initialize_3618 --
48314   ---------------------
48315
48316   procedure Initialize_3618 is
48317   begin
48318      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48319       (Base + 3618,
48320        AMF.Internals.Tables.UML_String_Data_0B.MS_0BF5'Access);
48321   end Initialize_3618;
48322
48323   ---------------------
48324   -- Initialize_3619 --
48325   ---------------------
48326
48327   procedure Initialize_3619 is
48328   begin
48329      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3619, (Is_Empty => True));
48330   end Initialize_3619;
48331
48332   ---------------------
48333   -- Initialize_3620 --
48334   ---------------------
48335
48336   procedure Initialize_3620 is
48337   begin
48338      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
48339       (Base + 3620,
48340        AMF.Internals.Tables.UML_String_Data_06.MS_069E'Access);
48341      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3620, (Is_Empty => True));
48342   end Initialize_3620;
48343
48344   ---------------------
48345   -- Initialize_3621 --
48346   ---------------------
48347
48348   procedure Initialize_3621 is
48349   begin
48350      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48351       (Base + 3621,
48352        AMF.Internals.Tables.UML_String_Data_04.MS_04F2'Access);
48353   end Initialize_3621;
48354
48355   ---------------------
48356   -- Initialize_3622 --
48357   ---------------------
48358
48359   procedure Initialize_3622 is
48360   begin
48361      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3622, (Is_Empty => True));
48362   end Initialize_3622;
48363
48364   ---------------------
48365   -- Initialize_3623 --
48366   ---------------------
48367
48368   procedure Initialize_3623 is
48369   begin
48370      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48371       (Base + 3623,
48372        AMF.Internals.Tables.UML_String_Data_05.MS_05FD'Access);
48373   end Initialize_3623;
48374
48375   ---------------------
48376   -- Initialize_3624 --
48377   ---------------------
48378
48379   procedure Initialize_3624 is
48380   begin
48381      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48382       (Base + 3624,
48383        AMF.Internals.Tables.UML_String_Data_01.MS_0103'Access);
48384   end Initialize_3624;
48385
48386   ---------------------
48387   -- Initialize_3625 --
48388   ---------------------
48389
48390   procedure Initialize_3625 is
48391   begin
48392      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48393       (Base + 3625,
48394        AMF.Internals.Tables.UML_String_Data_01.MS_01A7'Access);
48395   end Initialize_3625;
48396
48397   ---------------------
48398   -- Initialize_3626 --
48399   ---------------------
48400
48401   procedure Initialize_3626 is
48402   begin
48403      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48404       (Base + 3626,
48405        AMF.Internals.Tables.UML_String_Data_0C.MS_0C73'Access);
48406   end Initialize_3626;
48407
48408   ---------------------
48409   -- Initialize_3627 --
48410   ---------------------
48411
48412   procedure Initialize_3627 is
48413   begin
48414      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48415       (Base + 3627,
48416        AMF.Internals.Tables.UML_String_Data_05.MS_0595'Access);
48417   end Initialize_3627;
48418
48419   ---------------------
48420   -- Initialize_3628 --
48421   ---------------------
48422
48423   procedure Initialize_3628 is
48424   begin
48425      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48426       (Base + 3628,
48427        AMF.Internals.Tables.UML_String_Data_09.MS_09BB'Access);
48428   end Initialize_3628;
48429
48430   ---------------------
48431   -- Initialize_3629 --
48432   ---------------------
48433
48434   procedure Initialize_3629 is
48435   begin
48436      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48437       (Base + 3629,
48438        AMF.Internals.Tables.UML_String_Data_0A.MS_0A2B'Access);
48439   end Initialize_3629;
48440
48441   ---------------------
48442   -- Initialize_3630 --
48443   ---------------------
48444
48445   procedure Initialize_3630 is
48446   begin
48447      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48448       (Base + 3630,
48449        AMF.Internals.Tables.UML_String_Data_00.MS_007B'Access);
48450   end Initialize_3630;
48451
48452   ---------------------
48453   -- Initialize_3631 --
48454   ---------------------
48455
48456   procedure Initialize_3631 is
48457   begin
48458      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48459       (Base + 3631,
48460        AMF.Internals.Tables.UML_String_Data_01.MS_0100'Access);
48461   end Initialize_3631;
48462
48463   ---------------------
48464   -- Initialize_3632 --
48465   ---------------------
48466
48467   procedure Initialize_3632 is
48468   begin
48469      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48470       (Base + 3632,
48471        AMF.Internals.Tables.UML_String_Data_08.MS_08B9'Access);
48472   end Initialize_3632;
48473
48474   ---------------------
48475   -- Initialize_3633 --
48476   ---------------------
48477
48478   procedure Initialize_3633 is
48479   begin
48480      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48481       (Base + 3633,
48482        AMF.Internals.Tables.UML_String_Data_0B.MS_0BA4'Access);
48483   end Initialize_3633;
48484
48485   ---------------------
48486   -- Initialize_3634 --
48487   ---------------------
48488
48489   procedure Initialize_3634 is
48490   begin
48491      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
48492       (Base + 3634,
48493        AMF.Internals.Tables.UML_String_Data_09.MS_096D'Access);
48494      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3634, (Is_Empty => True));
48495   end Initialize_3634;
48496
48497   ---------------------
48498   -- Initialize_3635 --
48499   ---------------------
48500
48501   procedure Initialize_3635 is
48502   begin
48503      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48504       (Base + 3635,
48505        AMF.Internals.Tables.UML_String_Data_08.MS_0819'Access);
48506   end Initialize_3635;
48507
48508   ---------------------
48509   -- Initialize_3636 --
48510   ---------------------
48511
48512   procedure Initialize_3636 is
48513   begin
48514      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3636, (Is_Empty => True));
48515   end Initialize_3636;
48516
48517   ---------------------
48518   -- Initialize_3637 --
48519   ---------------------
48520
48521   procedure Initialize_3637 is
48522   begin
48523      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
48524       (Base + 3637,
48525        AMF.Internals.Tables.UML_String_Data_06.MS_06AC'Access);
48526      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3637, (Is_Empty => True));
48527   end Initialize_3637;
48528
48529   ---------------------
48530   -- Initialize_3638 --
48531   ---------------------
48532
48533   procedure Initialize_3638 is
48534   begin
48535      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48536       (Base + 3638,
48537        AMF.Internals.Tables.UML_String_Data_0A.MS_0A53'Access);
48538   end Initialize_3638;
48539
48540   ---------------------
48541   -- Initialize_3639 --
48542   ---------------------
48543
48544   procedure Initialize_3639 is
48545   begin
48546      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3639, (Is_Empty => True));
48547   end Initialize_3639;
48548
48549   ---------------------
48550   -- Initialize_3640 --
48551   ---------------------
48552
48553   procedure Initialize_3640 is
48554   begin
48555      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
48556       (Base + 3640,
48557        AMF.Internals.Tables.UML_String_Data_08.MS_08D3'Access);
48558      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3640, (Is_Empty => True));
48559   end Initialize_3640;
48560
48561   ---------------------
48562   -- Initialize_3641 --
48563   ---------------------
48564
48565   procedure Initialize_3641 is
48566   begin
48567      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48568       (Base + 3641,
48569        AMF.Internals.Tables.UML_String_Data_05.MS_059E'Access);
48570   end Initialize_3641;
48571
48572   ---------------------
48573   -- Initialize_3642 --
48574   ---------------------
48575
48576   procedure Initialize_3642 is
48577   begin
48578      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48579       (Base + 3642,
48580        AMF.Internals.Tables.UML_String_Data_0C.MS_0C3A'Access);
48581   end Initialize_3642;
48582
48583   ---------------------
48584   -- Initialize_3643 --
48585   ---------------------
48586
48587   procedure Initialize_3643 is
48588   begin
48589      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3643, (Is_Empty => True));
48590   end Initialize_3643;
48591
48592   ---------------------
48593   -- Initialize_3644 --
48594   ---------------------
48595
48596   procedure Initialize_3644 is
48597   begin
48598      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
48599       (Base + 3644,
48600        AMF.Internals.Tables.UML_String_Data_07.MS_072B'Access);
48601      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3644, (Is_Empty => True));
48602   end Initialize_3644;
48603
48604   ---------------------
48605   -- Initialize_3645 --
48606   ---------------------
48607
48608   procedure Initialize_3645 is
48609   begin
48610      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48611       (Base + 3645,
48612        AMF.Internals.Tables.UML_String_Data_06.MS_0639'Access);
48613   end Initialize_3645;
48614
48615   ---------------------
48616   -- Initialize_3646 --
48617   ---------------------
48618
48619   procedure Initialize_3646 is
48620   begin
48621      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3646, (Is_Empty => True));
48622   end Initialize_3646;
48623
48624   ---------------------
48625   -- Initialize_3647 --
48626   ---------------------
48627
48628   procedure Initialize_3647 is
48629   begin
48630      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
48631       (Base + 3647,
48632        AMF.Internals.Tables.UML_String_Data_04.MS_047A'Access);
48633      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3647, (Is_Empty => True));
48634   end Initialize_3647;
48635
48636   ---------------------
48637   -- Initialize_3648 --
48638   ---------------------
48639
48640   procedure Initialize_3648 is
48641   begin
48642      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48643       (Base + 3648,
48644        AMF.Internals.Tables.UML_String_Data_05.MS_052B'Access);
48645   end Initialize_3648;
48646
48647   ---------------------
48648   -- Initialize_3649 --
48649   ---------------------
48650
48651   procedure Initialize_3649 is
48652   begin
48653      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3649, (Is_Empty => True));
48654   end Initialize_3649;
48655
48656   ---------------------
48657   -- Initialize_3650 --
48658   ---------------------
48659
48660   procedure Initialize_3650 is
48661   begin
48662      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
48663       (Base + 3650,
48664        AMF.Internals.Tables.UML_String_Data_05.MS_05E2'Access);
48665      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3650, (Is_Empty => True));
48666   end Initialize_3650;
48667
48668   ---------------------
48669   -- Initialize_3651 --
48670   ---------------------
48671
48672   procedure Initialize_3651 is
48673   begin
48674      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48675       (Base + 3651,
48676        AMF.Internals.Tables.UML_String_Data_05.MS_058E'Access);
48677   end Initialize_3651;
48678
48679   ---------------------
48680   -- Initialize_3652 --
48681   ---------------------
48682
48683   procedure Initialize_3652 is
48684   begin
48685      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3652, (Is_Empty => True));
48686   end Initialize_3652;
48687
48688   ---------------------
48689   -- Initialize_3653 --
48690   ---------------------
48691
48692   procedure Initialize_3653 is
48693   begin
48694      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
48695       (Base + 3653,
48696        AMF.Internals.Tables.UML_String_Data_03.MS_030C'Access);
48697      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3653, (Is_Empty => True));
48698   end Initialize_3653;
48699
48700   ---------------------
48701   -- Initialize_3654 --
48702   ---------------------
48703
48704   procedure Initialize_3654 is
48705   begin
48706      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48707       (Base + 3654,
48708        AMF.Internals.Tables.UML_String_Data_07.MS_07EC'Access);
48709   end Initialize_3654;
48710
48711   ---------------------
48712   -- Initialize_3655 --
48713   ---------------------
48714
48715   procedure Initialize_3655 is
48716   begin
48717      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3655, (Is_Empty => True));
48718   end Initialize_3655;
48719
48720   ---------------------
48721   -- Initialize_3656 --
48722   ---------------------
48723
48724   procedure Initialize_3656 is
48725   begin
48726      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
48727       (Base + 3656,
48728        AMF.Internals.Tables.UML_String_Data_06.MS_0673'Access);
48729      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3656, (Is_Empty => True));
48730   end Initialize_3656;
48731
48732   ---------------------
48733   -- Initialize_3657 --
48734   ---------------------
48735
48736   procedure Initialize_3657 is
48737   begin
48738      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48739       (Base + 3657,
48740        AMF.Internals.Tables.UML_String_Data_07.MS_07F0'Access);
48741   end Initialize_3657;
48742
48743   ---------------------
48744   -- Initialize_3658 --
48745   ---------------------
48746
48747   procedure Initialize_3658 is
48748   begin
48749      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3658, (Is_Empty => True));
48750   end Initialize_3658;
48751
48752   ---------------------
48753   -- Initialize_3659 --
48754   ---------------------
48755
48756   procedure Initialize_3659 is
48757   begin
48758      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
48759       (Base + 3659,
48760        AMF.Internals.Tables.UML_String_Data_0A.MS_0A52'Access);
48761      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3659, (Is_Empty => True));
48762   end Initialize_3659;
48763
48764   ---------------------
48765   -- Initialize_3660 --
48766   ---------------------
48767
48768   procedure Initialize_3660 is
48769   begin
48770      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48771       (Base + 3660,
48772        AMF.Internals.Tables.UML_String_Data_0B.MS_0BCC'Access);
48773   end Initialize_3660;
48774
48775   ---------------------
48776   -- Initialize_3661 --
48777   ---------------------
48778
48779   procedure Initialize_3661 is
48780   begin
48781      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3661, (Is_Empty => True));
48782   end Initialize_3661;
48783
48784   ---------------------
48785   -- Initialize_3662 --
48786   ---------------------
48787
48788   procedure Initialize_3662 is
48789   begin
48790      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48791       (Base + 3662,
48792        AMF.Internals.Tables.UML_String_Data_07.MS_07CE'Access);
48793   end Initialize_3662;
48794
48795   ---------------------
48796   -- Initialize_3663 --
48797   ---------------------
48798
48799   procedure Initialize_3663 is
48800   begin
48801      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48802       (Base + 3663,
48803        AMF.Internals.Tables.UML_String_Data_04.MS_042D'Access);
48804   end Initialize_3663;
48805
48806   ---------------------
48807   -- Initialize_3664 --
48808   ---------------------
48809
48810   procedure Initialize_3664 is
48811   begin
48812      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48813       (Base + 3664,
48814        AMF.Internals.Tables.UML_String_Data_07.MS_07E8'Access);
48815   end Initialize_3664;
48816
48817   ---------------------
48818   -- Initialize_3665 --
48819   ---------------------
48820
48821   procedure Initialize_3665 is
48822   begin
48823      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48824       (Base + 3665,
48825        AMF.Internals.Tables.UML_String_Data_06.MS_0683'Access);
48826   end Initialize_3665;
48827
48828   ---------------------
48829   -- Initialize_3666 --
48830   ---------------------
48831
48832   procedure Initialize_3666 is
48833   begin
48834      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48835       (Base + 3666,
48836        AMF.Internals.Tables.UML_String_Data_02.MS_0213'Access);
48837   end Initialize_3666;
48838
48839   ---------------------
48840   -- Initialize_3667 --
48841   ---------------------
48842
48843   procedure Initialize_3667 is
48844   begin
48845      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48846       (Base + 3667,
48847        AMF.Internals.Tables.UML_String_Data_07.MS_075B'Access);
48848   end Initialize_3667;
48849
48850   ---------------------
48851   -- Initialize_3668 --
48852   ---------------------
48853
48854   procedure Initialize_3668 is
48855   begin
48856      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48857       (Base + 3668,
48858        AMF.Internals.Tables.UML_String_Data_06.MS_062C'Access);
48859   end Initialize_3668;
48860
48861   ---------------------
48862   -- Initialize_3669 --
48863   ---------------------
48864
48865   procedure Initialize_3669 is
48866   begin
48867      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48868       (Base + 3669,
48869        AMF.Internals.Tables.UML_String_Data_0A.MS_0A35'Access);
48870   end Initialize_3669;
48871
48872   ---------------------
48873   -- Initialize_3670 --
48874   ---------------------
48875
48876   procedure Initialize_3670 is
48877   begin
48878      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48879       (Base + 3670,
48880        AMF.Internals.Tables.UML_String_Data_0B.MS_0B1A'Access);
48881   end Initialize_3670;
48882
48883   ---------------------
48884   -- Initialize_3671 --
48885   ---------------------
48886
48887   procedure Initialize_3671 is
48888   begin
48889      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48890       (Base + 3671,
48891        AMF.Internals.Tables.UML_String_Data_05.MS_05EB'Access);
48892   end Initialize_3671;
48893
48894   ---------------------
48895   -- Initialize_3672 --
48896   ---------------------
48897
48898   procedure Initialize_3672 is
48899   begin
48900      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48901       (Base + 3672,
48902        AMF.Internals.Tables.UML_String_Data_02.MS_025E'Access);
48903   end Initialize_3672;
48904
48905   ---------------------
48906   -- Initialize_3673 --
48907   ---------------------
48908
48909   procedure Initialize_3673 is
48910   begin
48911      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48912       (Base + 3673,
48913        AMF.Internals.Tables.UML_String_Data_08.MS_089F'Access);
48914   end Initialize_3673;
48915
48916   ---------------------
48917   -- Initialize_3674 --
48918   ---------------------
48919
48920   procedure Initialize_3674 is
48921   begin
48922      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48923       (Base + 3674,
48924        AMF.Internals.Tables.UML_String_Data_02.MS_0266'Access);
48925   end Initialize_3674;
48926
48927   ---------------------
48928   -- Initialize_3675 --
48929   ---------------------
48930
48931   procedure Initialize_3675 is
48932   begin
48933      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48934       (Base + 3675,
48935        AMF.Internals.Tables.UML_String_Data_0B.MS_0B24'Access);
48936   end Initialize_3675;
48937
48938   ---------------------
48939   -- Initialize_3676 --
48940   ---------------------
48941
48942   procedure Initialize_3676 is
48943   begin
48944      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48945       (Base + 3676,
48946        AMF.Internals.Tables.UML_String_Data_02.MS_02B4'Access);
48947   end Initialize_3676;
48948
48949   ---------------------
48950   -- Initialize_3677 --
48951   ---------------------
48952
48953   procedure Initialize_3677 is
48954   begin
48955      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48956       (Base + 3677,
48957        AMF.Internals.Tables.UML_String_Data_07.MS_0751'Access);
48958   end Initialize_3677;
48959
48960   ---------------------
48961   -- Initialize_3678 --
48962   ---------------------
48963
48964   procedure Initialize_3678 is
48965   begin
48966      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48967       (Base + 3678,
48968        AMF.Internals.Tables.UML_String_Data_04.MS_045A'Access);
48969   end Initialize_3678;
48970
48971   ---------------------
48972   -- Initialize_3679 --
48973   ---------------------
48974
48975   procedure Initialize_3679 is
48976   begin
48977      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48978       (Base + 3679,
48979        AMF.Internals.Tables.UML_String_Data_06.MS_06C0'Access);
48980   end Initialize_3679;
48981
48982   ---------------------
48983   -- Initialize_3680 --
48984   ---------------------
48985
48986   procedure Initialize_3680 is
48987   begin
48988      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
48989       (Base + 3680,
48990        AMF.Internals.Tables.UML_String_Data_0C.MS_0C62'Access);
48991   end Initialize_3680;
48992
48993   ---------------------
48994   -- Initialize_3681 --
48995   ---------------------
48996
48997   procedure Initialize_3681 is
48998   begin
48999      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
49000       (Base + 3681,
49001        AMF.Internals.Tables.UML_String_Data_06.MS_064A'Access);
49002   end Initialize_3681;
49003
49004   ---------------------
49005   -- Initialize_3682 --
49006   ---------------------
49007
49008   procedure Initialize_3682 is
49009   begin
49010      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
49011       (Base + 3682,
49012        AMF.Internals.Tables.UML_String_Data_05.MS_054A'Access);
49013   end Initialize_3682;
49014
49015   ---------------------
49016   -- Initialize_3683 --
49017   ---------------------
49018
49019   procedure Initialize_3683 is
49020   begin
49021      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
49022       (Base + 3683,
49023        AMF.Internals.Tables.UML_String_Data_0A.MS_0A4D'Access);
49024   end Initialize_3683;
49025
49026   ---------------------
49027   -- Initialize_3684 --
49028   ---------------------
49029
49030   procedure Initialize_3684 is
49031   begin
49032      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
49033       (Base + 3684,
49034        AMF.Internals.Tables.UML_String_Data_04.MS_04EB'Access);
49035   end Initialize_3684;
49036
49037   ---------------------
49038   -- Initialize_3685 --
49039   ---------------------
49040
49041   procedure Initialize_3685 is
49042   begin
49043      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3685, True);
49044      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49045       (Base + 3685,
49046        AMF.Internals.Tables.UML_String_Data_00.MS_00FB'Access);
49047      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3685, (False, AMF.CMOF.Public_Visibility));
49048   end Initialize_3685;
49049
49050   ---------------------
49051   -- Initialize_3686 --
49052   ---------------------
49053
49054   procedure Initialize_3686 is
49055   begin
49056      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
49057       (Base + 3686,
49058        AMF.Internals.Tables.UML_String_Data_03.MS_03BC'Access);
49059   end Initialize_3686;
49060
49061   ---------------------
49062   -- Initialize_3687 --
49063   ---------------------
49064
49065   procedure Initialize_3687 is
49066   begin
49067      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49068       (Base + 3687,
49069        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
49070      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3687, (Is_Empty => True));
49071   end Initialize_3687;
49072
49073   ---------------------
49074   -- Initialize_3688 --
49075   ---------------------
49076
49077   procedure Initialize_3688 is
49078   begin
49079      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3688, (Is_Empty => True));
49080   end Initialize_3688;
49081
49082   ---------------------
49083   -- Initialize_3689 --
49084   ---------------------
49085
49086   procedure Initialize_3689 is
49087   begin
49088      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3689, AMF.CMOF.Return_Parameter);
49089      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 3689, (False, 0));
49090      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49091       (Base + 3689,
49092        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
49093      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3689, (False, AMF.CMOF.Public_Visibility));
49094   end Initialize_3689;
49095
49096   ---------------------
49097   -- Initialize_3690 --
49098   ---------------------
49099
49100   procedure Initialize_3690 is
49101   begin
49102      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3690, True);
49103      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49104       (Base + 3690,
49105        AMF.Internals.Tables.UML_String_Data_04.MS_041B'Access);
49106      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3690, (False, AMF.CMOF.Public_Visibility));
49107   end Initialize_3690;
49108
49109   ---------------------
49110   -- Initialize_3691 --
49111   ---------------------
49112
49113   procedure Initialize_3691 is
49114   begin
49115      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
49116       (Base + 3691,
49117        AMF.Internals.Tables.UML_String_Data_03.MS_0378'Access);
49118   end Initialize_3691;
49119
49120   ---------------------
49121   -- Initialize_3692 --
49122   ---------------------
49123
49124   procedure Initialize_3692 is
49125   begin
49126      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49127       (Base + 3692,
49128        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
49129      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3692, (Is_Empty => True));
49130   end Initialize_3692;
49131
49132   ---------------------
49133   -- Initialize_3693 --
49134   ---------------------
49135
49136   procedure Initialize_3693 is
49137   begin
49138      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3693, (Is_Empty => True));
49139   end Initialize_3693;
49140
49141   ---------------------
49142   -- Initialize_3694 --
49143   ---------------------
49144
49145   procedure Initialize_3694 is
49146   begin
49147      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3694, AMF.CMOF.Return_Parameter);
49148      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49149       (Base + 3694,
49150        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
49151      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3694, (False, AMF.CMOF.Public_Visibility));
49152   end Initialize_3694;
49153
49154   ---------------------
49155   -- Initialize_3695 --
49156   ---------------------
49157
49158   procedure Initialize_3695 is
49159   begin
49160      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3695, AMF.CMOF.In_Parameter);
49161      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49162       (Base + 3695,
49163        AMF.Internals.Tables.UML_String_Data_01.MS_01C3'Access);
49164      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3695, (False, AMF.CMOF.Public_Visibility));
49165   end Initialize_3695;
49166
49167   ---------------------
49168   -- Initialize_3696 --
49169   ---------------------
49170
49171   procedure Initialize_3696 is
49172   begin
49173      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3696, True);
49174      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49175       (Base + 3696,
49176        AMF.Internals.Tables.UML_String_Data_08.MS_0820'Access);
49177      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3696, (False, AMF.CMOF.Public_Visibility));
49178   end Initialize_3696;
49179
49180   ---------------------
49181   -- Initialize_3697 --
49182   ---------------------
49183
49184   procedure Initialize_3697 is
49185   begin
49186      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
49187       (Base + 3697,
49188        AMF.Internals.Tables.UML_String_Data_02.MS_02D2'Access);
49189   end Initialize_3697;
49190
49191   ---------------------
49192   -- Initialize_3698 --
49193   ---------------------
49194
49195   procedure Initialize_3698 is
49196   begin
49197      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49198       (Base + 3698,
49199        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
49200      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3698, (Is_Empty => True));
49201   end Initialize_3698;
49202
49203   ---------------------
49204   -- Initialize_3699 --
49205   ---------------------
49206
49207   procedure Initialize_3699 is
49208   begin
49209      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3699, (Is_Empty => True));
49210   end Initialize_3699;
49211
49212   ---------------------
49213   -- Initialize_3700 --
49214   ---------------------
49215
49216   procedure Initialize_3700 is
49217   begin
49218      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3700, AMF.CMOF.Return_Parameter);
49219      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49220       (Base + 3700,
49221        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
49222      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3700, (False, AMF.CMOF.Public_Visibility));
49223   end Initialize_3700;
49224
49225   ---------------------
49226   -- Initialize_3701 --
49227   ---------------------
49228
49229   procedure Initialize_3701 is
49230   begin
49231      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3701, AMF.CMOF.In_Parameter);
49232      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49233       (Base + 3701,
49234        AMF.Internals.Tables.UML_String_Data_01.MS_01C3'Access);
49235      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3701, (False, AMF.CMOF.Public_Visibility));
49236   end Initialize_3701;
49237
49238   ---------------------
49239   -- Initialize_3702 --
49240   ---------------------
49241
49242   procedure Initialize_3702 is
49243   begin
49244      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3702, True);
49245      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49246       (Base + 3702,
49247        AMF.Internals.Tables.UML_String_Data_06.MS_060E'Access);
49248      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3702, (False, AMF.CMOF.Public_Visibility));
49249   end Initialize_3702;
49250
49251   ---------------------
49252   -- Initialize_3703 --
49253   ---------------------
49254
49255   procedure Initialize_3703 is
49256   begin
49257      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
49258       (Base + 3703,
49259        AMF.Internals.Tables.UML_String_Data_05.MS_05A3'Access);
49260   end Initialize_3703;
49261
49262   ---------------------
49263   -- Initialize_3704 --
49264   ---------------------
49265
49266   procedure Initialize_3704 is
49267   begin
49268      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49269       (Base + 3704,
49270        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
49271      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3704, (Is_Empty => True));
49272   end Initialize_3704;
49273
49274   ---------------------
49275   -- Initialize_3705 --
49276   ---------------------
49277
49278   procedure Initialize_3705 is
49279   begin
49280      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3705, (Is_Empty => True));
49281   end Initialize_3705;
49282
49283   ---------------------
49284   -- Initialize_3706 --
49285   ---------------------
49286
49287   procedure Initialize_3706 is
49288   begin
49289      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3706, AMF.CMOF.Return_Parameter);
49290      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49291       (Base + 3706,
49292        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
49293      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3706, (False, AMF.CMOF.Public_Visibility));
49294   end Initialize_3706;
49295
49296   ---------------------
49297   -- Initialize_3707 --
49298   ---------------------
49299
49300   procedure Initialize_3707 is
49301   begin
49302      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3707, True);
49303      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49304       (Base + 3707,
49305        AMF.Internals.Tables.UML_String_Data_08.MS_08AE'Access);
49306      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3707, (False, AMF.CMOF.Public_Visibility));
49307   end Initialize_3707;
49308
49309   ---------------------
49310   -- Initialize_3708 --
49311   ---------------------
49312
49313   procedure Initialize_3708 is
49314   begin
49315      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
49316       (Base + 3708,
49317        AMF.Internals.Tables.UML_String_Data_05.MS_0580'Access);
49318   end Initialize_3708;
49319
49320   ---------------------
49321   -- Initialize_3709 --
49322   ---------------------
49323
49324   procedure Initialize_3709 is
49325   begin
49326      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
49327       (Base + 3709,
49328        AMF.Internals.Tables.UML_String_Data_09.MS_099E'Access);
49329   end Initialize_3709;
49330
49331   ---------------------
49332   -- Initialize_3710 --
49333   ---------------------
49334
49335   procedure Initialize_3710 is
49336   begin
49337      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49338       (Base + 3710,
49339        AMF.Internals.Tables.UML_String_Data_0B.MS_0BFB'Access);
49340      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3710, (Is_Empty => True));
49341   end Initialize_3710;
49342
49343   ---------------------
49344   -- Initialize_3711 --
49345   ---------------------
49346
49347   procedure Initialize_3711 is
49348   begin
49349      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3711, (Is_Empty => True));
49350   end Initialize_3711;
49351
49352   ---------------------
49353   -- Initialize_3712 --
49354   ---------------------
49355
49356   procedure Initialize_3712 is
49357   begin
49358      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49359       (Base + 3712,
49360        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
49361      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3712, (Is_Empty => True));
49362   end Initialize_3712;
49363
49364   ---------------------
49365   -- Initialize_3713 --
49366   ---------------------
49367
49368   procedure Initialize_3713 is
49369   begin
49370      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3713, (Is_Empty => True));
49371   end Initialize_3713;
49372
49373   ---------------------
49374   -- Initialize_3714 --
49375   ---------------------
49376
49377   procedure Initialize_3714 is
49378   begin
49379      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3714, AMF.CMOF.Return_Parameter);
49380      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49381       (Base + 3714,
49382        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
49383      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3714, (False, AMF.CMOF.Public_Visibility));
49384   end Initialize_3714;
49385
49386   ---------------------
49387   -- Initialize_3715 --
49388   ---------------------
49389
49390   procedure Initialize_3715 is
49391   begin
49392      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3715, AMF.CMOF.In_Parameter);
49393      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49394       (Base + 3715,
49395        AMF.Internals.Tables.UML_String_Data_0B.MS_0B5C'Access);
49396      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3715, (False, AMF.CMOF.Public_Visibility));
49397   end Initialize_3715;
49398
49399   ---------------------
49400   -- Initialize_3716 --
49401   ---------------------
49402
49403   procedure Initialize_3716 is
49404   begin
49405      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3716, True);
49406      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49407       (Base + 3716,
49408        AMF.Internals.Tables.UML_String_Data_08.MS_088D'Access);
49409      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3716, (False, AMF.CMOF.Public_Visibility));
49410   end Initialize_3716;
49411
49412   ---------------------
49413   -- Initialize_3717 --
49414   ---------------------
49415
49416   procedure Initialize_3717 is
49417   begin
49418      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
49419       (Base + 3717,
49420        AMF.Internals.Tables.UML_String_Data_02.MS_02C7'Access);
49421   end Initialize_3717;
49422
49423   ---------------------
49424   -- Initialize_3718 --
49425   ---------------------
49426
49427   procedure Initialize_3718 is
49428   begin
49429      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49430       (Base + 3718,
49431        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
49432      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3718, (Is_Empty => True));
49433   end Initialize_3718;
49434
49435   ---------------------
49436   -- Initialize_3719 --
49437   ---------------------
49438
49439   procedure Initialize_3719 is
49440   begin
49441      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3719, (Is_Empty => True));
49442   end Initialize_3719;
49443
49444   ---------------------
49445   -- Initialize_3720 --
49446   ---------------------
49447
49448   procedure Initialize_3720 is
49449   begin
49450      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3720, AMF.CMOF.Return_Parameter);
49451      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49452       (Base + 3720,
49453        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
49454      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3720, (False, AMF.CMOF.Public_Visibility));
49455   end Initialize_3720;
49456
49457   ---------------------
49458   -- Initialize_3721 --
49459   ---------------------
49460
49461   procedure Initialize_3721 is
49462   begin
49463      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3721, True);
49464      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49465       (Base + 3721,
49466        AMF.Internals.Tables.UML_String_Data_04.MS_0444'Access);
49467      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3721, (False, AMF.CMOF.Public_Visibility));
49468   end Initialize_3721;
49469
49470   ---------------------
49471   -- Initialize_3722 --
49472   ---------------------
49473
49474   procedure Initialize_3722 is
49475   begin
49476      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
49477       (Base + 3722,
49478        AMF.Internals.Tables.UML_String_Data_0A.MS_0ACF'Access);
49479   end Initialize_3722;
49480
49481   ---------------------
49482   -- Initialize_3723 --
49483   ---------------------
49484
49485   procedure Initialize_3723 is
49486   begin
49487      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49488       (Base + 3723,
49489        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
49490      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3723, (Is_Empty => True));
49491   end Initialize_3723;
49492
49493   ---------------------
49494   -- Initialize_3724 --
49495   ---------------------
49496
49497   procedure Initialize_3724 is
49498   begin
49499      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3724, (Is_Empty => True));
49500   end Initialize_3724;
49501
49502   ---------------------
49503   -- Initialize_3725 --
49504   ---------------------
49505
49506   procedure Initialize_3725 is
49507   begin
49508      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3725, AMF.CMOF.Return_Parameter);
49509      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49510       (Base + 3725,
49511        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
49512      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3725, (False, AMF.CMOF.Public_Visibility));
49513   end Initialize_3725;
49514
49515   ---------------------
49516   -- Initialize_3726 --
49517   ---------------------
49518
49519   procedure Initialize_3726 is
49520   begin
49521      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3726, True);
49522      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49523       (Base + 3726,
49524        AMF.Internals.Tables.UML_String_Data_0B.MS_0BDC'Access);
49525      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3726, (False, AMF.CMOF.Public_Visibility));
49526   end Initialize_3726;
49527
49528   ---------------------
49529   -- Initialize_3727 --
49530   ---------------------
49531
49532   procedure Initialize_3727 is
49533   begin
49534      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
49535       (Base + 3727,
49536        AMF.Internals.Tables.UML_String_Data_08.MS_0846'Access);
49537   end Initialize_3727;
49538
49539   ---------------------
49540   -- Initialize_3728 --
49541   ---------------------
49542
49543   procedure Initialize_3728 is
49544   begin
49545      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49546       (Base + 3728,
49547        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
49548      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3728, (Is_Empty => True));
49549   end Initialize_3728;
49550
49551   ---------------------
49552   -- Initialize_3729 --
49553   ---------------------
49554
49555   procedure Initialize_3729 is
49556   begin
49557      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3729, (Is_Empty => True));
49558   end Initialize_3729;
49559
49560   ---------------------
49561   -- Initialize_3730 --
49562   ---------------------
49563
49564   procedure Initialize_3730 is
49565   begin
49566      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3730, AMF.CMOF.Return_Parameter);
49567      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 3730, (False, 0));
49568      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49569       (Base + 3730,
49570        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
49571      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 3730, (False, (Unlimited => True)));
49572      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3730, (False, AMF.CMOF.Public_Visibility));
49573   end Initialize_3730;
49574
49575   ---------------------
49576   -- Initialize_3731 --
49577   ---------------------
49578
49579   procedure Initialize_3731 is
49580   begin
49581      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
49582       (Base + 3731,
49583        AMF.Internals.Tables.UML_String_Data_07.MS_078C'Access);
49584   end Initialize_3731;
49585
49586   ---------------------
49587   -- Initialize_3732 --
49588   ---------------------
49589
49590   procedure Initialize_3732 is
49591   begin
49592      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
49593       (Base + 3732,
49594        AMF.Internals.Tables.UML_String_Data_09.MS_0975'Access);
49595   end Initialize_3732;
49596
49597   ---------------------
49598   -- Initialize_3733 --
49599   ---------------------
49600
49601   procedure Initialize_3733 is
49602   begin
49603      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
49604       (Base + 3733,
49605        AMF.Internals.Tables.UML_String_Data_03.MS_0336'Access);
49606   end Initialize_3733;
49607
49608   ---------------------
49609   -- Initialize_3734 --
49610   ---------------------
49611
49612   procedure Initialize_3734 is
49613   begin
49614      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
49615       (Base + 3734,
49616        AMF.Internals.Tables.UML_String_Data_0C.MS_0C7E'Access);
49617   end Initialize_3734;
49618
49619   ---------------------
49620   -- Initialize_3735 --
49621   ---------------------
49622
49623   procedure Initialize_3735 is
49624   begin
49625      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49626       (Base + 3735,
49627        AMF.Internals.Tables.UML_String_Data_06.MS_064C'Access);
49628      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3735, (Is_Empty => True));
49629   end Initialize_3735;
49630
49631   ---------------------
49632   -- Initialize_3736 --
49633   ---------------------
49634
49635   procedure Initialize_3736 is
49636   begin
49637      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
49638       (Base + 3736,
49639        AMF.Internals.Tables.UML_String_Data_02.MS_0292'Access);
49640   end Initialize_3736;
49641
49642   ---------------------
49643   -- Initialize_3737 --
49644   ---------------------
49645
49646   procedure Initialize_3737 is
49647   begin
49648      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3737, (Is_Empty => True));
49649   end Initialize_3737;
49650
49651   ---------------------
49652   -- Initialize_3738 --
49653   ---------------------
49654
49655   procedure Initialize_3738 is
49656   begin
49657      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49658       (Base + 3738,
49659        AMF.Internals.Tables.UML_String_Data_07.MS_07D6'Access);
49660      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3738, (Is_Empty => True));
49661   end Initialize_3738;
49662
49663   ---------------------
49664   -- Initialize_3739 --
49665   ---------------------
49666
49667   procedure Initialize_3739 is
49668   begin
49669      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
49670       (Base + 3739,
49671        AMF.Internals.Tables.UML_String_Data_06.MS_0610'Access);
49672   end Initialize_3739;
49673
49674   ---------------------
49675   -- Initialize_3740 --
49676   ---------------------
49677
49678   procedure Initialize_3740 is
49679   begin
49680      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3740, (Is_Empty => True));
49681   end Initialize_3740;
49682
49683   ---------------------
49684   -- Initialize_3741 --
49685   ---------------------
49686
49687   procedure Initialize_3741 is
49688   begin
49689      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49690       (Base + 3741,
49691        AMF.Internals.Tables.UML_String_Data_0A.MS_0A21'Access);
49692      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3741, (Is_Empty => True));
49693   end Initialize_3741;
49694
49695   ---------------------
49696   -- Initialize_3742 --
49697   ---------------------
49698
49699   procedure Initialize_3742 is
49700   begin
49701      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
49702       (Base + 3742,
49703        AMF.Internals.Tables.UML_String_Data_0C.MS_0C5F'Access);
49704   end Initialize_3742;
49705
49706   ---------------------
49707   -- Initialize_3743 --
49708   ---------------------
49709
49710   procedure Initialize_3743 is
49711   begin
49712      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3743, (Is_Empty => True));
49713   end Initialize_3743;
49714
49715   ---------------------
49716   -- Initialize_3744 --
49717   ---------------------
49718
49719   procedure Initialize_3744 is
49720   begin
49721      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49722       (Base + 3744,
49723        AMF.Internals.Tables.UML_String_Data_09.MS_09F1'Access);
49724      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3744, (Is_Empty => True));
49725   end Initialize_3744;
49726
49727   ---------------------
49728   -- Initialize_3745 --
49729   ---------------------
49730
49731   procedure Initialize_3745 is
49732   begin
49733      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
49734       (Base + 3745,
49735        AMF.Internals.Tables.UML_String_Data_0A.MS_0ABE'Access);
49736   end Initialize_3745;
49737
49738   ---------------------
49739   -- Initialize_3746 --
49740   ---------------------
49741
49742   procedure Initialize_3746 is
49743   begin
49744      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3746, (Is_Empty => True));
49745   end Initialize_3746;
49746
49747   ---------------------
49748   -- Initialize_3747 --
49749   ---------------------
49750
49751   procedure Initialize_3747 is
49752   begin
49753      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49754       (Base + 3747,
49755        AMF.Internals.Tables.UML_String_Data_0A.MS_0AA1'Access);
49756      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3747, (Is_Empty => True));
49757   end Initialize_3747;
49758
49759   ---------------------
49760   -- Initialize_3748 --
49761   ---------------------
49762
49763   procedure Initialize_3748 is
49764   begin
49765      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
49766       (Base + 3748,
49767        AMF.Internals.Tables.UML_String_Data_00.MS_006D'Access);
49768   end Initialize_3748;
49769
49770   ---------------------
49771   -- Initialize_3749 --
49772   ---------------------
49773
49774   procedure Initialize_3749 is
49775   begin
49776      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3749, (Is_Empty => True));
49777   end Initialize_3749;
49778
49779   ---------------------
49780   -- Initialize_3750 --
49781   ---------------------
49782
49783   procedure Initialize_3750 is
49784   begin
49785      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
49786       (Base + 3750,
49787        AMF.Internals.Tables.UML_String_Data_04.MS_047B'Access);
49788   end Initialize_3750;
49789
49790   ---------------------
49791   -- Initialize_3751 --
49792   ---------------------
49793
49794   procedure Initialize_3751 is
49795   begin
49796      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
49797       (Base + 3751,
49798        AMF.Internals.Tables.UML_String_Data_05.MS_0544'Access);
49799   end Initialize_3751;
49800
49801   ---------------------
49802   -- Initialize_3752 --
49803   ---------------------
49804
49805   procedure Initialize_3752 is
49806   begin
49807      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49808       (Base + 3752,
49809        AMF.Internals.Tables.UML_String_Data_0A.MS_0A9A'Access);
49810      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3752, (Is_Empty => True));
49811   end Initialize_3752;
49812
49813   ---------------------
49814   -- Initialize_3753 --
49815   ---------------------
49816
49817   procedure Initialize_3753 is
49818   begin
49819      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
49820       (Base + 3753,
49821        AMF.Internals.Tables.UML_String_Data_0A.MS_0A49'Access);
49822   end Initialize_3753;
49823
49824   ---------------------
49825   -- Initialize_3754 --
49826   ---------------------
49827
49828   procedure Initialize_3754 is
49829   begin
49830      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3754, (Is_Empty => True));
49831   end Initialize_3754;
49832
49833   ---------------------
49834   -- Initialize_3755 --
49835   ---------------------
49836
49837   procedure Initialize_3755 is
49838   begin
49839      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49840       (Base + 3755,
49841        AMF.Internals.Tables.UML_String_Data_05.MS_05AC'Access);
49842      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3755, (Is_Empty => True));
49843   end Initialize_3755;
49844
49845   ---------------------
49846   -- Initialize_3756 --
49847   ---------------------
49848
49849   procedure Initialize_3756 is
49850   begin
49851      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
49852       (Base + 3756,
49853        AMF.Internals.Tables.UML_String_Data_0A.MS_0A10'Access);
49854   end Initialize_3756;
49855
49856   ---------------------
49857   -- Initialize_3757 --
49858   ---------------------
49859
49860   procedure Initialize_3757 is
49861   begin
49862      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3757, (Is_Empty => True));
49863   end Initialize_3757;
49864
49865   ---------------------
49866   -- Initialize_3758 --
49867   ---------------------
49868
49869   procedure Initialize_3758 is
49870   begin
49871      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49872       (Base + 3758,
49873        AMF.Internals.Tables.UML_String_Data_05.MS_05EA'Access);
49874      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3758, (Is_Empty => True));
49875   end Initialize_3758;
49876
49877   ---------------------
49878   -- Initialize_3759 --
49879   ---------------------
49880
49881   procedure Initialize_3759 is
49882   begin
49883      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
49884       (Base + 3759,
49885        AMF.Internals.Tables.UML_String_Data_08.MS_0808'Access);
49886   end Initialize_3759;
49887
49888   ---------------------
49889   -- Initialize_3760 --
49890   ---------------------
49891
49892   procedure Initialize_3760 is
49893   begin
49894      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3760, (Is_Empty => True));
49895   end Initialize_3760;
49896
49897   ---------------------
49898   -- Initialize_3761 --
49899   ---------------------
49900
49901   procedure Initialize_3761 is
49902   begin
49903      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
49904       (Base + 3761,
49905        AMF.Internals.Tables.UML_String_Data_03.MS_03FB'Access);
49906   end Initialize_3761;
49907
49908   ---------------------
49909   -- Initialize_3762 --
49910   ---------------------
49911
49912   procedure Initialize_3762 is
49913   begin
49914      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
49915       (Base + 3762,
49916        AMF.Internals.Tables.UML_String_Data_0B.MS_0B6F'Access);
49917   end Initialize_3762;
49918
49919   ---------------------
49920   -- Initialize_3763 --
49921   ---------------------
49922
49923   procedure Initialize_3763 is
49924   begin
49925      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
49926       (Base + 3763,
49927        AMF.Internals.Tables.UML_String_Data_0A.MS_0ABF'Access);
49928   end Initialize_3763;
49929
49930   ---------------------
49931   -- Initialize_3764 --
49932   ---------------------
49933
49934   procedure Initialize_3764 is
49935   begin
49936      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3764, True);
49937      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49938       (Base + 3764,
49939        AMF.Internals.Tables.UML_String_Data_02.MS_02F8'Access);
49940      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3764, (False, AMF.CMOF.Public_Visibility));
49941   end Initialize_3764;
49942
49943   ---------------------
49944   -- Initialize_3765 --
49945   ---------------------
49946
49947   procedure Initialize_3765 is
49948   begin
49949      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
49950       (Base + 3765,
49951        AMF.Internals.Tables.UML_String_Data_0C.MS_0C0E'Access);
49952   end Initialize_3765;
49953
49954   ---------------------
49955   -- Initialize_3766 --
49956   ---------------------
49957
49958   procedure Initialize_3766 is
49959   begin
49960      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49961       (Base + 3766,
49962        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
49963      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3766, (Is_Empty => True));
49964   end Initialize_3766;
49965
49966   ---------------------
49967   -- Initialize_3767 --
49968   ---------------------
49969
49970   procedure Initialize_3767 is
49971   begin
49972      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3767, (Is_Empty => True));
49973   end Initialize_3767;
49974
49975   ---------------------
49976   -- Initialize_3768 --
49977   ---------------------
49978
49979   procedure Initialize_3768 is
49980   begin
49981      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3768, AMF.CMOF.Return_Parameter);
49982      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 3768, (False, 0));
49983      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
49984       (Base + 3768,
49985        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
49986      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 3768, (False, (Unlimited => True)));
49987      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3768, (False, AMF.CMOF.Public_Visibility));
49988   end Initialize_3768;
49989
49990   ---------------------
49991   -- Initialize_3769 --
49992   ---------------------
49993
49994   procedure Initialize_3769 is
49995   begin
49996      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
49997       (Base + 3769,
49998        AMF.Internals.Tables.UML_String_Data_06.MS_0648'Access);
49999   end Initialize_3769;
50000
50001   ---------------------
50002   -- Initialize_3770 --
50003   ---------------------
50004
50005   procedure Initialize_3770 is
50006   begin
50007      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
50008       (Base + 3770,
50009        AMF.Internals.Tables.UML_String_Data_08.MS_080F'Access);
50010      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3770, (Is_Empty => True));
50011   end Initialize_3770;
50012
50013   ---------------------
50014   -- Initialize_3771 --
50015   ---------------------
50016
50017   procedure Initialize_3771 is
50018   begin
50019      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50020       (Base + 3771,
50021        AMF.Internals.Tables.UML_String_Data_08.MS_08E4'Access);
50022   end Initialize_3771;
50023
50024   ---------------------
50025   -- Initialize_3772 --
50026   ---------------------
50027
50028   procedure Initialize_3772 is
50029   begin
50030      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3772, (Is_Empty => True));
50031   end Initialize_3772;
50032
50033   ---------------------
50034   -- Initialize_3773 --
50035   ---------------------
50036
50037   procedure Initialize_3773 is
50038   begin
50039      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
50040       (Base + 3773,
50041        AMF.Internals.Tables.UML_String_Data_03.MS_0318'Access);
50042      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3773, (Is_Empty => True));
50043   end Initialize_3773;
50044
50045   ---------------------
50046   -- Initialize_3774 --
50047   ---------------------
50048
50049   procedure Initialize_3774 is
50050   begin
50051      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50052       (Base + 3774,
50053        AMF.Internals.Tables.UML_String_Data_05.MS_0573'Access);
50054   end Initialize_3774;
50055
50056   ---------------------
50057   -- Initialize_3775 --
50058   ---------------------
50059
50060   procedure Initialize_3775 is
50061   begin
50062      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3775, (Is_Empty => True));
50063   end Initialize_3775;
50064
50065   ---------------------
50066   -- Initialize_3776 --
50067   ---------------------
50068
50069   procedure Initialize_3776 is
50070   begin
50071      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
50072       (Base + 3776,
50073        AMF.Internals.Tables.UML_String_Data_01.MS_01FA'Access);
50074      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3776, (Is_Empty => True));
50075   end Initialize_3776;
50076
50077   ---------------------
50078   -- Initialize_3777 --
50079   ---------------------
50080
50081   procedure Initialize_3777 is
50082   begin
50083      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50084       (Base + 3777,
50085        AMF.Internals.Tables.UML_String_Data_01.MS_0130'Access);
50086   end Initialize_3777;
50087
50088   ---------------------
50089   -- Initialize_3778 --
50090   ---------------------
50091
50092   procedure Initialize_3778 is
50093   begin
50094      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3778, (Is_Empty => True));
50095   end Initialize_3778;
50096
50097   ---------------------
50098   -- Initialize_3779 --
50099   ---------------------
50100
50101   procedure Initialize_3779 is
50102   begin
50103      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
50104       (Base + 3779,
50105        AMF.Internals.Tables.UML_String_Data_06.MS_0613'Access);
50106      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3779, (Is_Empty => True));
50107   end Initialize_3779;
50108
50109   ---------------------
50110   -- Initialize_3780 --
50111   ---------------------
50112
50113   procedure Initialize_3780 is
50114   begin
50115      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50116       (Base + 3780,
50117        AMF.Internals.Tables.UML_String_Data_09.MS_09B0'Access);
50118   end Initialize_3780;
50119
50120   ---------------------
50121   -- Initialize_3781 --
50122   ---------------------
50123
50124   procedure Initialize_3781 is
50125   begin
50126      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3781, (Is_Empty => True));
50127   end Initialize_3781;
50128
50129   ---------------------
50130   -- Initialize_3782 --
50131   ---------------------
50132
50133   procedure Initialize_3782 is
50134   begin
50135      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
50136       (Base + 3782,
50137        AMF.Internals.Tables.UML_String_Data_00.MS_00BB'Access);
50138      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3782, (Is_Empty => True));
50139   end Initialize_3782;
50140
50141   ---------------------
50142   -- Initialize_3783 --
50143   ---------------------
50144
50145   procedure Initialize_3783 is
50146   begin
50147      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50148       (Base + 3783,
50149        AMF.Internals.Tables.UML_String_Data_00.MS_0096'Access);
50150   end Initialize_3783;
50151
50152   ---------------------
50153   -- Initialize_3784 --
50154   ---------------------
50155
50156   procedure Initialize_3784 is
50157   begin
50158      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3784, (Is_Empty => True));
50159   end Initialize_3784;
50160
50161   ---------------------
50162   -- Initialize_3785 --
50163   ---------------------
50164
50165   procedure Initialize_3785 is
50166   begin
50167      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
50168       (Base + 3785,
50169        AMF.Internals.Tables.UML_String_Data_0C.MS_0C91'Access);
50170      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3785, (Is_Empty => True));
50171   end Initialize_3785;
50172
50173   ---------------------
50174   -- Initialize_3786 --
50175   ---------------------
50176
50177   procedure Initialize_3786 is
50178   begin
50179      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50180       (Base + 3786,
50181        AMF.Internals.Tables.UML_String_Data_02.MS_0268'Access);
50182   end Initialize_3786;
50183
50184   ---------------------
50185   -- Initialize_3787 --
50186   ---------------------
50187
50188   procedure Initialize_3787 is
50189   begin
50190      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3787, (Is_Empty => True));
50191   end Initialize_3787;
50192
50193   ---------------------
50194   -- Initialize_3788 --
50195   ---------------------
50196
50197   procedure Initialize_3788 is
50198   begin
50199      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
50200       (Base + 3788,
50201        AMF.Internals.Tables.UML_String_Data_0A.MS_0A83'Access);
50202      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3788, (Is_Empty => True));
50203   end Initialize_3788;
50204
50205   ---------------------
50206   -- Initialize_3789 --
50207   ---------------------
50208
50209   procedure Initialize_3789 is
50210   begin
50211      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50212       (Base + 3789,
50213        AMF.Internals.Tables.UML_String_Data_03.MS_0398'Access);
50214   end Initialize_3789;
50215
50216   ---------------------
50217   -- Initialize_3790 --
50218   ---------------------
50219
50220   procedure Initialize_3790 is
50221   begin
50222      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3790, (Is_Empty => True));
50223   end Initialize_3790;
50224
50225   ---------------------
50226   -- Initialize_3791 --
50227   ---------------------
50228
50229   procedure Initialize_3791 is
50230   begin
50231      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
50232       (Base + 3791,
50233        AMF.Internals.Tables.UML_String_Data_03.MS_0303'Access);
50234      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3791, (Is_Empty => True));
50235   end Initialize_3791;
50236
50237   ---------------------
50238   -- Initialize_3792 --
50239   ---------------------
50240
50241   procedure Initialize_3792 is
50242   begin
50243      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50244       (Base + 3792,
50245        AMF.Internals.Tables.UML_String_Data_07.MS_0753'Access);
50246   end Initialize_3792;
50247
50248   ---------------------
50249   -- Initialize_3793 --
50250   ---------------------
50251
50252   procedure Initialize_3793 is
50253   begin
50254      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3793, (Is_Empty => True));
50255   end Initialize_3793;
50256
50257   ---------------------
50258   -- Initialize_3794 --
50259   ---------------------
50260
50261   procedure Initialize_3794 is
50262   begin
50263      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
50264       (Base + 3794,
50265        AMF.Internals.Tables.UML_String_Data_03.MS_03A0'Access);
50266      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3794, (Is_Empty => True));
50267   end Initialize_3794;
50268
50269   ---------------------
50270   -- Initialize_3795 --
50271   ---------------------
50272
50273   procedure Initialize_3795 is
50274   begin
50275      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50276       (Base + 3795,
50277        AMF.Internals.Tables.UML_String_Data_00.MS_0060'Access);
50278   end Initialize_3795;
50279
50280   ---------------------
50281   -- Initialize_3796 --
50282   ---------------------
50283
50284   procedure Initialize_3796 is
50285   begin
50286      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3796, (Is_Empty => True));
50287   end Initialize_3796;
50288
50289   ---------------------
50290   -- Initialize_3797 --
50291   ---------------------
50292
50293   procedure Initialize_3797 is
50294   begin
50295      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50296       (Base + 3797,
50297        AMF.Internals.Tables.UML_String_Data_0A.MS_0A5E'Access);
50298   end Initialize_3797;
50299
50300   ---------------------
50301   -- Initialize_3798 --
50302   ---------------------
50303
50304   procedure Initialize_3798 is
50305   begin
50306      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50307       (Base + 3798,
50308        AMF.Internals.Tables.UML_String_Data_04.MS_0455'Access);
50309   end Initialize_3798;
50310
50311   ---------------------
50312   -- Initialize_3799 --
50313   ---------------------
50314
50315   procedure Initialize_3799 is
50316   begin
50317      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50318       (Base + 3799,
50319        AMF.Internals.Tables.UML_String_Data_08.MS_0834'Access);
50320   end Initialize_3799;
50321
50322   ---------------------
50323   -- Initialize_3800 --
50324   ---------------------
50325
50326   procedure Initialize_3800 is
50327   begin
50328      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50329       (Base + 3800,
50330        AMF.Internals.Tables.UML_String_Data_0B.MS_0B68'Access);
50331   end Initialize_3800;
50332
50333   ---------------------
50334   -- Initialize_3801 --
50335   ---------------------
50336
50337   procedure Initialize_3801 is
50338   begin
50339      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
50340       (Base + 3801,
50341        AMF.Internals.Tables.UML_String_Data_08.MS_0838'Access);
50342      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3801, (Is_Empty => True));
50343   end Initialize_3801;
50344
50345   ---------------------
50346   -- Initialize_3802 --
50347   ---------------------
50348
50349   procedure Initialize_3802 is
50350   begin
50351      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50352       (Base + 3802,
50353        AMF.Internals.Tables.UML_String_Data_07.MS_07A8'Access);
50354   end Initialize_3802;
50355
50356   ---------------------
50357   -- Initialize_3803 --
50358   ---------------------
50359
50360   procedure Initialize_3803 is
50361   begin
50362      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3803, (Is_Empty => True));
50363   end Initialize_3803;
50364
50365   ---------------------
50366   -- Initialize_3804 --
50367   ---------------------
50368
50369   procedure Initialize_3804 is
50370   begin
50371      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
50372       (Base + 3804,
50373        AMF.Internals.Tables.UML_String_Data_02.MS_020E'Access);
50374      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3804, (Is_Empty => True));
50375   end Initialize_3804;
50376
50377   ---------------------
50378   -- Initialize_3805 --
50379   ---------------------
50380
50381   procedure Initialize_3805 is
50382   begin
50383      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50384       (Base + 3805,
50385        AMF.Internals.Tables.UML_String_Data_06.MS_067C'Access);
50386   end Initialize_3805;
50387
50388   ---------------------
50389   -- Initialize_3806 --
50390   ---------------------
50391
50392   procedure Initialize_3806 is
50393   begin
50394      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3806, (Is_Empty => True));
50395   end Initialize_3806;
50396
50397   ---------------------
50398   -- Initialize_3807 --
50399   ---------------------
50400
50401   procedure Initialize_3807 is
50402   begin
50403      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
50404       (Base + 3807,
50405        AMF.Internals.Tables.UML_String_Data_02.MS_02FA'Access);
50406      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3807, (Is_Empty => True));
50407   end Initialize_3807;
50408
50409   ---------------------
50410   -- Initialize_3808 --
50411   ---------------------
50412
50413   procedure Initialize_3808 is
50414   begin
50415      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50416       (Base + 3808,
50417        AMF.Internals.Tables.UML_String_Data_06.MS_0603'Access);
50418   end Initialize_3808;
50419
50420   ---------------------
50421   -- Initialize_3809 --
50422   ---------------------
50423
50424   procedure Initialize_3809 is
50425   begin
50426      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3809, (Is_Empty => True));
50427   end Initialize_3809;
50428
50429   ---------------------
50430   -- Initialize_3810 --
50431   ---------------------
50432
50433   procedure Initialize_3810 is
50434   begin
50435      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50436       (Base + 3810,
50437        AMF.Internals.Tables.UML_String_Data_02.MS_0209'Access);
50438   end Initialize_3810;
50439
50440   ---------------------
50441   -- Initialize_3811 --
50442   ---------------------
50443
50444   procedure Initialize_3811 is
50445   begin
50446      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50447       (Base + 3811,
50448        AMF.Internals.Tables.UML_String_Data_0A.MS_0A1D'Access);
50449   end Initialize_3811;
50450
50451   ---------------------
50452   -- Initialize_3812 --
50453   ---------------------
50454
50455   procedure Initialize_3812 is
50456   begin
50457      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50458       (Base + 3812,
50459        AMF.Internals.Tables.UML_String_Data_02.MS_02FB'Access);
50460   end Initialize_3812;
50461
50462   ---------------------
50463   -- Initialize_3813 --
50464   ---------------------
50465
50466   procedure Initialize_3813 is
50467   begin
50468      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50469       (Base + 3813,
50470        AMF.Internals.Tables.UML_String_Data_0A.MS_0AEA'Access);
50471   end Initialize_3813;
50472
50473   ---------------------
50474   -- Initialize_3814 --
50475   ---------------------
50476
50477   procedure Initialize_3814 is
50478   begin
50479      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50480       (Base + 3814,
50481        AMF.Internals.Tables.UML_String_Data_05.MS_0502'Access);
50482   end Initialize_3814;
50483
50484   ---------------------
50485   -- Initialize_3815 --
50486   ---------------------
50487
50488   procedure Initialize_3815 is
50489   begin
50490      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
50491       (Base + 3815,
50492        AMF.Internals.Tables.UML_String_Data_02.MS_02E4'Access);
50493      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3815, (Is_Empty => True));
50494   end Initialize_3815;
50495
50496   ---------------------
50497   -- Initialize_3816 --
50498   ---------------------
50499
50500   procedure Initialize_3816 is
50501   begin
50502      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50503       (Base + 3816,
50504        AMF.Internals.Tables.UML_String_Data_06.MS_061F'Access);
50505   end Initialize_3816;
50506
50507   ---------------------
50508   -- Initialize_3817 --
50509   ---------------------
50510
50511   procedure Initialize_3817 is
50512   begin
50513      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3817, (Is_Empty => True));
50514   end Initialize_3817;
50515
50516   ---------------------
50517   -- Initialize_3818 --
50518   ---------------------
50519
50520   procedure Initialize_3818 is
50521   begin
50522      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
50523       (Base + 3818,
50524        AMF.Internals.Tables.UML_String_Data_04.MS_04D9'Access);
50525      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3818, (Is_Empty => True));
50526   end Initialize_3818;
50527
50528   ---------------------
50529   -- Initialize_3819 --
50530   ---------------------
50531
50532   procedure Initialize_3819 is
50533   begin
50534      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50535       (Base + 3819,
50536        AMF.Internals.Tables.UML_String_Data_02.MS_02CC'Access);
50537   end Initialize_3819;
50538
50539   ---------------------
50540   -- Initialize_3820 --
50541   ---------------------
50542
50543   procedure Initialize_3820 is
50544   begin
50545      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3820, (Is_Empty => True));
50546   end Initialize_3820;
50547
50548   ---------------------
50549   -- Initialize_3821 --
50550   ---------------------
50551
50552   procedure Initialize_3821 is
50553   begin
50554      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50555       (Base + 3821,
50556        AMF.Internals.Tables.UML_String_Data_0C.MS_0C94'Access);
50557   end Initialize_3821;
50558
50559   ---------------------
50560   -- Initialize_3822 --
50561   ---------------------
50562
50563   procedure Initialize_3822 is
50564   begin
50565      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50566       (Base + 3822,
50567        AMF.Internals.Tables.UML_String_Data_00.MS_003D'Access);
50568   end Initialize_3822;
50569
50570   ---------------------
50571   -- Initialize_3823 --
50572   ---------------------
50573
50574   procedure Initialize_3823 is
50575   begin
50576      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50577       (Base + 3823,
50578        AMF.Internals.Tables.UML_String_Data_09.MS_091C'Access);
50579   end Initialize_3823;
50580
50581   ---------------------
50582   -- Initialize_3824 --
50583   ---------------------
50584
50585   procedure Initialize_3824 is
50586   begin
50587      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
50588       (Base + 3824,
50589        AMF.Internals.Tables.UML_String_Data_06.MS_0680'Access);
50590      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3824, (Is_Empty => True));
50591   end Initialize_3824;
50592
50593   ---------------------
50594   -- Initialize_3825 --
50595   ---------------------
50596
50597   procedure Initialize_3825 is
50598   begin
50599      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50600       (Base + 3825,
50601        AMF.Internals.Tables.UML_String_Data_07.MS_07ED'Access);
50602   end Initialize_3825;
50603
50604   ---------------------
50605   -- Initialize_3826 --
50606   ---------------------
50607
50608   procedure Initialize_3826 is
50609   begin
50610      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3826, (Is_Empty => True));
50611   end Initialize_3826;
50612
50613   ---------------------
50614   -- Initialize_3827 --
50615   ---------------------
50616
50617   procedure Initialize_3827 is
50618   begin
50619      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
50620       (Base + 3827,
50621        AMF.Internals.Tables.UML_String_Data_05.MS_058F'Access);
50622      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3827, (Is_Empty => True));
50623   end Initialize_3827;
50624
50625   ---------------------
50626   -- Initialize_3828 --
50627   ---------------------
50628
50629   procedure Initialize_3828 is
50630   begin
50631      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50632       (Base + 3828,
50633        AMF.Internals.Tables.UML_String_Data_0A.MS_0A47'Access);
50634   end Initialize_3828;
50635
50636   ---------------------
50637   -- Initialize_3829 --
50638   ---------------------
50639
50640   procedure Initialize_3829 is
50641   begin
50642      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3829, (Is_Empty => True));
50643   end Initialize_3829;
50644
50645   ---------------------
50646   -- Initialize_3830 --
50647   ---------------------
50648
50649   procedure Initialize_3830 is
50650   begin
50651      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
50652       (Base + 3830,
50653        AMF.Internals.Tables.UML_String_Data_04.MS_0401'Access);
50654      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3830, (Is_Empty => True));
50655   end Initialize_3830;
50656
50657   ---------------------
50658   -- Initialize_3831 --
50659   ---------------------
50660
50661   procedure Initialize_3831 is
50662   begin
50663      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50664       (Base + 3831,
50665        AMF.Internals.Tables.UML_String_Data_0A.MS_0A60'Access);
50666   end Initialize_3831;
50667
50668   ---------------------
50669   -- Initialize_3832 --
50670   ---------------------
50671
50672   procedure Initialize_3832 is
50673   begin
50674      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3832, (Is_Empty => True));
50675   end Initialize_3832;
50676
50677   ---------------------
50678   -- Initialize_3833 --
50679   ---------------------
50680
50681   procedure Initialize_3833 is
50682   begin
50683      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
50684       (Base + 3833,
50685        AMF.Internals.Tables.UML_String_Data_06.MS_062E'Access);
50686      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3833, (Is_Empty => True));
50687   end Initialize_3833;
50688
50689   ---------------------
50690   -- Initialize_3834 --
50691   ---------------------
50692
50693   procedure Initialize_3834 is
50694   begin
50695      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50696       (Base + 3834,
50697        AMF.Internals.Tables.UML_String_Data_00.MS_009E'Access);
50698   end Initialize_3834;
50699
50700   ---------------------
50701   -- Initialize_3835 --
50702   ---------------------
50703
50704   procedure Initialize_3835 is
50705   begin
50706      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3835, (Is_Empty => True));
50707   end Initialize_3835;
50708
50709   ---------------------
50710   -- Initialize_3836 --
50711   ---------------------
50712
50713   procedure Initialize_3836 is
50714   begin
50715      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50716       (Base + 3836,
50717        AMF.Internals.Tables.UML_String_Data_09.MS_0970'Access);
50718   end Initialize_3836;
50719
50720   ---------------------
50721   -- Initialize_3837 --
50722   ---------------------
50723
50724   procedure Initialize_3837 is
50725   begin
50726      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50727       (Base + 3837,
50728        AMF.Internals.Tables.UML_String_Data_09.MS_0982'Access);
50729   end Initialize_3837;
50730
50731   ---------------------
50732   -- Initialize_3838 --
50733   ---------------------
50734
50735   procedure Initialize_3838 is
50736   begin
50737      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50738       (Base + 3838,
50739        AMF.Internals.Tables.UML_String_Data_08.MS_0897'Access);
50740   end Initialize_3838;
50741
50742   ---------------------
50743   -- Initialize_3839 --
50744   ---------------------
50745
50746   procedure Initialize_3839 is
50747   begin
50748      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50749       (Base + 3839,
50750        AMF.Internals.Tables.UML_String_Data_07.MS_0766'Access);
50751   end Initialize_3839;
50752
50753   ---------------------
50754   -- Initialize_3840 --
50755   ---------------------
50756
50757   procedure Initialize_3840 is
50758   begin
50759      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50760       (Base + 3840,
50761        AMF.Internals.Tables.UML_String_Data_06.MS_06B8'Access);
50762   end Initialize_3840;
50763
50764   ---------------------
50765   -- Initialize_3841 --
50766   ---------------------
50767
50768   procedure Initialize_3841 is
50769   begin
50770      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
50771       (Base + 3841,
50772        AMF.Internals.Tables.UML_String_Data_04.MS_0431'Access);
50773      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3841, (Is_Empty => True));
50774   end Initialize_3841;
50775
50776   ---------------------
50777   -- Initialize_3842 --
50778   ---------------------
50779
50780   procedure Initialize_3842 is
50781   begin
50782      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50783       (Base + 3842,
50784        AMF.Internals.Tables.UML_String_Data_05.MS_0546'Access);
50785   end Initialize_3842;
50786
50787   ---------------------
50788   -- Initialize_3843 --
50789   ---------------------
50790
50791   procedure Initialize_3843 is
50792   begin
50793      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3843, (Is_Empty => True));
50794   end Initialize_3843;
50795
50796   ---------------------
50797   -- Initialize_3844 --
50798   ---------------------
50799
50800   procedure Initialize_3844 is
50801   begin
50802      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
50803       (Base + 3844,
50804        AMF.Internals.Tables.UML_String_Data_06.MS_0660'Access);
50805      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3844, (Is_Empty => True));
50806   end Initialize_3844;
50807
50808   ---------------------
50809   -- Initialize_3845 --
50810   ---------------------
50811
50812   procedure Initialize_3845 is
50813   begin
50814      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50815       (Base + 3845,
50816        AMF.Internals.Tables.UML_String_Data_07.MS_0746'Access);
50817   end Initialize_3845;
50818
50819   ---------------------
50820   -- Initialize_3846 --
50821   ---------------------
50822
50823   procedure Initialize_3846 is
50824   begin
50825      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3846, (Is_Empty => True));
50826   end Initialize_3846;
50827
50828   ---------------------
50829   -- Initialize_3847 --
50830   ---------------------
50831
50832   procedure Initialize_3847 is
50833   begin
50834      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
50835       (Base + 3847,
50836        AMF.Internals.Tables.UML_String_Data_0B.MS_0B62'Access);
50837      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3847, (Is_Empty => True));
50838   end Initialize_3847;
50839
50840   ---------------------
50841   -- Initialize_3848 --
50842   ---------------------
50843
50844   procedure Initialize_3848 is
50845   begin
50846      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50847       (Base + 3848,
50848        AMF.Internals.Tables.UML_String_Data_0B.MS_0B8A'Access);
50849   end Initialize_3848;
50850
50851   ---------------------
50852   -- Initialize_3849 --
50853   ---------------------
50854
50855   procedure Initialize_3849 is
50856   begin
50857      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3849, (Is_Empty => True));
50858   end Initialize_3849;
50859
50860   ---------------------
50861   -- Initialize_3850 --
50862   ---------------------
50863
50864   procedure Initialize_3850 is
50865   begin
50866      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
50867       (Base + 3850,
50868        AMF.Internals.Tables.UML_String_Data_00.MS_0045'Access);
50869      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3850, (Is_Empty => True));
50870   end Initialize_3850;
50871
50872   ---------------------
50873   -- Initialize_3851 --
50874   ---------------------
50875
50876   procedure Initialize_3851 is
50877   begin
50878      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50879       (Base + 3851,
50880        AMF.Internals.Tables.UML_String_Data_00.MS_0092'Access);
50881   end Initialize_3851;
50882
50883   ---------------------
50884   -- Initialize_3852 --
50885   ---------------------
50886
50887   procedure Initialize_3852 is
50888   begin
50889      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3852, (Is_Empty => True));
50890   end Initialize_3852;
50891
50892   ---------------------
50893   -- Initialize_3853 --
50894   ---------------------
50895
50896   procedure Initialize_3853 is
50897   begin
50898      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
50899       (Base + 3853,
50900        AMF.Internals.Tables.UML_String_Data_09.MS_09ED'Access);
50901      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3853, (Is_Empty => True));
50902   end Initialize_3853;
50903
50904   ---------------------
50905   -- Initialize_3854 --
50906   ---------------------
50907
50908   procedure Initialize_3854 is
50909   begin
50910      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50911       (Base + 3854,
50912        AMF.Internals.Tables.UML_String_Data_07.MS_07E3'Access);
50913   end Initialize_3854;
50914
50915   ---------------------
50916   -- Initialize_3855 --
50917   ---------------------
50918
50919   procedure Initialize_3855 is
50920   begin
50921      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3855, (Is_Empty => True));
50922   end Initialize_3855;
50923
50924   ---------------------
50925   -- Initialize_3856 --
50926   ---------------------
50927
50928   procedure Initialize_3856 is
50929   begin
50930      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50931       (Base + 3856,
50932        AMF.Internals.Tables.UML_String_Data_02.MS_02A8'Access);
50933   end Initialize_3856;
50934
50935   ---------------------
50936   -- Initialize_3857 --
50937   ---------------------
50938
50939   procedure Initialize_3857 is
50940   begin
50941      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50942       (Base + 3857,
50943        AMF.Internals.Tables.UML_String_Data_0C.MS_0C74'Access);
50944   end Initialize_3857;
50945
50946   ---------------------
50947   -- Initialize_3858 --
50948   ---------------------
50949
50950   procedure Initialize_3858 is
50951   begin
50952      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
50953       (Base + 3858,
50954        AMF.Internals.Tables.UML_String_Data_00.MS_0051'Access);
50955      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3858, (Is_Empty => True));
50956   end Initialize_3858;
50957
50958   ---------------------
50959   -- Initialize_3859 --
50960   ---------------------
50961
50962   procedure Initialize_3859 is
50963   begin
50964      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50965       (Base + 3859,
50966        AMF.Internals.Tables.UML_String_Data_07.MS_079D'Access);
50967   end Initialize_3859;
50968
50969   ---------------------
50970   -- Initialize_3860 --
50971   ---------------------
50972
50973   procedure Initialize_3860 is
50974   begin
50975      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3860, (Is_Empty => True));
50976   end Initialize_3860;
50977
50978   ---------------------
50979   -- Initialize_3861 --
50980   ---------------------
50981
50982   procedure Initialize_3861 is
50983   begin
50984      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
50985       (Base + 3861,
50986        AMF.Internals.Tables.UML_String_Data_08.MS_0821'Access);
50987      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3861, (Is_Empty => True));
50988   end Initialize_3861;
50989
50990   ---------------------
50991   -- Initialize_3862 --
50992   ---------------------
50993
50994   procedure Initialize_3862 is
50995   begin
50996      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
50997       (Base + 3862,
50998        AMF.Internals.Tables.UML_String_Data_04.MS_044D'Access);
50999   end Initialize_3862;
51000
51001   ---------------------
51002   -- Initialize_3863 --
51003   ---------------------
51004
51005   procedure Initialize_3863 is
51006   begin
51007      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3863, (Is_Empty => True));
51008   end Initialize_3863;
51009
51010   ---------------------
51011   -- Initialize_3864 --
51012   ---------------------
51013
51014   procedure Initialize_3864 is
51015   begin
51016      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
51017       (Base + 3864,
51018        AMF.Internals.Tables.UML_String_Data_08.MS_0839'Access);
51019      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3864, (Is_Empty => True));
51020   end Initialize_3864;
51021
51022   ---------------------
51023   -- Initialize_3865 --
51024   ---------------------
51025
51026   procedure Initialize_3865 is
51027   begin
51028      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51029       (Base + 3865,
51030        AMF.Internals.Tables.UML_String_Data_00.MS_0076'Access);
51031   end Initialize_3865;
51032
51033   ---------------------
51034   -- Initialize_3866 --
51035   ---------------------
51036
51037   procedure Initialize_3866 is
51038   begin
51039      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3866, (Is_Empty => True));
51040   end Initialize_3866;
51041
51042   ---------------------
51043   -- Initialize_3867 --
51044   ---------------------
51045
51046   procedure Initialize_3867 is
51047   begin
51048      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
51049       (Base + 3867,
51050        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD3'Access);
51051      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3867, (Is_Empty => True));
51052   end Initialize_3867;
51053
51054   ---------------------
51055   -- Initialize_3868 --
51056   ---------------------
51057
51058   procedure Initialize_3868 is
51059   begin
51060      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51061       (Base + 3868,
51062        AMF.Internals.Tables.UML_String_Data_0A.MS_0A39'Access);
51063   end Initialize_3868;
51064
51065   ---------------------
51066   -- Initialize_3869 --
51067   ---------------------
51068
51069   procedure Initialize_3869 is
51070   begin
51071      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3869, (Is_Empty => True));
51072   end Initialize_3869;
51073
51074   ---------------------
51075   -- Initialize_3870 --
51076   ---------------------
51077
51078   procedure Initialize_3870 is
51079   begin
51080      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
51081       (Base + 3870,
51082        AMF.Internals.Tables.UML_String_Data_04.MS_04D9'Access);
51083      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3870, (Is_Empty => True));
51084   end Initialize_3870;
51085
51086   ---------------------
51087   -- Initialize_3871 --
51088   ---------------------
51089
51090   procedure Initialize_3871 is
51091   begin
51092      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51093       (Base + 3871,
51094        AMF.Internals.Tables.UML_String_Data_03.MS_0314'Access);
51095   end Initialize_3871;
51096
51097   ---------------------
51098   -- Initialize_3872 --
51099   ---------------------
51100
51101   procedure Initialize_3872 is
51102   begin
51103      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3872, (Is_Empty => True));
51104   end Initialize_3872;
51105
51106   ---------------------
51107   -- Initialize_3873 --
51108   ---------------------
51109
51110   procedure Initialize_3873 is
51111   begin
51112      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
51113       (Base + 3873,
51114        AMF.Internals.Tables.UML_String_Data_07.MS_0793'Access);
51115      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3873, (Is_Empty => True));
51116   end Initialize_3873;
51117
51118   ---------------------
51119   -- Initialize_3874 --
51120   ---------------------
51121
51122   procedure Initialize_3874 is
51123   begin
51124      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51125       (Base + 3874,
51126        AMF.Internals.Tables.UML_String_Data_0A.MS_0AD8'Access);
51127   end Initialize_3874;
51128
51129   ---------------------
51130   -- Initialize_3875 --
51131   ---------------------
51132
51133   procedure Initialize_3875 is
51134   begin
51135      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3875, (Is_Empty => True));
51136   end Initialize_3875;
51137
51138   ---------------------
51139   -- Initialize_3876 --
51140   ---------------------
51141
51142   procedure Initialize_3876 is
51143   begin
51144      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
51145       (Base + 3876,
51146        AMF.Internals.Tables.UML_String_Data_03.MS_03CF'Access);
51147      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3876, (Is_Empty => True));
51148   end Initialize_3876;
51149
51150   ---------------------
51151   -- Initialize_3877 --
51152   ---------------------
51153
51154   procedure Initialize_3877 is
51155   begin
51156      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51157       (Base + 3877,
51158        AMF.Internals.Tables.UML_String_Data_09.MS_09EB'Access);
51159   end Initialize_3877;
51160
51161   ---------------------
51162   -- Initialize_3878 --
51163   ---------------------
51164
51165   procedure Initialize_3878 is
51166   begin
51167      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3878, (Is_Empty => True));
51168   end Initialize_3878;
51169
51170   ---------------------
51171   -- Initialize_3879 --
51172   ---------------------
51173
51174   procedure Initialize_3879 is
51175   begin
51176      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51177       (Base + 3879,
51178        AMF.Internals.Tables.UML_String_Data_05.MS_0589'Access);
51179   end Initialize_3879;
51180
51181   ---------------------
51182   -- Initialize_3880 --
51183   ---------------------
51184
51185   procedure Initialize_3880 is
51186   begin
51187      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51188       (Base + 3880,
51189        AMF.Internals.Tables.UML_String_Data_08.MS_0813'Access);
51190   end Initialize_3880;
51191
51192   ---------------------
51193   -- Initialize_3881 --
51194   ---------------------
51195
51196   procedure Initialize_3881 is
51197   begin
51198      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51199       (Base + 3881,
51200        AMF.Internals.Tables.UML_String_Data_0B.MS_0B11'Access);
51201   end Initialize_3881;
51202
51203   ---------------------
51204   -- Initialize_3882 --
51205   ---------------------
51206
51207   procedure Initialize_3882 is
51208   begin
51209      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51210       (Base + 3882,
51211        AMF.Internals.Tables.UML_String_Data_05.MS_05AB'Access);
51212   end Initialize_3882;
51213
51214   ---------------------
51215   -- Initialize_3883 --
51216   ---------------------
51217
51218   procedure Initialize_3883 is
51219   begin
51220      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
51221       (Base + 3883,
51222        AMF.Internals.Tables.UML_String_Data_08.MS_0821'Access);
51223      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3883, (Is_Empty => True));
51224   end Initialize_3883;
51225
51226   ---------------------
51227   -- Initialize_3884 --
51228   ---------------------
51229
51230   procedure Initialize_3884 is
51231   begin
51232      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51233       (Base + 3884,
51234        AMF.Internals.Tables.UML_String_Data_04.MS_044D'Access);
51235   end Initialize_3884;
51236
51237   ---------------------
51238   -- Initialize_3885 --
51239   ---------------------
51240
51241   procedure Initialize_3885 is
51242   begin
51243      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3885, (Is_Empty => True));
51244   end Initialize_3885;
51245
51246   ---------------------
51247   -- Initialize_3886 --
51248   ---------------------
51249
51250   procedure Initialize_3886 is
51251   begin
51252      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
51253       (Base + 3886,
51254        AMF.Internals.Tables.UML_String_Data_07.MS_0793'Access);
51255      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3886, (Is_Empty => True));
51256   end Initialize_3886;
51257
51258   ---------------------
51259   -- Initialize_3887 --
51260   ---------------------
51261
51262   procedure Initialize_3887 is
51263   begin
51264      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51265       (Base + 3887,
51266        AMF.Internals.Tables.UML_String_Data_0B.MS_0B6A'Access);
51267   end Initialize_3887;
51268
51269   ---------------------
51270   -- Initialize_3888 --
51271   ---------------------
51272
51273   procedure Initialize_3888 is
51274   begin
51275      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3888, (Is_Empty => True));
51276   end Initialize_3888;
51277
51278   ---------------------
51279   -- Initialize_3889 --
51280   ---------------------
51281
51282   procedure Initialize_3889 is
51283   begin
51284      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
51285       (Base + 3889,
51286        AMF.Internals.Tables.UML_String_Data_08.MS_0838'Access);
51287      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3889, (Is_Empty => True));
51288   end Initialize_3889;
51289
51290   ---------------------
51291   -- Initialize_3890 --
51292   ---------------------
51293
51294   procedure Initialize_3890 is
51295   begin
51296      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51297       (Base + 3890,
51298        AMF.Internals.Tables.UML_String_Data_06.MS_067D'Access);
51299   end Initialize_3890;
51300
51301   ---------------------
51302   -- Initialize_3891 --
51303   ---------------------
51304
51305   procedure Initialize_3891 is
51306   begin
51307      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3891, (Is_Empty => True));
51308   end Initialize_3891;
51309
51310   ---------------------
51311   -- Initialize_3892 --
51312   ---------------------
51313
51314   procedure Initialize_3892 is
51315   begin
51316      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
51317       (Base + 3892,
51318        AMF.Internals.Tables.UML_String_Data_08.MS_0839'Access);
51319      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3892, (Is_Empty => True));
51320   end Initialize_3892;
51321
51322   ---------------------
51323   -- Initialize_3893 --
51324   ---------------------
51325
51326   procedure Initialize_3893 is
51327   begin
51328      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51329       (Base + 3893,
51330        AMF.Internals.Tables.UML_String_Data_00.MS_0076'Access);
51331   end Initialize_3893;
51332
51333   ---------------------
51334   -- Initialize_3894 --
51335   ---------------------
51336
51337   procedure Initialize_3894 is
51338   begin
51339      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3894, (Is_Empty => True));
51340   end Initialize_3894;
51341
51342   ---------------------
51343   -- Initialize_3895 --
51344   ---------------------
51345
51346   procedure Initialize_3895 is
51347   begin
51348      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
51349       (Base + 3895,
51350        AMF.Internals.Tables.UML_String_Data_04.MS_04D9'Access);
51351      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3895, (Is_Empty => True));
51352   end Initialize_3895;
51353
51354   ---------------------
51355   -- Initialize_3896 --
51356   ---------------------
51357
51358   procedure Initialize_3896 is
51359   begin
51360      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51361       (Base + 3896,
51362        AMF.Internals.Tables.UML_String_Data_03.MS_0314'Access);
51363   end Initialize_3896;
51364
51365   ---------------------
51366   -- Initialize_3897 --
51367   ---------------------
51368
51369   procedure Initialize_3897 is
51370   begin
51371      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3897, (Is_Empty => True));
51372   end Initialize_3897;
51373
51374   ---------------------
51375   -- Initialize_3898 --
51376   ---------------------
51377
51378   procedure Initialize_3898 is
51379   begin
51380      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
51381       (Base + 3898,
51382        AMF.Internals.Tables.UML_String_Data_0A.MS_0AE9'Access);
51383      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3898, (Is_Empty => True));
51384   end Initialize_3898;
51385
51386   ---------------------
51387   -- Initialize_3899 --
51388   ---------------------
51389
51390   procedure Initialize_3899 is
51391   begin
51392      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51393       (Base + 3899,
51394        AMF.Internals.Tables.UML_String_Data_03.MS_03DC'Access);
51395   end Initialize_3899;
51396
51397   ---------------------
51398   -- Initialize_3900 --
51399   ---------------------
51400
51401   procedure Initialize_3900 is
51402   begin
51403      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3900, (Is_Empty => True));
51404   end Initialize_3900;
51405
51406   ---------------------
51407   -- Initialize_3901 --
51408   ---------------------
51409
51410   procedure Initialize_3901 is
51411   begin
51412      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
51413       (Base + 3901,
51414        AMF.Internals.Tables.UML_String_Data_03.MS_03CF'Access);
51415      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3901, (Is_Empty => True));
51416   end Initialize_3901;
51417
51418   ---------------------
51419   -- Initialize_3902 --
51420   ---------------------
51421
51422   procedure Initialize_3902 is
51423   begin
51424      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51425       (Base + 3902,
51426        AMF.Internals.Tables.UML_String_Data_09.MS_0903'Access);
51427   end Initialize_3902;
51428
51429   ---------------------
51430   -- Initialize_3903 --
51431   ---------------------
51432
51433   procedure Initialize_3903 is
51434   begin
51435      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3903, (Is_Empty => True));
51436   end Initialize_3903;
51437
51438   ---------------------
51439   -- Initialize_3904 --
51440   ---------------------
51441
51442   procedure Initialize_3904 is
51443   begin
51444      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
51445       (Base + 3904,
51446        AMF.Internals.Tables.UML_String_Data_02.MS_02FA'Access);
51447      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3904, (Is_Empty => True));
51448   end Initialize_3904;
51449
51450   ---------------------
51451   -- Initialize_3905 --
51452   ---------------------
51453
51454   procedure Initialize_3905 is
51455   begin
51456      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51457       (Base + 3905,
51458        AMF.Internals.Tables.UML_String_Data_07.MS_070F'Access);
51459   end Initialize_3905;
51460
51461   ---------------------
51462   -- Initialize_3906 --
51463   ---------------------
51464
51465   procedure Initialize_3906 is
51466   begin
51467      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3906, (Is_Empty => True));
51468   end Initialize_3906;
51469
51470   ---------------------
51471   -- Initialize_3907 --
51472   ---------------------
51473
51474   procedure Initialize_3907 is
51475   begin
51476      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51477       (Base + 3907,
51478        AMF.Internals.Tables.UML_String_Data_08.MS_0813'Access);
51479   end Initialize_3907;
51480
51481   ---------------------
51482   -- Initialize_3908 --
51483   ---------------------
51484
51485   procedure Initialize_3908 is
51486   begin
51487      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51488       (Base + 3908,
51489        AMF.Internals.Tables.UML_String_Data_00.MS_00A2'Access);
51490   end Initialize_3908;
51491
51492   ---------------------
51493   -- Initialize_3909 --
51494   ---------------------
51495
51496   procedure Initialize_3909 is
51497   begin
51498      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51499       (Base + 3909,
51500        AMF.Internals.Tables.UML_String_Data_0B.MS_0B11'Access);
51501   end Initialize_3909;
51502
51503   ---------------------
51504   -- Initialize_3910 --
51505   ---------------------
51506
51507   procedure Initialize_3910 is
51508   begin
51509      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51510       (Base + 3910,
51511        AMF.Internals.Tables.UML_String_Data_0C.MS_0C53'Access);
51512   end Initialize_3910;
51513
51514   ---------------------
51515   -- Initialize_3911 --
51516   ---------------------
51517
51518   procedure Initialize_3911 is
51519   begin
51520      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
51521       (Base + 3911,
51522        AMF.Internals.Tables.UML_String_Data_08.MS_0888'Access);
51523      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3911, (Is_Empty => True));
51524   end Initialize_3911;
51525
51526   ---------------------
51527   -- Initialize_3912 --
51528   ---------------------
51529
51530   procedure Initialize_3912 is
51531   begin
51532      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51533       (Base + 3912,
51534        AMF.Internals.Tables.UML_String_Data_02.MS_024A'Access);
51535   end Initialize_3912;
51536
51537   ---------------------
51538   -- Initialize_3913 --
51539   ---------------------
51540
51541   procedure Initialize_3913 is
51542   begin
51543      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3913, (Is_Empty => True));
51544   end Initialize_3913;
51545
51546   ---------------------
51547   -- Initialize_3914 --
51548   ---------------------
51549
51550   procedure Initialize_3914 is
51551   begin
51552      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
51553       (Base + 3914,
51554        AMF.Internals.Tables.UML_String_Data_04.MS_0441'Access);
51555      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3914, (Is_Empty => True));
51556   end Initialize_3914;
51557
51558   ---------------------
51559   -- Initialize_3915 --
51560   ---------------------
51561
51562   procedure Initialize_3915 is
51563   begin
51564      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51565       (Base + 3915,
51566        AMF.Internals.Tables.UML_String_Data_03.MS_0314'Access);
51567   end Initialize_3915;
51568
51569   ---------------------
51570   -- Initialize_3916 --
51571   ---------------------
51572
51573   procedure Initialize_3916 is
51574   begin
51575      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3916, (Is_Empty => True));
51576   end Initialize_3916;
51577
51578   ---------------------
51579   -- Initialize_3917 --
51580   ---------------------
51581
51582   procedure Initialize_3917 is
51583   begin
51584      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
51585       (Base + 3917,
51586        AMF.Internals.Tables.UML_String_Data_04.MS_0422'Access);
51587      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3917, (Is_Empty => True));
51588   end Initialize_3917;
51589
51590   ---------------------
51591   -- Initialize_3918 --
51592   ---------------------
51593
51594   procedure Initialize_3918 is
51595   begin
51596      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51597       (Base + 3918,
51598        AMF.Internals.Tables.UML_String_Data_0B.MS_0B23'Access);
51599   end Initialize_3918;
51600
51601   ---------------------
51602   -- Initialize_3919 --
51603   ---------------------
51604
51605   procedure Initialize_3919 is
51606   begin
51607      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3919, (Is_Empty => True));
51608   end Initialize_3919;
51609
51610   ---------------------
51611   -- Initialize_3920 --
51612   ---------------------
51613
51614   procedure Initialize_3920 is
51615   begin
51616      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
51617       (Base + 3920,
51618        AMF.Internals.Tables.UML_String_Data_0B.MS_0BB4'Access);
51619      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3920, (Is_Empty => True));
51620   end Initialize_3920;
51621
51622   ---------------------
51623   -- Initialize_3921 --
51624   ---------------------
51625
51626   procedure Initialize_3921 is
51627   begin
51628      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51629       (Base + 3921,
51630        AMF.Internals.Tables.UML_String_Data_08.MS_0847'Access);
51631   end Initialize_3921;
51632
51633   ---------------------
51634   -- Initialize_3922 --
51635   ---------------------
51636
51637   procedure Initialize_3922 is
51638   begin
51639      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3922, (Is_Empty => True));
51640   end Initialize_3922;
51641
51642   ---------------------
51643   -- Initialize_3923 --
51644   ---------------------
51645
51646   procedure Initialize_3923 is
51647   begin
51648      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51649       (Base + 3923,
51650        AMF.Internals.Tables.UML_String_Data_06.MS_064B'Access);
51651   end Initialize_3923;
51652
51653   ---------------------
51654   -- Initialize_3924 --
51655   ---------------------
51656
51657   procedure Initialize_3924 is
51658   begin
51659      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51660       (Base + 3924,
51661        AMF.Internals.Tables.UML_String_Data_05.MS_0509'Access);
51662   end Initialize_3924;
51663
51664   ---------------------
51665   -- Initialize_3925 --
51666   ---------------------
51667
51668   procedure Initialize_3925 is
51669   begin
51670      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
51671       (Base + 3925,
51672        AMF.Internals.Tables.UML_String_Data_04.MS_0441'Access);
51673      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3925, (Is_Empty => True));
51674   end Initialize_3925;
51675
51676   ---------------------
51677   -- Initialize_3926 --
51678   ---------------------
51679
51680   procedure Initialize_3926 is
51681   begin
51682      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51683       (Base + 3926,
51684        AMF.Internals.Tables.UML_String_Data_03.MS_0338'Access);
51685   end Initialize_3926;
51686
51687   ---------------------
51688   -- Initialize_3927 --
51689   ---------------------
51690
51691   procedure Initialize_3927 is
51692   begin
51693      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3927, (Is_Empty => True));
51694   end Initialize_3927;
51695
51696   ---------------------
51697   -- Initialize_3928 --
51698   ---------------------
51699
51700   procedure Initialize_3928 is
51701   begin
51702      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
51703       (Base + 3928,
51704        AMF.Internals.Tables.UML_String_Data_04.MS_0431'Access);
51705      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3928, (Is_Empty => True));
51706   end Initialize_3928;
51707
51708   ---------------------
51709   -- Initialize_3929 --
51710   ---------------------
51711
51712   procedure Initialize_3929 is
51713   begin
51714      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51715       (Base + 3929,
51716        AMF.Internals.Tables.UML_String_Data_0A.MS_0AFF'Access);
51717   end Initialize_3929;
51718
51719   ---------------------
51720   -- Initialize_3930 --
51721   ---------------------
51722
51723   procedure Initialize_3930 is
51724   begin
51725      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3930, (Is_Empty => True));
51726   end Initialize_3930;
51727
51728   ---------------------
51729   -- Initialize_3931 --
51730   ---------------------
51731
51732   procedure Initialize_3931 is
51733   begin
51734      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51735       (Base + 3931,
51736        AMF.Internals.Tables.UML_String_Data_01.MS_01A2'Access);
51737   end Initialize_3931;
51738
51739   ---------------------
51740   -- Initialize_3932 --
51741   ---------------------
51742
51743   procedure Initialize_3932 is
51744   begin
51745      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51746       (Base + 3932,
51747        AMF.Internals.Tables.UML_String_Data_05.MS_057E'Access);
51748   end Initialize_3932;
51749
51750   ---------------------
51751   -- Initialize_3933 --
51752   ---------------------
51753
51754   procedure Initialize_3933 is
51755   begin
51756      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
51757       (Base + 3933,
51758        AMF.Internals.Tables.UML_String_Data_04.MS_0431'Access);
51759      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3933, (Is_Empty => True));
51760   end Initialize_3933;
51761
51762   ---------------------
51763   -- Initialize_3934 --
51764   ---------------------
51765
51766   procedure Initialize_3934 is
51767   begin
51768      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51769       (Base + 3934,
51770        AMF.Internals.Tables.UML_String_Data_0C.MS_0C17'Access);
51771   end Initialize_3934;
51772
51773   ---------------------
51774   -- Initialize_3935 --
51775   ---------------------
51776
51777   procedure Initialize_3935 is
51778   begin
51779      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3935, (Is_Empty => True));
51780   end Initialize_3935;
51781
51782   ---------------------
51783   -- Initialize_3936 --
51784   ---------------------
51785
51786   procedure Initialize_3936 is
51787   begin
51788      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
51789       (Base + 3936,
51790        AMF.Internals.Tables.UML_String_Data_06.MS_0660'Access);
51791      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3936, (Is_Empty => True));
51792   end Initialize_3936;
51793
51794   ---------------------
51795   -- Initialize_3937 --
51796   ---------------------
51797
51798   procedure Initialize_3937 is
51799   begin
51800      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51801       (Base + 3937,
51802        AMF.Internals.Tables.UML_String_Data_05.MS_0540'Access);
51803   end Initialize_3937;
51804
51805   ---------------------
51806   -- Initialize_3938 --
51807   ---------------------
51808
51809   procedure Initialize_3938 is
51810   begin
51811      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3938, (Is_Empty => True));
51812   end Initialize_3938;
51813
51814   ---------------------
51815   -- Initialize_3939 --
51816   ---------------------
51817
51818   procedure Initialize_3939 is
51819   begin
51820      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51821       (Base + 3939,
51822        AMF.Internals.Tables.UML_String_Data_01.MS_01A2'Access);
51823   end Initialize_3939;
51824
51825   ---------------------
51826   -- Initialize_3940 --
51827   ---------------------
51828
51829   procedure Initialize_3940 is
51830   begin
51831      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51832       (Base + 3940,
51833        AMF.Internals.Tables.UML_String_Data_04.MS_04C1'Access);
51834   end Initialize_3940;
51835
51836   ---------------------
51837   -- Initialize_3941 --
51838   ---------------------
51839
51840   procedure Initialize_3941 is
51841   begin
51842      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51843       (Base + 3941,
51844        AMF.Internals.Tables.UML_String_Data_0A.MS_0ABD'Access);
51845   end Initialize_3941;
51846
51847   ---------------------
51848   -- Initialize_3942 --
51849   ---------------------
51850
51851   procedure Initialize_3942 is
51852   begin
51853      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
51854       (Base + 3942,
51855        AMF.Internals.Tables.UML_String_Data_09.MS_09AE'Access);
51856      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3942, (Is_Empty => True));
51857   end Initialize_3942;
51858
51859   ---------------------
51860   -- Initialize_3943 --
51861   ---------------------
51862
51863   procedure Initialize_3943 is
51864   begin
51865      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51866       (Base + 3943,
51867        AMF.Internals.Tables.UML_String_Data_00.MS_00F0'Access);
51868   end Initialize_3943;
51869
51870   ---------------------
51871   -- Initialize_3944 --
51872   ---------------------
51873
51874   procedure Initialize_3944 is
51875   begin
51876      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3944, (Is_Empty => True));
51877   end Initialize_3944;
51878
51879   ---------------------
51880   -- Initialize_3945 --
51881   ---------------------
51882
51883   procedure Initialize_3945 is
51884   begin
51885      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51886       (Base + 3945,
51887        AMF.Internals.Tables.UML_String_Data_0A.MS_0ABA'Access);
51888   end Initialize_3945;
51889
51890   ---------------------
51891   -- Initialize_3946 --
51892   ---------------------
51893
51894   procedure Initialize_3946 is
51895   begin
51896      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51897       (Base + 3946,
51898        AMF.Internals.Tables.UML_String_Data_08.MS_08B4'Access);
51899   end Initialize_3946;
51900
51901   ---------------------
51902   -- Initialize_3947 --
51903   ---------------------
51904
51905   procedure Initialize_3947 is
51906   begin
51907      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
51908       (Base + 3947,
51909        AMF.Internals.Tables.UML_String_Data_01.MS_01DA'Access);
51910      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3947, (Is_Empty => True));
51911   end Initialize_3947;
51912
51913   ---------------------
51914   -- Initialize_3948 --
51915   ---------------------
51916
51917   procedure Initialize_3948 is
51918   begin
51919      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51920       (Base + 3948,
51921        AMF.Internals.Tables.UML_String_Data_07.MS_07ED'Access);
51922   end Initialize_3948;
51923
51924   ---------------------
51925   -- Initialize_3949 --
51926   ---------------------
51927
51928   procedure Initialize_3949 is
51929   begin
51930      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3949, (Is_Empty => True));
51931   end Initialize_3949;
51932
51933   ---------------------
51934   -- Initialize_3950 --
51935   ---------------------
51936
51937   procedure Initialize_3950 is
51938   begin
51939      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
51940       (Base + 3950,
51941        AMF.Internals.Tables.UML_String_Data_09.MS_0977'Access);
51942      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3950, (Is_Empty => True));
51943   end Initialize_3950;
51944
51945   ---------------------
51946   -- Initialize_3951 --
51947   ---------------------
51948
51949   procedure Initialize_3951 is
51950   begin
51951      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51952       (Base + 3951,
51953        AMF.Internals.Tables.UML_String_Data_02.MS_022D'Access);
51954   end Initialize_3951;
51955
51956   ---------------------
51957   -- Initialize_3952 --
51958   ---------------------
51959
51960   procedure Initialize_3952 is
51961   begin
51962      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3952, (Is_Empty => True));
51963   end Initialize_3952;
51964
51965   ---------------------
51966   -- Initialize_3953 --
51967   ---------------------
51968
51969   procedure Initialize_3953 is
51970   begin
51971      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
51972       (Base + 3953,
51973        AMF.Internals.Tables.UML_String_Data_04.MS_0441'Access);
51974      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3953, (Is_Empty => True));
51975   end Initialize_3953;
51976
51977   ---------------------
51978   -- Initialize_3954 --
51979   ---------------------
51980
51981   procedure Initialize_3954 is
51982   begin
51983      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
51984       (Base + 3954,
51985        AMF.Internals.Tables.UML_String_Data_00.MS_009E'Access);
51986   end Initialize_3954;
51987
51988   ---------------------
51989   -- Initialize_3955 --
51990   ---------------------
51991
51992   procedure Initialize_3955 is
51993   begin
51994      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3955, (Is_Empty => True));
51995   end Initialize_3955;
51996
51997   ---------------------
51998   -- Initialize_3956 --
51999   ---------------------
52000
52001   procedure Initialize_3956 is
52002   begin
52003      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52004       (Base + 3956,
52005        AMF.Internals.Tables.UML_String_Data_02.MS_0200'Access);
52006   end Initialize_3956;
52007
52008   ---------------------
52009   -- Initialize_3957 --
52010   ---------------------
52011
52012   procedure Initialize_3957 is
52013   begin
52014      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52015       (Base + 3957,
52016        AMF.Internals.Tables.UML_String_Data_00.MS_0038'Access);
52017   end Initialize_3957;
52018
52019   ---------------------
52020   -- Initialize_3958 --
52021   ---------------------
52022
52023   procedure Initialize_3958 is
52024   begin
52025      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52026       (Base + 3958,
52027        AMF.Internals.Tables.UML_String_Data_02.MS_027B'Access);
52028   end Initialize_3958;
52029
52030   ---------------------
52031   -- Initialize_3959 --
52032   ---------------------
52033
52034   procedure Initialize_3959 is
52035   begin
52036      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52037       (Base + 3959,
52038        AMF.Internals.Tables.UML_String_Data_02.MS_029E'Access);
52039   end Initialize_3959;
52040
52041   ---------------------
52042   -- Initialize_3960 --
52043   ---------------------
52044
52045   procedure Initialize_3960 is
52046   begin
52047      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52048       (Base + 3960,
52049        AMF.Internals.Tables.UML_String_Data_01.MS_014A'Access);
52050   end Initialize_3960;
52051
52052   ---------------------
52053   -- Initialize_3961 --
52054   ---------------------
52055
52056   procedure Initialize_3961 is
52057   begin
52058      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
52059       (Base + 3961,
52060        AMF.Internals.Tables.UML_String_Data_03.MS_0330'Access);
52061      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3961, (Is_Empty => True));
52062   end Initialize_3961;
52063
52064   ---------------------
52065   -- Initialize_3962 --
52066   ---------------------
52067
52068   procedure Initialize_3962 is
52069   begin
52070      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52071       (Base + 3962,
52072        AMF.Internals.Tables.UML_String_Data_0A.MS_0A3C'Access);
52073   end Initialize_3962;
52074
52075   ---------------------
52076   -- Initialize_3963 --
52077   ---------------------
52078
52079   procedure Initialize_3963 is
52080   begin
52081      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3963, (Is_Empty => True));
52082   end Initialize_3963;
52083
52084   ---------------------
52085   -- Initialize_3964 --
52086   ---------------------
52087
52088   procedure Initialize_3964 is
52089   begin
52090      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
52091       (Base + 3964,
52092        AMF.Internals.Tables.UML_String_Data_02.MS_02EB'Access);
52093      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3964, (Is_Empty => True));
52094   end Initialize_3964;
52095
52096   ---------------------
52097   -- Initialize_3965 --
52098   ---------------------
52099
52100   procedure Initialize_3965 is
52101   begin
52102      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52103       (Base + 3965,
52104        AMF.Internals.Tables.UML_String_Data_04.MS_04C3'Access);
52105   end Initialize_3965;
52106
52107   ---------------------
52108   -- Initialize_3966 --
52109   ---------------------
52110
52111   procedure Initialize_3966 is
52112   begin
52113      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3966, (Is_Empty => True));
52114   end Initialize_3966;
52115
52116   ---------------------
52117   -- Initialize_3967 --
52118   ---------------------
52119
52120   procedure Initialize_3967 is
52121   begin
52122      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
52123       (Base + 3967,
52124        AMF.Internals.Tables.UML_String_Data_04.MS_04C7'Access);
52125      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3967, (Is_Empty => True));
52126   end Initialize_3967;
52127
52128   ---------------------
52129   -- Initialize_3968 --
52130   ---------------------
52131
52132   procedure Initialize_3968 is
52133   begin
52134      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52135       (Base + 3968,
52136        AMF.Internals.Tables.UML_String_Data_03.MS_0395'Access);
52137   end Initialize_3968;
52138
52139   ---------------------
52140   -- Initialize_3969 --
52141   ---------------------
52142
52143   procedure Initialize_3969 is
52144   begin
52145      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3969, (Is_Empty => True));
52146   end Initialize_3969;
52147
52148   ---------------------
52149   -- Initialize_3970 --
52150   ---------------------
52151
52152   procedure Initialize_3970 is
52153   begin
52154      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52155       (Base + 3970,
52156        AMF.Internals.Tables.UML_String_Data_03.MS_03A8'Access);
52157   end Initialize_3970;
52158
52159   ---------------------
52160   -- Initialize_3971 --
52161   ---------------------
52162
52163   procedure Initialize_3971 is
52164   begin
52165      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52166       (Base + 3971,
52167        AMF.Internals.Tables.UML_String_Data_08.MS_08EC'Access);
52168   end Initialize_3971;
52169
52170   ---------------------
52171   -- Initialize_3972 --
52172   ---------------------
52173
52174   procedure Initialize_3972 is
52175   begin
52176      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52177       (Base + 3972,
52178        AMF.Internals.Tables.UML_String_Data_00.MS_002C'Access);
52179   end Initialize_3972;
52180
52181   ---------------------
52182   -- Initialize_3973 --
52183   ---------------------
52184
52185   procedure Initialize_3973 is
52186   begin
52187      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3973, True);
52188      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
52189       (Base + 3973,
52190        AMF.Internals.Tables.UML_String_Data_08.MS_08AE'Access);
52191      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3973, (False, AMF.CMOF.Public_Visibility));
52192   end Initialize_3973;
52193
52194   ---------------------
52195   -- Initialize_3974 --
52196   ---------------------
52197
52198   procedure Initialize_3974 is
52199   begin
52200      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52201       (Base + 3974,
52202        AMF.Internals.Tables.UML_String_Data_01.MS_0172'Access);
52203   end Initialize_3974;
52204
52205   ---------------------
52206   -- Initialize_3975 --
52207   ---------------------
52208
52209   procedure Initialize_3975 is
52210   begin
52211      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
52212       (Base + 3975,
52213        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
52214      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3975, (Is_Empty => True));
52215   end Initialize_3975;
52216
52217   ---------------------
52218   -- Initialize_3976 --
52219   ---------------------
52220
52221   procedure Initialize_3976 is
52222   begin
52223      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3976, (Is_Empty => True));
52224   end Initialize_3976;
52225
52226   ---------------------
52227   -- Initialize_3977 --
52228   ---------------------
52229
52230   procedure Initialize_3977 is
52231   begin
52232      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
52233       (Base + 3977,
52234        AMF.Internals.Tables.UML_String_Data_0B.MS_0BFB'Access);
52235      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3977, (Is_Empty => True));
52236   end Initialize_3977;
52237
52238   ---------------------
52239   -- Initialize_3978 --
52240   ---------------------
52241
52242   procedure Initialize_3978 is
52243   begin
52244      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3978, (Is_Empty => True));
52245   end Initialize_3978;
52246
52247   ---------------------
52248   -- Initialize_3979 --
52249   ---------------------
52250
52251   procedure Initialize_3979 is
52252   begin
52253      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3979, AMF.CMOF.Return_Parameter);
52254      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
52255       (Base + 3979,
52256        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
52257      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3979, (False, AMF.CMOF.Public_Visibility));
52258   end Initialize_3979;
52259
52260   ---------------------
52261   -- Initialize_3980 --
52262   ---------------------
52263
52264   procedure Initialize_3980 is
52265   begin
52266      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3980, AMF.CMOF.In_Parameter);
52267      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
52268       (Base + 3980,
52269        AMF.Internals.Tables.UML_String_Data_0B.MS_0B5C'Access);
52270      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3980, (False, AMF.CMOF.Public_Visibility));
52271   end Initialize_3980;
52272
52273   ---------------------
52274   -- Initialize_3981 --
52275   ---------------------
52276
52277   procedure Initialize_3981 is
52278   begin
52279      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3981, True);
52280      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
52281       (Base + 3981,
52282        AMF.Internals.Tables.UML_String_Data_0B.MS_0BA9'Access);
52283      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3981, (False, AMF.CMOF.Public_Visibility));
52284   end Initialize_3981;
52285
52286   ---------------------
52287   -- Initialize_3982 --
52288   ---------------------
52289
52290   procedure Initialize_3982 is
52291   begin
52292      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52293       (Base + 3982,
52294        AMF.Internals.Tables.UML_String_Data_0C.MS_0C7B'Access);
52295   end Initialize_3982;
52296
52297   ---------------------
52298   -- Initialize_3983 --
52299   ---------------------
52300
52301   procedure Initialize_3983 is
52302   begin
52303      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
52304       (Base + 3983,
52305        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
52306      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3983, (Is_Empty => True));
52307   end Initialize_3983;
52308
52309   ---------------------
52310   -- Initialize_3984 --
52311   ---------------------
52312
52313   procedure Initialize_3984 is
52314   begin
52315      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3984, (Is_Empty => True));
52316   end Initialize_3984;
52317
52318   ---------------------
52319   -- Initialize_3985 --
52320   ---------------------
52321
52322   procedure Initialize_3985 is
52323   begin
52324      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3985, AMF.CMOF.Return_Parameter);
52325      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
52326       (Base + 3985,
52327        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
52328      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3985, (False, AMF.CMOF.Public_Visibility));
52329   end Initialize_3985;
52330
52331   ---------------------
52332   -- Initialize_3986 --
52333   ---------------------
52334
52335   procedure Initialize_3986 is
52336   begin
52337      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3986, AMF.CMOF.In_Parameter);
52338      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
52339       (Base + 3986,
52340        AMF.Internals.Tables.UML_String_Data_07.MS_0712'Access);
52341      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3986, (False, AMF.CMOF.Public_Visibility));
52342   end Initialize_3986;
52343
52344   ---------------------
52345   -- Initialize_3987 --
52346   ---------------------
52347
52348   procedure Initialize_3987 is
52349   begin
52350      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52351       (Base + 3987,
52352        AMF.Internals.Tables.UML_String_Data_09.MS_09D7'Access);
52353   end Initialize_3987;
52354
52355   ---------------------
52356   -- Initialize_3988 --
52357   ---------------------
52358
52359   procedure Initialize_3988 is
52360   begin
52361      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
52362       (Base + 3988,
52363        AMF.Internals.Tables.UML_String_Data_03.MS_0358'Access);
52364      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3988, (Is_Empty => True));
52365   end Initialize_3988;
52366
52367   ---------------------
52368   -- Initialize_3989 --
52369   ---------------------
52370
52371   procedure Initialize_3989 is
52372   begin
52373      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52374       (Base + 3989,
52375        AMF.Internals.Tables.UML_String_Data_0B.MS_0BDA'Access);
52376   end Initialize_3989;
52377
52378   ---------------------
52379   -- Initialize_3990 --
52380   ---------------------
52381
52382   procedure Initialize_3990 is
52383   begin
52384      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3990, (Is_Empty => True));
52385   end Initialize_3990;
52386
52387   ---------------------
52388   -- Initialize_3991 --
52389   ---------------------
52390
52391   procedure Initialize_3991 is
52392   begin
52393      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52394       (Base + 3991,
52395        AMF.Internals.Tables.UML_String_Data_07.MS_07FC'Access);
52396   end Initialize_3991;
52397
52398   ---------------------
52399   -- Initialize_3992 --
52400   ---------------------
52401
52402   procedure Initialize_3992 is
52403   begin
52404      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52405       (Base + 3992,
52406        AMF.Internals.Tables.UML_String_Data_01.MS_0126'Access);
52407   end Initialize_3992;
52408
52409   ---------------------
52410   -- Initialize_3993 --
52411   ---------------------
52412
52413   procedure Initialize_3993 is
52414   begin
52415      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52416       (Base + 3993,
52417        AMF.Internals.Tables.UML_String_Data_06.MS_06B5'Access);
52418   end Initialize_3993;
52419
52420   ---------------------
52421   -- Initialize_3994 --
52422   ---------------------
52423
52424   procedure Initialize_3994 is
52425   begin
52426      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3994, True);
52427      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
52428       (Base + 3994,
52429        AMF.Internals.Tables.UML_String_Data_04.MS_04A2'Access);
52430      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3994, (False, AMF.CMOF.Public_Visibility));
52431   end Initialize_3994;
52432
52433   ---------------------
52434   -- Initialize_3995 --
52435   ---------------------
52436
52437   procedure Initialize_3995 is
52438   begin
52439      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52440       (Base + 3995,
52441        AMF.Internals.Tables.UML_String_Data_09.MS_099C'Access);
52442   end Initialize_3995;
52443
52444   ---------------------
52445   -- Initialize_3996 --
52446   ---------------------
52447
52448   procedure Initialize_3996 is
52449   begin
52450      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
52451       (Base + 3996,
52452        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
52453      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3996, (Is_Empty => True));
52454   end Initialize_3996;
52455
52456   ---------------------
52457   -- Initialize_3997 --
52458   ---------------------
52459
52460   procedure Initialize_3997 is
52461   begin
52462      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3997, (Is_Empty => True));
52463   end Initialize_3997;
52464
52465   ---------------------
52466   -- Initialize_3998 --
52467   ---------------------
52468
52469   procedure Initialize_3998 is
52470   begin
52471      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 3998, AMF.CMOF.Return_Parameter);
52472      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 3998, (False, 0));
52473      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
52474       (Base + 3998,
52475        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
52476      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 3998, (False, (Unlimited => True)));
52477      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3998, (False, AMF.CMOF.Public_Visibility));
52478   end Initialize_3998;
52479
52480   ---------------------
52481   -- Initialize_3999 --
52482   ---------------------
52483
52484   procedure Initialize_3999 is
52485   begin
52486      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 3999, True);
52487      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
52488       (Base + 3999,
52489        AMF.Internals.Tables.UML_String_Data_08.MS_08AE'Access);
52490      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 3999, (False, AMF.CMOF.Public_Visibility));
52491   end Initialize_3999;
52492
52493   ---------------------
52494   -- Initialize_4000 --
52495   ---------------------
52496
52497   procedure Initialize_4000 is
52498   begin
52499      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52500       (Base + 4000,
52501        AMF.Internals.Tables.UML_String_Data_0C.MS_0C82'Access);
52502   end Initialize_4000;
52503
52504   ---------------------
52505   -- Initialize_4001 --
52506   ---------------------
52507
52508   procedure Initialize_4001 is
52509   begin
52510      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
52511       (Base + 4001,
52512        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
52513      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4001, (Is_Empty => True));
52514   end Initialize_4001;
52515
52516   ---------------------
52517   -- Initialize_4002 --
52518   ---------------------
52519
52520   procedure Initialize_4002 is
52521   begin
52522      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
52523       (Base + 4002,
52524        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
52525      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4002, (Is_Empty => True));
52526   end Initialize_4002;
52527
52528   ---------------------
52529   -- Initialize_4003 --
52530   ---------------------
52531
52532   procedure Initialize_4003 is
52533   begin
52534      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
52535       (Base + 4003,
52536        AMF.Internals.Tables.UML_String_Data_0B.MS_0BFB'Access);
52537      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4003, (Is_Empty => True));
52538   end Initialize_4003;
52539
52540   ---------------------
52541   -- Initialize_4004 --
52542   ---------------------
52543
52544   procedure Initialize_4004 is
52545   begin
52546      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4004, (Is_Empty => True));
52547   end Initialize_4004;
52548
52549   ---------------------
52550   -- Initialize_4005 --
52551   ---------------------
52552
52553   procedure Initialize_4005 is
52554   begin
52555      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4005, AMF.CMOF.Return_Parameter);
52556      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
52557       (Base + 4005,
52558        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
52559      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4005, (False, AMF.CMOF.Public_Visibility));
52560   end Initialize_4005;
52561
52562   ---------------------
52563   -- Initialize_4006 --
52564   ---------------------
52565
52566   procedure Initialize_4006 is
52567   begin
52568      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4006, AMF.CMOF.In_Parameter);
52569      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
52570       (Base + 4006,
52571        AMF.Internals.Tables.UML_String_Data_0B.MS_0B5C'Access);
52572      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4006, (False, AMF.CMOF.Public_Visibility));
52573   end Initialize_4006;
52574
52575   ---------------------
52576   -- Initialize_4007 --
52577   ---------------------
52578
52579   procedure Initialize_4007 is
52580   begin
52581      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52582       (Base + 4007,
52583        AMF.Internals.Tables.UML_String_Data_04.MS_043A'Access);
52584   end Initialize_4007;
52585
52586   ---------------------
52587   -- Initialize_4008 --
52588   ---------------------
52589
52590   procedure Initialize_4008 is
52591   begin
52592      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
52593       (Base + 4008,
52594        AMF.Internals.Tables.UML_String_Data_0B.MS_0BC8'Access);
52595      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4008, (Is_Empty => True));
52596   end Initialize_4008;
52597
52598   ---------------------
52599   -- Initialize_4009 --
52600   ---------------------
52601
52602   procedure Initialize_4009 is
52603   begin
52604      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52605       (Base + 4009,
52606        AMF.Internals.Tables.UML_String_Data_03.MS_0348'Access);
52607   end Initialize_4009;
52608
52609   ---------------------
52610   -- Initialize_4010 --
52611   ---------------------
52612
52613   procedure Initialize_4010 is
52614   begin
52615      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4010, (Is_Empty => True));
52616   end Initialize_4010;
52617
52618   ---------------------
52619   -- Initialize_4011 --
52620   ---------------------
52621
52622   procedure Initialize_4011 is
52623   begin
52624      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
52625       (Base + 4011,
52626        AMF.Internals.Tables.UML_String_Data_0B.MS_0B0C'Access);
52627      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4011, (Is_Empty => True));
52628   end Initialize_4011;
52629
52630   ---------------------
52631   -- Initialize_4012 --
52632   ---------------------
52633
52634   procedure Initialize_4012 is
52635   begin
52636      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52637       (Base + 4012,
52638        AMF.Internals.Tables.UML_String_Data_04.MS_0433'Access);
52639   end Initialize_4012;
52640
52641   ---------------------
52642   -- Initialize_4013 --
52643   ---------------------
52644
52645   procedure Initialize_4013 is
52646   begin
52647      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4013, (Is_Empty => True));
52648   end Initialize_4013;
52649
52650   ---------------------
52651   -- Initialize_4014 --
52652   ---------------------
52653
52654   procedure Initialize_4014 is
52655   begin
52656      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
52657       (Base + 4014,
52658        AMF.Internals.Tables.UML_String_Data_06.MS_06E1'Access);
52659      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4014, (Is_Empty => True));
52660   end Initialize_4014;
52661
52662   ---------------------
52663   -- Initialize_4015 --
52664   ---------------------
52665
52666   procedure Initialize_4015 is
52667   begin
52668      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52669       (Base + 4015,
52670        AMF.Internals.Tables.UML_String_Data_0B.MS_0B00'Access);
52671   end Initialize_4015;
52672
52673   ---------------------
52674   -- Initialize_4016 --
52675   ---------------------
52676
52677   procedure Initialize_4016 is
52678   begin
52679      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4016, (Is_Empty => True));
52680   end Initialize_4016;
52681
52682   ---------------------
52683   -- Initialize_4017 --
52684   ---------------------
52685
52686   procedure Initialize_4017 is
52687   begin
52688      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52689       (Base + 4017,
52690        AMF.Internals.Tables.UML_String_Data_04.MS_04BF'Access);
52691   end Initialize_4017;
52692
52693   ---------------------
52694   -- Initialize_4018 --
52695   ---------------------
52696
52697   procedure Initialize_4018 is
52698   begin
52699      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52700       (Base + 4018,
52701        AMF.Internals.Tables.UML_String_Data_00.MS_0062'Access);
52702   end Initialize_4018;
52703
52704   ---------------------
52705   -- Initialize_4019 --
52706   ---------------------
52707
52708   procedure Initialize_4019 is
52709   begin
52710      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52711       (Base + 4019,
52712        AMF.Internals.Tables.UML_String_Data_00.MS_0054'Access);
52713   end Initialize_4019;
52714
52715   ---------------------
52716   -- Initialize_4020 --
52717   ---------------------
52718
52719   procedure Initialize_4020 is
52720   begin
52721      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52722       (Base + 4020,
52723        AMF.Internals.Tables.UML_String_Data_01.MS_01A2'Access);
52724   end Initialize_4020;
52725
52726   ---------------------
52727   -- Initialize_4021 --
52728   ---------------------
52729
52730   procedure Initialize_4021 is
52731   begin
52732      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52733       (Base + 4021,
52734        AMF.Internals.Tables.UML_String_Data_02.MS_0225'Access);
52735   end Initialize_4021;
52736
52737   ---------------------
52738   -- Initialize_4022 --
52739   ---------------------
52740
52741   procedure Initialize_4022 is
52742   begin
52743      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
52744       (Base + 4022,
52745        AMF.Internals.Tables.UML_String_Data_0C.MS_0C86'Access);
52746      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4022, (Is_Empty => True));
52747   end Initialize_4022;
52748
52749   ---------------------
52750   -- Initialize_4023 --
52751   ---------------------
52752
52753   procedure Initialize_4023 is
52754   begin
52755      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52756       (Base + 4023,
52757        AMF.Internals.Tables.UML_String_Data_0A.MS_0AED'Access);
52758   end Initialize_4023;
52759
52760   ---------------------
52761   -- Initialize_4024 --
52762   ---------------------
52763
52764   procedure Initialize_4024 is
52765   begin
52766      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4024, (Is_Empty => True));
52767   end Initialize_4024;
52768
52769   ---------------------
52770   -- Initialize_4025 --
52771   ---------------------
52772
52773   procedure Initialize_4025 is
52774   begin
52775      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
52776       (Base + 4025,
52777        AMF.Internals.Tables.UML_String_Data_03.MS_0357'Access);
52778      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4025, (Is_Empty => True));
52779   end Initialize_4025;
52780
52781   ---------------------
52782   -- Initialize_4026 --
52783   ---------------------
52784
52785   procedure Initialize_4026 is
52786   begin
52787      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52788       (Base + 4026,
52789        AMF.Internals.Tables.UML_String_Data_0B.MS_0B81'Access);
52790   end Initialize_4026;
52791
52792   ---------------------
52793   -- Initialize_4027 --
52794   ---------------------
52795
52796   procedure Initialize_4027 is
52797   begin
52798      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4027, (Is_Empty => True));
52799   end Initialize_4027;
52800
52801   ---------------------
52802   -- Initialize_4028 --
52803   ---------------------
52804
52805   procedure Initialize_4028 is
52806   begin
52807      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
52808       (Base + 4028,
52809        AMF.Internals.Tables.UML_String_Data_01.MS_0153'Access);
52810      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4028, (Is_Empty => True));
52811   end Initialize_4028;
52812
52813   ---------------------
52814   -- Initialize_4029 --
52815   ---------------------
52816
52817   procedure Initialize_4029 is
52818   begin
52819      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52820       (Base + 4029,
52821        AMF.Internals.Tables.UML_String_Data_0A.MS_0ABB'Access);
52822   end Initialize_4029;
52823
52824   ---------------------
52825   -- Initialize_4030 --
52826   ---------------------
52827
52828   procedure Initialize_4030 is
52829   begin
52830      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4030, (Is_Empty => True));
52831   end Initialize_4030;
52832
52833   ---------------------
52834   -- Initialize_4031 --
52835   ---------------------
52836
52837   procedure Initialize_4031 is
52838   begin
52839      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
52840       (Base + 4031,
52841        AMF.Internals.Tables.UML_String_Data_0A.MS_0A83'Access);
52842      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4031, (Is_Empty => True));
52843   end Initialize_4031;
52844
52845   ---------------------
52846   -- Initialize_4032 --
52847   ---------------------
52848
52849   procedure Initialize_4032 is
52850   begin
52851      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52852       (Base + 4032,
52853        AMF.Internals.Tables.UML_String_Data_01.MS_015E'Access);
52854   end Initialize_4032;
52855
52856   ---------------------
52857   -- Initialize_4033 --
52858   ---------------------
52859
52860   procedure Initialize_4033 is
52861   begin
52862      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4033, (Is_Empty => True));
52863   end Initialize_4033;
52864
52865   ---------------------
52866   -- Initialize_4034 --
52867   ---------------------
52868
52869   procedure Initialize_4034 is
52870   begin
52871      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52872       (Base + 4034,
52873        AMF.Internals.Tables.UML_String_Data_08.MS_08DD'Access);
52874   end Initialize_4034;
52875
52876   ---------------------
52877   -- Initialize_4035 --
52878   ---------------------
52879
52880   procedure Initialize_4035 is
52881   begin
52882      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52883       (Base + 4035,
52884        AMF.Internals.Tables.UML_String_Data_02.MS_0254'Access);
52885   end Initialize_4035;
52886
52887   ---------------------
52888   -- Initialize_4036 --
52889   ---------------------
52890
52891   procedure Initialize_4036 is
52892   begin
52893      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52894       (Base + 4036,
52895        AMF.Internals.Tables.UML_String_Data_09.MS_0980'Access);
52896   end Initialize_4036;
52897
52898   ---------------------
52899   -- Initialize_4037 --
52900   ---------------------
52901
52902   procedure Initialize_4037 is
52903   begin
52904      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52905       (Base + 4037,
52906        AMF.Internals.Tables.UML_String_Data_00.MS_0063'Access);
52907   end Initialize_4037;
52908
52909   ---------------------
52910   -- Initialize_4038 --
52911   ---------------------
52912
52913   procedure Initialize_4038 is
52914   begin
52915      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52916       (Base + 4038,
52917        AMF.Internals.Tables.UML_String_Data_00.MS_00E4'Access);
52918   end Initialize_4038;
52919
52920   ---------------------
52921   -- Initialize_4039 --
52922   ---------------------
52923
52924   procedure Initialize_4039 is
52925   begin
52926      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52927       (Base + 4039,
52928        AMF.Internals.Tables.UML_String_Data_04.MS_04BC'Access);
52929   end Initialize_4039;
52930
52931   ---------------------
52932   -- Initialize_4040 --
52933   ---------------------
52934
52935   procedure Initialize_4040 is
52936   begin
52937      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4040, True);
52938      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
52939       (Base + 4040,
52940        AMF.Internals.Tables.UML_String_Data_02.MS_024F'Access);
52941      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4040, (False, AMF.CMOF.Public_Visibility));
52942   end Initialize_4040;
52943
52944   ---------------------
52945   -- Initialize_4041 --
52946   ---------------------
52947
52948   procedure Initialize_4041 is
52949   begin
52950      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
52951       (Base + 4041,
52952        AMF.Internals.Tables.UML_String_Data_09.MS_0976'Access);
52953   end Initialize_4041;
52954
52955   ---------------------
52956   -- Initialize_4042 --
52957   ---------------------
52958
52959   procedure Initialize_4042 is
52960   begin
52961      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
52962       (Base + 4042,
52963        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
52964      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4042, (Is_Empty => True));
52965   end Initialize_4042;
52966
52967   ---------------------
52968   -- Initialize_4043 --
52969   ---------------------
52970
52971   procedure Initialize_4043 is
52972   begin
52973      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4043, (Is_Empty => True));
52974   end Initialize_4043;
52975
52976   ---------------------
52977   -- Initialize_4044 --
52978   ---------------------
52979
52980   procedure Initialize_4044 is
52981   begin
52982      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4044, AMF.CMOF.Return_Parameter);
52983      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
52984       (Base + 4044,
52985        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
52986      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4044, (False, AMF.CMOF.Public_Visibility));
52987   end Initialize_4044;
52988
52989   ---------------------
52990   -- Initialize_4045 --
52991   ---------------------
52992
52993   procedure Initialize_4045 is
52994   begin
52995      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4045, True);
52996      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
52997       (Base + 4045,
52998        AMF.Internals.Tables.UML_String_Data_00.MS_00F2'Access);
52999      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4045, (False, AMF.CMOF.Public_Visibility));
53000   end Initialize_4045;
53001
53002   ---------------------
53003   -- Initialize_4046 --
53004   ---------------------
53005
53006   procedure Initialize_4046 is
53007   begin
53008      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53009       (Base + 4046,
53010        AMF.Internals.Tables.UML_String_Data_09.MS_0932'Access);
53011   end Initialize_4046;
53012
53013   ---------------------
53014   -- Initialize_4047 --
53015   ---------------------
53016
53017   procedure Initialize_4047 is
53018   begin
53019      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
53020       (Base + 4047,
53021        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
53022      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4047, (Is_Empty => True));
53023   end Initialize_4047;
53024
53025   ---------------------
53026   -- Initialize_4048 --
53027   ---------------------
53028
53029   procedure Initialize_4048 is
53030   begin
53031      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4048, (Is_Empty => True));
53032   end Initialize_4048;
53033
53034   ---------------------
53035   -- Initialize_4049 --
53036   ---------------------
53037
53038   procedure Initialize_4049 is
53039   begin
53040      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4049, AMF.CMOF.Return_Parameter);
53041      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
53042       (Base + 4049,
53043        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
53044      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4049, (False, AMF.CMOF.Public_Visibility));
53045   end Initialize_4049;
53046
53047   ---------------------
53048   -- Initialize_4050 --
53049   ---------------------
53050
53051   procedure Initialize_4050 is
53052   begin
53053      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4050, True);
53054      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
53055       (Base + 4050,
53056        AMF.Internals.Tables.UML_String_Data_08.MS_08AE'Access);
53057      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4050, (False, AMF.CMOF.Public_Visibility));
53058   end Initialize_4050;
53059
53060   ---------------------
53061   -- Initialize_4051 --
53062   ---------------------
53063
53064   procedure Initialize_4051 is
53065   begin
53066      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53067       (Base + 4051,
53068        AMF.Internals.Tables.UML_String_Data_0B.MS_0BCE'Access);
53069   end Initialize_4051;
53070
53071   ---------------------
53072   -- Initialize_4052 --
53073   ---------------------
53074
53075   procedure Initialize_4052 is
53076   begin
53077      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
53078       (Base + 4052,
53079        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
53080      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4052, (Is_Empty => True));
53081   end Initialize_4052;
53082
53083   ---------------------
53084   -- Initialize_4053 --
53085   ---------------------
53086
53087   procedure Initialize_4053 is
53088   begin
53089      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4053, (Is_Empty => True));
53090   end Initialize_4053;
53091
53092   ---------------------
53093   -- Initialize_4054 --
53094   ---------------------
53095
53096   procedure Initialize_4054 is
53097   begin
53098      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4054, AMF.CMOF.Return_Parameter);
53099      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
53100       (Base + 4054,
53101        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
53102      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4054, (False, AMF.CMOF.Public_Visibility));
53103   end Initialize_4054;
53104
53105   ---------------------
53106   -- Initialize_4055 --
53107   ---------------------
53108
53109   procedure Initialize_4055 is
53110   begin
53111      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4055, AMF.CMOF.In_Parameter);
53112      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
53113       (Base + 4055,
53114        AMF.Internals.Tables.UML_String_Data_0B.MS_0B5C'Access);
53115      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4055, (False, AMF.CMOF.Public_Visibility));
53116   end Initialize_4055;
53117
53118   ---------------------
53119   -- Initialize_4056 --
53120   ---------------------
53121
53122   procedure Initialize_4056 is
53123   begin
53124      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4056, True);
53125      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
53126       (Base + 4056,
53127        AMF.Internals.Tables.UML_String_Data_0B.MS_0BA9'Access);
53128      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4056, (False, AMF.CMOF.Public_Visibility));
53129   end Initialize_4056;
53130
53131   ---------------------
53132   -- Initialize_4057 --
53133   ---------------------
53134
53135   procedure Initialize_4057 is
53136   begin
53137      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53138       (Base + 4057,
53139        AMF.Internals.Tables.UML_String_Data_08.MS_0831'Access);
53140   end Initialize_4057;
53141
53142   ---------------------
53143   -- Initialize_4058 --
53144   ---------------------
53145
53146   procedure Initialize_4058 is
53147   begin
53148      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
53149       (Base + 4058,
53150        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
53151      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4058, (Is_Empty => True));
53152   end Initialize_4058;
53153
53154   ---------------------
53155   -- Initialize_4059 --
53156   ---------------------
53157
53158   procedure Initialize_4059 is
53159   begin
53160      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4059, (Is_Empty => True));
53161   end Initialize_4059;
53162
53163   ---------------------
53164   -- Initialize_4060 --
53165   ---------------------
53166
53167   procedure Initialize_4060 is
53168   begin
53169      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4060, AMF.CMOF.Return_Parameter);
53170      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
53171       (Base + 4060,
53172        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
53173      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4060, (False, AMF.CMOF.Public_Visibility));
53174   end Initialize_4060;
53175
53176   ---------------------
53177   -- Initialize_4061 --
53178   ---------------------
53179
53180   procedure Initialize_4061 is
53181   begin
53182      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4061, AMF.CMOF.In_Parameter);
53183      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
53184       (Base + 4061,
53185        AMF.Internals.Tables.UML_String_Data_07.MS_0712'Access);
53186      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4061, (False, AMF.CMOF.Public_Visibility));
53187   end Initialize_4061;
53188
53189   ---------------------
53190   -- Initialize_4062 --
53191   ---------------------
53192
53193   procedure Initialize_4062 is
53194   begin
53195      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4062, True);
53196      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
53197       (Base + 4062,
53198        AMF.Internals.Tables.UML_String_Data_03.MS_036B'Access);
53199      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4062, (False, AMF.CMOF.Public_Visibility));
53200   end Initialize_4062;
53201
53202   ---------------------
53203   -- Initialize_4063 --
53204   ---------------------
53205
53206   procedure Initialize_4063 is
53207   begin
53208      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53209       (Base + 4063,
53210        AMF.Internals.Tables.UML_String_Data_03.MS_03B2'Access);
53211   end Initialize_4063;
53212
53213   ---------------------
53214   -- Initialize_4064 --
53215   ---------------------
53216
53217   procedure Initialize_4064 is
53218   begin
53219      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
53220       (Base + 4064,
53221        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
53222      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4064, (Is_Empty => True));
53223   end Initialize_4064;
53224
53225   ---------------------
53226   -- Initialize_4065 --
53227   ---------------------
53228
53229   procedure Initialize_4065 is
53230   begin
53231      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4065, (Is_Empty => True));
53232   end Initialize_4065;
53233
53234   ---------------------
53235   -- Initialize_4066 --
53236   ---------------------
53237
53238   procedure Initialize_4066 is
53239   begin
53240      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4066, AMF.CMOF.Return_Parameter);
53241      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
53242       (Base + 4066,
53243        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
53244      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4066, (False, AMF.CMOF.Public_Visibility));
53245   end Initialize_4066;
53246
53247   ---------------------
53248   -- Initialize_4067 --
53249   ---------------------
53250
53251   procedure Initialize_4067 is
53252   begin
53253      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53254       (Base + 4067,
53255        AMF.Internals.Tables.UML_String_Data_0A.MS_0ACE'Access);
53256   end Initialize_4067;
53257
53258   ---------------------
53259   -- Initialize_4068 --
53260   ---------------------
53261
53262   procedure Initialize_4068 is
53263   begin
53264      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53265       (Base + 4068,
53266        AMF.Internals.Tables.UML_String_Data_05.MS_05D9'Access);
53267   end Initialize_4068;
53268
53269   ---------------------
53270   -- Initialize_4069 --
53271   ---------------------
53272
53273   procedure Initialize_4069 is
53274   begin
53275      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53276       (Base + 4069,
53277        AMF.Internals.Tables.UML_String_Data_0B.MS_0B70'Access);
53278   end Initialize_4069;
53279
53280   ---------------------
53281   -- Initialize_4070 --
53282   ---------------------
53283
53284   procedure Initialize_4070 is
53285   begin
53286      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
53287       (Base + 4070,
53288        AMF.Internals.Tables.UML_String_Data_01.MS_018D'Access);
53289      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4070, (Is_Empty => True));
53290   end Initialize_4070;
53291
53292   ---------------------
53293   -- Initialize_4071 --
53294   ---------------------
53295
53296   procedure Initialize_4071 is
53297   begin
53298      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53299       (Base + 4071,
53300        AMF.Internals.Tables.UML_String_Data_0B.MS_0B5B'Access);
53301   end Initialize_4071;
53302
53303   ---------------------
53304   -- Initialize_4072 --
53305   ---------------------
53306
53307   procedure Initialize_4072 is
53308   begin
53309      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4072, (Is_Empty => True));
53310   end Initialize_4072;
53311
53312   ---------------------
53313   -- Initialize_4073 --
53314   ---------------------
53315
53316   procedure Initialize_4073 is
53317   begin
53318      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53319       (Base + 4073,
53320        AMF.Internals.Tables.UML_String_Data_04.MS_0425'Access);
53321   end Initialize_4073;
53322
53323   ---------------------
53324   -- Initialize_4074 --
53325   ---------------------
53326
53327   procedure Initialize_4074 is
53328   begin
53329      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53330       (Base + 4074,
53331        AMF.Internals.Tables.UML_String_Data_02.MS_0279'Access);
53332   end Initialize_4074;
53333
53334   ---------------------
53335   -- Initialize_4075 --
53336   ---------------------
53337
53338   procedure Initialize_4075 is
53339   begin
53340      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53341       (Base + 4075,
53342        AMF.Internals.Tables.UML_String_Data_04.MS_043B'Access);
53343   end Initialize_4075;
53344
53345   ---------------------
53346   -- Initialize_4076 --
53347   ---------------------
53348
53349   procedure Initialize_4076 is
53350   begin
53351      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
53352       (Base + 4076,
53353        AMF.Internals.Tables.UML_String_Data_03.MS_03A2'Access);
53354      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4076, (Is_Empty => True));
53355   end Initialize_4076;
53356
53357   ---------------------
53358   -- Initialize_4077 --
53359   ---------------------
53360
53361   procedure Initialize_4077 is
53362   begin
53363      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53364       (Base + 4077,
53365        AMF.Internals.Tables.UML_String_Data_06.MS_06CD'Access);
53366   end Initialize_4077;
53367
53368   ---------------------
53369   -- Initialize_4078 --
53370   ---------------------
53371
53372   procedure Initialize_4078 is
53373   begin
53374      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4078, (Is_Empty => True));
53375   end Initialize_4078;
53376
53377   ---------------------
53378   -- Initialize_4079 --
53379   ---------------------
53380
53381   procedure Initialize_4079 is
53382   begin
53383      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53384       (Base + 4079,
53385        AMF.Internals.Tables.UML_String_Data_05.MS_05B5'Access);
53386   end Initialize_4079;
53387
53388   ---------------------
53389   -- Initialize_4080 --
53390   ---------------------
53391
53392   procedure Initialize_4080 is
53393   begin
53394      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53395       (Base + 4080,
53396        AMF.Internals.Tables.UML_String_Data_08.MS_083B'Access);
53397   end Initialize_4080;
53398
53399   ---------------------
53400   -- Initialize_4081 --
53401   ---------------------
53402
53403   procedure Initialize_4081 is
53404   begin
53405      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53406       (Base + 4081,
53407        AMF.Internals.Tables.UML_String_Data_06.MS_0692'Access);
53408   end Initialize_4081;
53409
53410   ---------------------
53411   -- Initialize_4082 --
53412   ---------------------
53413
53414   procedure Initialize_4082 is
53415   begin
53416      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
53417       (Base + 4082,
53418        AMF.Internals.Tables.UML_String_Data_08.MS_0876'Access);
53419      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4082, (Is_Empty => True));
53420   end Initialize_4082;
53421
53422   ---------------------
53423   -- Initialize_4083 --
53424   ---------------------
53425
53426   procedure Initialize_4083 is
53427   begin
53428      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53429       (Base + 4083,
53430        AMF.Internals.Tables.UML_String_Data_07.MS_0734'Access);
53431   end Initialize_4083;
53432
53433   ---------------------
53434   -- Initialize_4084 --
53435   ---------------------
53436
53437   procedure Initialize_4084 is
53438   begin
53439      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4084, (Is_Empty => True));
53440   end Initialize_4084;
53441
53442   ---------------------
53443   -- Initialize_4085 --
53444   ---------------------
53445
53446   procedure Initialize_4085 is
53447   begin
53448      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
53449       (Base + 4085,
53450        AMF.Internals.Tables.UML_String_Data_07.MS_07D8'Access);
53451      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4085, (Is_Empty => True));
53452   end Initialize_4085;
53453
53454   ---------------------
53455   -- Initialize_4086 --
53456   ---------------------
53457
53458   procedure Initialize_4086 is
53459   begin
53460      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53461       (Base + 4086,
53462        AMF.Internals.Tables.UML_String_Data_04.MS_0475'Access);
53463   end Initialize_4086;
53464
53465   ---------------------
53466   -- Initialize_4087 --
53467   ---------------------
53468
53469   procedure Initialize_4087 is
53470   begin
53471      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4087, (Is_Empty => True));
53472   end Initialize_4087;
53473
53474   ---------------------
53475   -- Initialize_4088 --
53476   ---------------------
53477
53478   procedure Initialize_4088 is
53479   begin
53480      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53481       (Base + 4088,
53482        AMF.Internals.Tables.UML_String_Data_00.MS_0013'Access);
53483   end Initialize_4088;
53484
53485   ---------------------
53486   -- Initialize_4089 --
53487   ---------------------
53488
53489   procedure Initialize_4089 is
53490   begin
53491      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53492       (Base + 4089,
53493        AMF.Internals.Tables.UML_String_Data_06.MS_0675'Access);
53494   end Initialize_4089;
53495
53496   ---------------------
53497   -- Initialize_4090 --
53498   ---------------------
53499
53500   procedure Initialize_4090 is
53501   begin
53502      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53503       (Base + 4090,
53504        AMF.Internals.Tables.UML_String_Data_04.MS_0451'Access);
53505   end Initialize_4090;
53506
53507   ---------------------
53508   -- Initialize_4091 --
53509   ---------------------
53510
53511   procedure Initialize_4091 is
53512   begin
53513      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53514       (Base + 4091,
53515        AMF.Internals.Tables.UML_String_Data_03.MS_030F'Access);
53516   end Initialize_4091;
53517
53518   ---------------------
53519   -- Initialize_4092 --
53520   ---------------------
53521
53522   procedure Initialize_4092 is
53523   begin
53524      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53525       (Base + 4092,
53526        AMF.Internals.Tables.UML_String_Data_05.MS_05B6'Access);
53527   end Initialize_4092;
53528
53529   ---------------------
53530   -- Initialize_4093 --
53531   ---------------------
53532
53533   procedure Initialize_4093 is
53534   begin
53535      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53536       (Base + 4093,
53537        AMF.Internals.Tables.UML_String_Data_01.MS_0145'Access);
53538   end Initialize_4093;
53539
53540   ---------------------
53541   -- Initialize_4094 --
53542   ---------------------
53543
53544   procedure Initialize_4094 is
53545   begin
53546      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53547       (Base + 4094,
53548        AMF.Internals.Tables.UML_String_Data_05.MS_053A'Access);
53549   end Initialize_4094;
53550
53551   ---------------------
53552   -- Initialize_4095 --
53553   ---------------------
53554
53555   procedure Initialize_4095 is
53556   begin
53557      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
53558       (Base + 4095,
53559        AMF.Internals.Tables.UML_String_Data_06.MS_0604'Access);
53560      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4095, (Is_Empty => True));
53561   end Initialize_4095;
53562
53563   ---------------------
53564   -- Initialize_4096 --
53565   ---------------------
53566
53567   procedure Initialize_4096 is
53568   begin
53569      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53570       (Base + 4096,
53571        AMF.Internals.Tables.UML_String_Data_01.MS_01B7'Access);
53572   end Initialize_4096;
53573
53574   ---------------------
53575   -- Initialize_4097 --
53576   ---------------------
53577
53578   procedure Initialize_4097 is
53579   begin
53580      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4097, (Is_Empty => True));
53581   end Initialize_4097;
53582
53583   ---------------------
53584   -- Initialize_4098 --
53585   ---------------------
53586
53587   procedure Initialize_4098 is
53588   begin
53589      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
53590       (Base + 4098,
53591        AMF.Internals.Tables.UML_String_Data_07.MS_0702'Access);
53592      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4098, (Is_Empty => True));
53593   end Initialize_4098;
53594
53595   ---------------------
53596   -- Initialize_4099 --
53597   ---------------------
53598
53599   procedure Initialize_4099 is
53600   begin
53601      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53602       (Base + 4099,
53603        AMF.Internals.Tables.UML_String_Data_0A.MS_0A5C'Access);
53604   end Initialize_4099;
53605
53606   ---------------------
53607   -- Initialize_4100 --
53608   ---------------------
53609
53610   procedure Initialize_4100 is
53611   begin
53612      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4100, (Is_Empty => True));
53613   end Initialize_4100;
53614
53615   ---------------------
53616   -- Initialize_4101 --
53617   ---------------------
53618
53619   procedure Initialize_4101 is
53620   begin
53621      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53622       (Base + 4101,
53623        AMF.Internals.Tables.UML_String_Data_06.MS_06E8'Access);
53624   end Initialize_4101;
53625
53626   ---------------------
53627   -- Initialize_4102 --
53628   ---------------------
53629
53630   procedure Initialize_4102 is
53631   begin
53632      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53633       (Base + 4102,
53634        AMF.Internals.Tables.UML_String_Data_04.MS_04BD'Access);
53635   end Initialize_4102;
53636
53637   ---------------------
53638   -- Initialize_4103 --
53639   ---------------------
53640
53641   procedure Initialize_4103 is
53642   begin
53643      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53644       (Base + 4103,
53645        AMF.Internals.Tables.UML_String_Data_05.MS_0557'Access);
53646   end Initialize_4103;
53647
53648   ---------------------
53649   -- Initialize_4104 --
53650   ---------------------
53651
53652   procedure Initialize_4104 is
53653   begin
53654      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53655       (Base + 4104,
53656        AMF.Internals.Tables.UML_String_Data_07.MS_07E9'Access);
53657   end Initialize_4104;
53658
53659   ---------------------
53660   -- Initialize_4105 --
53661   ---------------------
53662
53663   procedure Initialize_4105 is
53664   begin
53665      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53666       (Base + 4105,
53667        AMF.Internals.Tables.UML_String_Data_01.MS_0166'Access);
53668   end Initialize_4105;
53669
53670   ---------------------
53671   -- Initialize_4106 --
53672   ---------------------
53673
53674   procedure Initialize_4106 is
53675   begin
53676      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53677       (Base + 4106,
53678        AMF.Internals.Tables.UML_String_Data_06.MS_0658'Access);
53679   end Initialize_4106;
53680
53681   ---------------------
53682   -- Initialize_4107 --
53683   ---------------------
53684
53685   procedure Initialize_4107 is
53686   begin
53687      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53688       (Base + 4107,
53689        AMF.Internals.Tables.UML_String_Data_01.MS_0168'Access);
53690   end Initialize_4107;
53691
53692   ---------------------
53693   -- Initialize_4108 --
53694   ---------------------
53695
53696   procedure Initialize_4108 is
53697   begin
53698      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53699       (Base + 4108,
53700        AMF.Internals.Tables.UML_String_Data_01.MS_01F5'Access);
53701   end Initialize_4108;
53702
53703   ---------------------
53704   -- Initialize_4109 --
53705   ---------------------
53706
53707   procedure Initialize_4109 is
53708   begin
53709      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53710       (Base + 4109,
53711        AMF.Internals.Tables.UML_String_Data_01.MS_01A4'Access);
53712   end Initialize_4109;
53713
53714   ---------------------
53715   -- Initialize_4110 --
53716   ---------------------
53717
53718   procedure Initialize_4110 is
53719   begin
53720      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53721       (Base + 4110,
53722        AMF.Internals.Tables.UML_String_Data_02.MS_0228'Access);
53723   end Initialize_4110;
53724
53725   ---------------------
53726   -- Initialize_4111 --
53727   ---------------------
53728
53729   procedure Initialize_4111 is
53730   begin
53731      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53732       (Base + 4111,
53733        AMF.Internals.Tables.UML_String_Data_06.MS_0670'Access);
53734   end Initialize_4111;
53735
53736   ---------------------
53737   -- Initialize_4112 --
53738   ---------------------
53739
53740   procedure Initialize_4112 is
53741   begin
53742      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53743       (Base + 4112,
53744        AMF.Internals.Tables.UML_String_Data_07.MS_0787'Access);
53745   end Initialize_4112;
53746
53747   ---------------------
53748   -- Initialize_4113 --
53749   ---------------------
53750
53751   procedure Initialize_4113 is
53752   begin
53753      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53754       (Base + 4113,
53755        AMF.Internals.Tables.UML_String_Data_0A.MS_0ADF'Access);
53756   end Initialize_4113;
53757
53758   ---------------------
53759   -- Initialize_4114 --
53760   ---------------------
53761
53762   procedure Initialize_4114 is
53763   begin
53764      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
53765       (Base + 4114,
53766        AMF.Internals.Tables.UML_String_Data_04.MS_0441'Access);
53767      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4114, (Is_Empty => True));
53768   end Initialize_4114;
53769
53770   ---------------------
53771   -- Initialize_4115 --
53772   ---------------------
53773
53774   procedure Initialize_4115 is
53775   begin
53776      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53777       (Base + 4115,
53778        AMF.Internals.Tables.UML_String_Data_07.MS_07DF'Access);
53779   end Initialize_4115;
53780
53781   ---------------------
53782   -- Initialize_4116 --
53783   ---------------------
53784
53785   procedure Initialize_4116 is
53786   begin
53787      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4116, (Is_Empty => True));
53788   end Initialize_4116;
53789
53790   ---------------------
53791   -- Initialize_4117 --
53792   ---------------------
53793
53794   procedure Initialize_4117 is
53795   begin
53796      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
53797       (Base + 4117,
53798        AMF.Internals.Tables.UML_String_Data_01.MS_011B'Access);
53799      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4117, (Is_Empty => True));
53800   end Initialize_4117;
53801
53802   ---------------------
53803   -- Initialize_4118 --
53804   ---------------------
53805
53806   procedure Initialize_4118 is
53807   begin
53808      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53809       (Base + 4118,
53810        AMF.Internals.Tables.UML_String_Data_02.MS_02D8'Access);
53811   end Initialize_4118;
53812
53813   ---------------------
53814   -- Initialize_4119 --
53815   ---------------------
53816
53817   procedure Initialize_4119 is
53818   begin
53819      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4119, (Is_Empty => True));
53820   end Initialize_4119;
53821
53822   ---------------------
53823   -- Initialize_4120 --
53824   ---------------------
53825
53826   procedure Initialize_4120 is
53827   begin
53828      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53829       (Base + 4120,
53830        AMF.Internals.Tables.UML_String_Data_02.MS_029A'Access);
53831   end Initialize_4120;
53832
53833   ---------------------
53834   -- Initialize_4121 --
53835   ---------------------
53836
53837   procedure Initialize_4121 is
53838   begin
53839      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53840       (Base + 4121,
53841        AMF.Internals.Tables.UML_String_Data_07.MS_07B7'Access);
53842   end Initialize_4121;
53843
53844   ---------------------
53845   -- Initialize_4122 --
53846   ---------------------
53847
53848   procedure Initialize_4122 is
53849   begin
53850      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
53851       (Base + 4122,
53852        AMF.Internals.Tables.UML_String_Data_08.MS_083F'Access);
53853      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4122, (Is_Empty => True));
53854   end Initialize_4122;
53855
53856   ---------------------
53857   -- Initialize_4123 --
53858   ---------------------
53859
53860   procedure Initialize_4123 is
53861   begin
53862      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53863       (Base + 4123,
53864        AMF.Internals.Tables.UML_String_Data_02.MS_02D4'Access);
53865   end Initialize_4123;
53866
53867   ---------------------
53868   -- Initialize_4124 --
53869   ---------------------
53870
53871   procedure Initialize_4124 is
53872   begin
53873      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4124, (Is_Empty => True));
53874   end Initialize_4124;
53875
53876   ---------------------
53877   -- Initialize_4125 --
53878   ---------------------
53879
53880   procedure Initialize_4125 is
53881   begin
53882      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
53883       (Base + 4125,
53884        AMF.Internals.Tables.UML_String_Data_08.MS_0821'Access);
53885      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4125, (Is_Empty => True));
53886   end Initialize_4125;
53887
53888   ---------------------
53889   -- Initialize_4126 --
53890   ---------------------
53891
53892   procedure Initialize_4126 is
53893   begin
53894      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53895       (Base + 4126,
53896        AMF.Internals.Tables.UML_String_Data_03.MS_0343'Access);
53897   end Initialize_4126;
53898
53899   ---------------------
53900   -- Initialize_4127 --
53901   ---------------------
53902
53903   procedure Initialize_4127 is
53904   begin
53905      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4127, (Is_Empty => True));
53906   end Initialize_4127;
53907
53908   ---------------------
53909   -- Initialize_4128 --
53910   ---------------------
53911
53912   procedure Initialize_4128 is
53913   begin
53914      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
53915       (Base + 4128,
53916        AMF.Internals.Tables.UML_String_Data_0A.MS_0AF6'Access);
53917      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4128, (Is_Empty => True));
53918   end Initialize_4128;
53919
53920   ---------------------
53921   -- Initialize_4129 --
53922   ---------------------
53923
53924   procedure Initialize_4129 is
53925   begin
53926      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53927       (Base + 4129,
53928        AMF.Internals.Tables.UML_String_Data_06.MS_063D'Access);
53929   end Initialize_4129;
53930
53931   ---------------------
53932   -- Initialize_4130 --
53933   ---------------------
53934
53935   procedure Initialize_4130 is
53936   begin
53937      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4130, (Is_Empty => True));
53938   end Initialize_4130;
53939
53940   ---------------------
53941   -- Initialize_4131 --
53942   ---------------------
53943
53944   procedure Initialize_4131 is
53945   begin
53946      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
53947       (Base + 4131,
53948        AMF.Internals.Tables.UML_String_Data_00.MS_0055'Access);
53949      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4131, (Is_Empty => True));
53950   end Initialize_4131;
53951
53952   ---------------------
53953   -- Initialize_4132 --
53954   ---------------------
53955
53956   procedure Initialize_4132 is
53957   begin
53958      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53959       (Base + 4132,
53960        AMF.Internals.Tables.UML_String_Data_04.MS_04D7'Access);
53961   end Initialize_4132;
53962
53963   ---------------------
53964   -- Initialize_4133 --
53965   ---------------------
53966
53967   procedure Initialize_4133 is
53968   begin
53969      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4133, (Is_Empty => True));
53970   end Initialize_4133;
53971
53972   ---------------------
53973   -- Initialize_4134 --
53974   ---------------------
53975
53976   procedure Initialize_4134 is
53977   begin
53978      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
53979       (Base + 4134,
53980        AMF.Internals.Tables.UML_String_Data_07.MS_0793'Access);
53981      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4134, (Is_Empty => True));
53982   end Initialize_4134;
53983
53984   ---------------------
53985   -- Initialize_4135 --
53986   ---------------------
53987
53988   procedure Initialize_4135 is
53989   begin
53990      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
53991       (Base + 4135,
53992        AMF.Internals.Tables.UML_String_Data_0A.MS_0AAB'Access);
53993   end Initialize_4135;
53994
53995   ---------------------
53996   -- Initialize_4136 --
53997   ---------------------
53998
53999   procedure Initialize_4136 is
54000   begin
54001      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4136, (Is_Empty => True));
54002   end Initialize_4136;
54003
54004   ---------------------
54005   -- Initialize_4137 --
54006   ---------------------
54007
54008   procedure Initialize_4137 is
54009   begin
54010      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54011       (Base + 4137,
54012        AMF.Internals.Tables.UML_String_Data_03.MS_03C5'Access);
54013   end Initialize_4137;
54014
54015   ---------------------
54016   -- Initialize_4138 --
54017   ---------------------
54018
54019   procedure Initialize_4138 is
54020   begin
54021      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54022       (Base + 4138,
54023        AMF.Internals.Tables.UML_String_Data_09.MS_09AD'Access);
54024   end Initialize_4138;
54025
54026   ---------------------
54027   -- Initialize_4139 --
54028   ---------------------
54029
54030   procedure Initialize_4139 is
54031   begin
54032      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54033       (Base + 4139,
54034        AMF.Internals.Tables.UML_String_Data_04.MS_04F4'Access);
54035   end Initialize_4139;
54036
54037   ---------------------
54038   -- Initialize_4140 --
54039   ---------------------
54040
54041   procedure Initialize_4140 is
54042   begin
54043      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54044       (Base + 4140,
54045        AMF.Internals.Tables.UML_String_Data_0A.MS_0AE7'Access);
54046      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4140, (Is_Empty => True));
54047   end Initialize_4140;
54048
54049   ---------------------
54050   -- Initialize_4141 --
54051   ---------------------
54052
54053   procedure Initialize_4141 is
54054   begin
54055      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54056       (Base + 4141,
54057        AMF.Internals.Tables.UML_String_Data_00.MS_0089'Access);
54058   end Initialize_4141;
54059
54060   ---------------------
54061   -- Initialize_4142 --
54062   ---------------------
54063
54064   procedure Initialize_4142 is
54065   begin
54066      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4142, (Is_Empty => True));
54067   end Initialize_4142;
54068
54069   ---------------------
54070   -- Initialize_4143 --
54071   ---------------------
54072
54073   procedure Initialize_4143 is
54074   begin
54075      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54076       (Base + 4143,
54077        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD9'Access);
54078      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4143, (Is_Empty => True));
54079   end Initialize_4143;
54080
54081   ---------------------
54082   -- Initialize_4144 --
54083   ---------------------
54084
54085   procedure Initialize_4144 is
54086   begin
54087      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54088       (Base + 4144,
54089        AMF.Internals.Tables.UML_String_Data_03.MS_0363'Access);
54090   end Initialize_4144;
54091
54092   ---------------------
54093   -- Initialize_4145 --
54094   ---------------------
54095
54096   procedure Initialize_4145 is
54097   begin
54098      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4145, (Is_Empty => True));
54099   end Initialize_4145;
54100
54101   ---------------------
54102   -- Initialize_4146 --
54103   ---------------------
54104
54105   procedure Initialize_4146 is
54106   begin
54107      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54108       (Base + 4146,
54109        AMF.Internals.Tables.UML_String_Data_09.MS_0997'Access);
54110      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4146, (Is_Empty => True));
54111   end Initialize_4146;
54112
54113   ---------------------
54114   -- Initialize_4147 --
54115   ---------------------
54116
54117   procedure Initialize_4147 is
54118   begin
54119      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54120       (Base + 4147,
54121        AMF.Internals.Tables.UML_String_Data_0B.MS_0B03'Access);
54122   end Initialize_4147;
54123
54124   ---------------------
54125   -- Initialize_4148 --
54126   ---------------------
54127
54128   procedure Initialize_4148 is
54129   begin
54130      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4148, (Is_Empty => True));
54131   end Initialize_4148;
54132
54133   ---------------------
54134   -- Initialize_4149 --
54135   ---------------------
54136
54137   procedure Initialize_4149 is
54138   begin
54139      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54140       (Base + 4149,
54141        AMF.Internals.Tables.UML_String_Data_09.MS_0913'Access);
54142      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4149, (Is_Empty => True));
54143   end Initialize_4149;
54144
54145   ---------------------
54146   -- Initialize_4150 --
54147   ---------------------
54148
54149   procedure Initialize_4150 is
54150   begin
54151      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54152       (Base + 4150,
54153        AMF.Internals.Tables.UML_String_Data_03.MS_03D7'Access);
54154   end Initialize_4150;
54155
54156   ---------------------
54157   -- Initialize_4151 --
54158   ---------------------
54159
54160   procedure Initialize_4151 is
54161   begin
54162      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4151, (Is_Empty => True));
54163   end Initialize_4151;
54164
54165   ---------------------
54166   -- Initialize_4152 --
54167   ---------------------
54168
54169   procedure Initialize_4152 is
54170   begin
54171      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54172       (Base + 4152,
54173        AMF.Internals.Tables.UML_String_Data_05.MS_055B'Access);
54174      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4152, (Is_Empty => True));
54175   end Initialize_4152;
54176
54177   ---------------------
54178   -- Initialize_4153 --
54179   ---------------------
54180
54181   procedure Initialize_4153 is
54182   begin
54183      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54184       (Base + 4153,
54185        AMF.Internals.Tables.UML_String_Data_0B.MS_0B6C'Access);
54186   end Initialize_4153;
54187
54188   ---------------------
54189   -- Initialize_4154 --
54190   ---------------------
54191
54192   procedure Initialize_4154 is
54193   begin
54194      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4154, (Is_Empty => True));
54195   end Initialize_4154;
54196
54197   ---------------------
54198   -- Initialize_4155 --
54199   ---------------------
54200
54201   procedure Initialize_4155 is
54202   begin
54203      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54204       (Base + 4155,
54205        AMF.Internals.Tables.UML_String_Data_0C.MS_0C93'Access);
54206   end Initialize_4155;
54207
54208   ---------------------
54209   -- Initialize_4156 --
54210   ---------------------
54211
54212   procedure Initialize_4156 is
54213   begin
54214      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54215       (Base + 4156,
54216        AMF.Internals.Tables.UML_String_Data_07.MS_07D5'Access);
54217   end Initialize_4156;
54218
54219   ---------------------
54220   -- Initialize_4157 --
54221   ---------------------
54222
54223   procedure Initialize_4157 is
54224   begin
54225      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54226       (Base + 4157,
54227        AMF.Internals.Tables.UML_String_Data_02.MS_02B2'Access);
54228   end Initialize_4157;
54229
54230   ---------------------
54231   -- Initialize_4158 --
54232   ---------------------
54233
54234   procedure Initialize_4158 is
54235   begin
54236      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54237       (Base + 4158,
54238        AMF.Internals.Tables.UML_String_Data_0A.MS_0AAD'Access);
54239   end Initialize_4158;
54240
54241   ---------------------
54242   -- Initialize_4159 --
54243   ---------------------
54244
54245   procedure Initialize_4159 is
54246   begin
54247      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54248       (Base + 4159,
54249        AMF.Internals.Tables.UML_String_Data_07.MS_0713'Access);
54250   end Initialize_4159;
54251
54252   ---------------------
54253   -- Initialize_4160 --
54254   ---------------------
54255
54256   procedure Initialize_4160 is
54257   begin
54258      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54259       (Base + 4160,
54260        AMF.Internals.Tables.UML_String_Data_04.MS_0471'Access);
54261   end Initialize_4160;
54262
54263   ---------------------
54264   -- Initialize_4161 --
54265   ---------------------
54266
54267   procedure Initialize_4161 is
54268   begin
54269      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54270       (Base + 4161,
54271        AMF.Internals.Tables.UML_String_Data_09.MS_09E0'Access);
54272   end Initialize_4161;
54273
54274   ---------------------
54275   -- Initialize_4162 --
54276   ---------------------
54277
54278   procedure Initialize_4162 is
54279   begin
54280      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54281       (Base + 4162,
54282        AMF.Internals.Tables.UML_String_Data_01.MS_0158'Access);
54283   end Initialize_4162;
54284
54285   ---------------------
54286   -- Initialize_4163 --
54287   ---------------------
54288
54289   procedure Initialize_4163 is
54290   begin
54291      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54292       (Base + 4163,
54293        AMF.Internals.Tables.UML_String_Data_00.MS_00EA'Access);
54294   end Initialize_4163;
54295
54296   ---------------------
54297   -- Initialize_4164 --
54298   ---------------------
54299
54300   procedure Initialize_4164 is
54301   begin
54302      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54303       (Base + 4164,
54304        AMF.Internals.Tables.UML_String_Data_06.MS_0606'Access);
54305   end Initialize_4164;
54306
54307   ---------------------
54308   -- Initialize_4165 --
54309   ---------------------
54310
54311   procedure Initialize_4165 is
54312   begin
54313      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54314       (Base + 4165,
54315        AMF.Internals.Tables.UML_String_Data_00.MS_00BC'Access);
54316   end Initialize_4165;
54317
54318   ---------------------
54319   -- Initialize_4166 --
54320   ---------------------
54321
54322   procedure Initialize_4166 is
54323   begin
54324      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54325       (Base + 4166,
54326        AMF.Internals.Tables.UML_String_Data_02.MS_0254'Access);
54327   end Initialize_4166;
54328
54329   ---------------------
54330   -- Initialize_4167 --
54331   ---------------------
54332
54333   procedure Initialize_4167 is
54334   begin
54335      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54336       (Base + 4167,
54337        AMF.Internals.Tables.UML_String_Data_00.MS_00DB'Access);
54338   end Initialize_4167;
54339
54340   ---------------------
54341   -- Initialize_4168 --
54342   ---------------------
54343
54344   procedure Initialize_4168 is
54345   begin
54346      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54347       (Base + 4168,
54348        AMF.Internals.Tables.UML_String_Data_00.MS_0048'Access);
54349   end Initialize_4168;
54350
54351   ---------------------
54352   -- Initialize_4169 --
54353   ---------------------
54354
54355   procedure Initialize_4169 is
54356   begin
54357      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54358       (Base + 4169,
54359        AMF.Internals.Tables.UML_String_Data_03.MS_03CE'Access);
54360   end Initialize_4169;
54361
54362   ---------------------
54363   -- Initialize_4170 --
54364   ---------------------
54365
54366   procedure Initialize_4170 is
54367   begin
54368      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4170, True);
54369      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54370       (Base + 4170,
54371        AMF.Internals.Tables.UML_String_Data_00.MS_00F2'Access);
54372      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4170, (False, AMF.CMOF.Public_Visibility));
54373   end Initialize_4170;
54374
54375   ---------------------
54376   -- Initialize_4171 --
54377   ---------------------
54378
54379   procedure Initialize_4171 is
54380   begin
54381      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54382       (Base + 4171,
54383        AMF.Internals.Tables.UML_String_Data_03.MS_0353'Access);
54384   end Initialize_4171;
54385
54386   ---------------------
54387   -- Initialize_4172 --
54388   ---------------------
54389
54390   procedure Initialize_4172 is
54391   begin
54392      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54393       (Base + 4172,
54394        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
54395      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4172, (Is_Empty => True));
54396   end Initialize_4172;
54397
54398   ---------------------
54399   -- Initialize_4173 --
54400   ---------------------
54401
54402   procedure Initialize_4173 is
54403   begin
54404      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4173, (Is_Empty => True));
54405   end Initialize_4173;
54406
54407   ---------------------
54408   -- Initialize_4174 --
54409   ---------------------
54410
54411   procedure Initialize_4174 is
54412   begin
54413      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4174, AMF.CMOF.Return_Parameter);
54414      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54415       (Base + 4174,
54416        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
54417      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4174, (False, AMF.CMOF.Public_Visibility));
54418   end Initialize_4174;
54419
54420   ---------------------
54421   -- Initialize_4175 --
54422   ---------------------
54423
54424   procedure Initialize_4175 is
54425   begin
54426      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4175, True);
54427      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54428       (Base + 4175,
54429        AMF.Internals.Tables.UML_String_Data_06.MS_060E'Access);
54430      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4175, (False, AMF.CMOF.Public_Visibility));
54431   end Initialize_4175;
54432
54433   ---------------------
54434   -- Initialize_4176 --
54435   ---------------------
54436
54437   procedure Initialize_4176 is
54438   begin
54439      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54440       (Base + 4176,
54441        AMF.Internals.Tables.UML_String_Data_06.MS_066C'Access);
54442   end Initialize_4176;
54443
54444   ---------------------
54445   -- Initialize_4177 --
54446   ---------------------
54447
54448   procedure Initialize_4177 is
54449   begin
54450      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54451       (Base + 4177,
54452        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
54453      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4177, (Is_Empty => True));
54454   end Initialize_4177;
54455
54456   ---------------------
54457   -- Initialize_4178 --
54458   ---------------------
54459
54460   procedure Initialize_4178 is
54461   begin
54462      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4178, (Is_Empty => True));
54463   end Initialize_4178;
54464
54465   ---------------------
54466   -- Initialize_4179 --
54467   ---------------------
54468
54469   procedure Initialize_4179 is
54470   begin
54471      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4179, AMF.CMOF.Return_Parameter);
54472      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54473       (Base + 4179,
54474        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
54475      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4179, (False, AMF.CMOF.Public_Visibility));
54476   end Initialize_4179;
54477
54478   ---------------------
54479   -- Initialize_4180 --
54480   ---------------------
54481
54482   procedure Initialize_4180 is
54483   begin
54484      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4180, True);
54485      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54486       (Base + 4180,
54487        AMF.Internals.Tables.UML_String_Data_08.MS_08AE'Access);
54488      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4180, (False, AMF.CMOF.Public_Visibility));
54489   end Initialize_4180;
54490
54491   ---------------------
54492   -- Initialize_4181 --
54493   ---------------------
54494
54495   procedure Initialize_4181 is
54496   begin
54497      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54498       (Base + 4181,
54499        AMF.Internals.Tables.UML_String_Data_02.MS_02EC'Access);
54500   end Initialize_4181;
54501
54502   ---------------------
54503   -- Initialize_4182 --
54504   ---------------------
54505
54506   procedure Initialize_4182 is
54507   begin
54508      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54509       (Base + 4182,
54510        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
54511      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4182, (Is_Empty => True));
54512   end Initialize_4182;
54513
54514   ---------------------
54515   -- Initialize_4183 --
54516   ---------------------
54517
54518   procedure Initialize_4183 is
54519   begin
54520      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4183, (Is_Empty => True));
54521   end Initialize_4183;
54522
54523   ---------------------
54524   -- Initialize_4184 --
54525   ---------------------
54526
54527   procedure Initialize_4184 is
54528   begin
54529      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4184, AMF.CMOF.Return_Parameter);
54530      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54531       (Base + 4184,
54532        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
54533      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4184, (False, AMF.CMOF.Public_Visibility));
54534   end Initialize_4184;
54535
54536   ---------------------
54537   -- Initialize_4185 --
54538   ---------------------
54539
54540   procedure Initialize_4185 is
54541   begin
54542      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4185, AMF.CMOF.In_Parameter);
54543      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54544       (Base + 4185,
54545        AMF.Internals.Tables.UML_String_Data_0B.MS_0B5C'Access);
54546      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4185, (False, AMF.CMOF.Public_Visibility));
54547   end Initialize_4185;
54548
54549   ---------------------
54550   -- Initialize_4186 --
54551   ---------------------
54552
54553   procedure Initialize_4186 is
54554   begin
54555      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4186, True);
54556      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54557       (Base + 4186,
54558        AMF.Internals.Tables.UML_String_Data_0B.MS_0BBC'Access);
54559      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4186, (False, AMF.CMOF.Public_Visibility));
54560   end Initialize_4186;
54561
54562   ---------------------
54563   -- Initialize_4187 --
54564   ---------------------
54565
54566   procedure Initialize_4187 is
54567   begin
54568      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54569       (Base + 4187,
54570        AMF.Internals.Tables.UML_String_Data_03.MS_03C4'Access);
54571   end Initialize_4187;
54572
54573   ---------------------
54574   -- Initialize_4188 --
54575   ---------------------
54576
54577   procedure Initialize_4188 is
54578   begin
54579      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54580       (Base + 4188,
54581        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
54582      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4188, (Is_Empty => True));
54583   end Initialize_4188;
54584
54585   ---------------------
54586   -- Initialize_4189 --
54587   ---------------------
54588
54589   procedure Initialize_4189 is
54590   begin
54591      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4189, (Is_Empty => True));
54592   end Initialize_4189;
54593
54594   ---------------------
54595   -- Initialize_4190 --
54596   ---------------------
54597
54598   procedure Initialize_4190 is
54599   begin
54600      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4190, AMF.CMOF.Return_Parameter);
54601      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54602       (Base + 4190,
54603        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
54604      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4190, (False, AMF.CMOF.Public_Visibility));
54605   end Initialize_4190;
54606
54607   ---------------------
54608   -- Initialize_4191 --
54609   ---------------------
54610
54611   procedure Initialize_4191 is
54612   begin
54613      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4191, True);
54614      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54615       (Base + 4191,
54616        AMF.Internals.Tables.UML_String_Data_0B.MS_0BA9'Access);
54617      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4191, (False, AMF.CMOF.Public_Visibility));
54618   end Initialize_4191;
54619
54620   ---------------------
54621   -- Initialize_4192 --
54622   ---------------------
54623
54624   procedure Initialize_4192 is
54625   begin
54626      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54627       (Base + 4192,
54628        AMF.Internals.Tables.UML_String_Data_0B.MS_0B76'Access);
54629   end Initialize_4192;
54630
54631   ---------------------
54632   -- Initialize_4193 --
54633   ---------------------
54634
54635   procedure Initialize_4193 is
54636   begin
54637      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54638       (Base + 4193,
54639        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
54640      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4193, (Is_Empty => True));
54641   end Initialize_4193;
54642
54643   ---------------------
54644   -- Initialize_4194 --
54645   ---------------------
54646
54647   procedure Initialize_4194 is
54648   begin
54649      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4194, (Is_Empty => True));
54650   end Initialize_4194;
54651
54652   ---------------------
54653   -- Initialize_4195 --
54654   ---------------------
54655
54656   procedure Initialize_4195 is
54657   begin
54658      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4195, AMF.CMOF.Return_Parameter);
54659      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54660       (Base + 4195,
54661        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
54662      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4195, (False, AMF.CMOF.Public_Visibility));
54663   end Initialize_4195;
54664
54665   ---------------------
54666   -- Initialize_4196 --
54667   ---------------------
54668
54669   procedure Initialize_4196 is
54670   begin
54671      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4196, AMF.CMOF.In_Parameter);
54672      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54673       (Base + 4196,
54674        AMF.Internals.Tables.UML_String_Data_07.MS_0712'Access);
54675      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4196, (False, AMF.CMOF.Public_Visibility));
54676   end Initialize_4196;
54677
54678   ---------------------
54679   -- Initialize_4197 --
54680   ---------------------
54681
54682   procedure Initialize_4197 is
54683   begin
54684      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4197, True);
54685      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54686       (Base + 4197,
54687        AMF.Internals.Tables.UML_String_Data_08.MS_0850'Access);
54688      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4197, (False, AMF.CMOF.Public_Visibility));
54689   end Initialize_4197;
54690
54691   ---------------------
54692   -- Initialize_4198 --
54693   ---------------------
54694
54695   procedure Initialize_4198 is
54696   begin
54697      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54698       (Base + 4198,
54699        AMF.Internals.Tables.UML_String_Data_06.MS_064F'Access);
54700   end Initialize_4198;
54701
54702   ---------------------
54703   -- Initialize_4199 --
54704   ---------------------
54705
54706   procedure Initialize_4199 is
54707   begin
54708      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54709       (Base + 4199,
54710        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
54711      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4199, (Is_Empty => True));
54712   end Initialize_4199;
54713
54714   ---------------------
54715   -- Initialize_4200 --
54716   ---------------------
54717
54718   procedure Initialize_4200 is
54719   begin
54720      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4200, (Is_Empty => True));
54721   end Initialize_4200;
54722
54723   ---------------------
54724   -- Initialize_4201 --
54725   ---------------------
54726
54727   procedure Initialize_4201 is
54728   begin
54729      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4201, AMF.CMOF.Return_Parameter);
54730      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54731       (Base + 4201,
54732        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
54733      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4201, (False, AMF.CMOF.Public_Visibility));
54734   end Initialize_4201;
54735
54736   ---------------------
54737   -- Initialize_4202 --
54738   ---------------------
54739
54740   procedure Initialize_4202 is
54741   begin
54742      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4202, True);
54743      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54744       (Base + 4202,
54745        AMF.Internals.Tables.UML_String_Data_07.MS_0767'Access);
54746      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4202, (False, AMF.CMOF.Public_Visibility));
54747   end Initialize_4202;
54748
54749   ---------------------
54750   -- Initialize_4203 --
54751   ---------------------
54752
54753   procedure Initialize_4203 is
54754   begin
54755      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54756       (Base + 4203,
54757        AMF.Internals.Tables.UML_String_Data_00.MS_00EE'Access);
54758   end Initialize_4203;
54759
54760   ---------------------
54761   -- Initialize_4204 --
54762   ---------------------
54763
54764   procedure Initialize_4204 is
54765   begin
54766      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54767       (Base + 4204,
54768        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
54769      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4204, (Is_Empty => True));
54770   end Initialize_4204;
54771
54772   ---------------------
54773   -- Initialize_4205 --
54774   ---------------------
54775
54776   procedure Initialize_4205 is
54777   begin
54778      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4205, (Is_Empty => True));
54779   end Initialize_4205;
54780
54781   ---------------------
54782   -- Initialize_4206 --
54783   ---------------------
54784
54785   procedure Initialize_4206 is
54786   begin
54787      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4206, AMF.CMOF.Return_Parameter);
54788      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54789       (Base + 4206,
54790        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
54791      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4206, (False, AMF.CMOF.Public_Visibility));
54792   end Initialize_4206;
54793
54794   ---------------------
54795   -- Initialize_4207 --
54796   ---------------------
54797
54798   procedure Initialize_4207 is
54799   begin
54800      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4207, True);
54801      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54802       (Base + 4207,
54803        AMF.Internals.Tables.UML_String_Data_03.MS_036B'Access);
54804      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4207, (False, AMF.CMOF.Public_Visibility));
54805   end Initialize_4207;
54806
54807   ---------------------
54808   -- Initialize_4208 --
54809   ---------------------
54810
54811   procedure Initialize_4208 is
54812   begin
54813      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54814       (Base + 4208,
54815        AMF.Internals.Tables.UML_String_Data_04.MS_04CB'Access);
54816   end Initialize_4208;
54817
54818   ---------------------
54819   -- Initialize_4209 --
54820   ---------------------
54821
54822   procedure Initialize_4209 is
54823   begin
54824      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54825       (Base + 4209,
54826        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
54827      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4209, (Is_Empty => True));
54828   end Initialize_4209;
54829
54830   ---------------------
54831   -- Initialize_4210 --
54832   ---------------------
54833
54834   procedure Initialize_4210 is
54835   begin
54836      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4210, (Is_Empty => True));
54837   end Initialize_4210;
54838
54839   ---------------------
54840   -- Initialize_4211 --
54841   ---------------------
54842
54843   procedure Initialize_4211 is
54844   begin
54845      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4211, AMF.CMOF.Return_Parameter);
54846      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54847       (Base + 4211,
54848        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
54849      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4211, (False, AMF.CMOF.Public_Visibility));
54850   end Initialize_4211;
54851
54852   ---------------------
54853   -- Initialize_4212 --
54854   ---------------------
54855
54856   procedure Initialize_4212 is
54857   begin
54858      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54859       (Base + 4212,
54860        AMF.Internals.Tables.UML_String_Data_0B.MS_0B1D'Access);
54861   end Initialize_4212;
54862
54863   ---------------------
54864   -- Initialize_4213 --
54865   ---------------------
54866
54867   procedure Initialize_4213 is
54868   begin
54869      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54870       (Base + 4213,
54871        AMF.Internals.Tables.UML_String_Data_02.MS_0296'Access);
54872   end Initialize_4213;
54873
54874   ---------------------
54875   -- Initialize_4214 --
54876   ---------------------
54877
54878   procedure Initialize_4214 is
54879   begin
54880      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54881       (Base + 4214,
54882        AMF.Internals.Tables.UML_String_Data_01.MS_0192'Access);
54883   end Initialize_4214;
54884
54885   ---------------------
54886   -- Initialize_4215 --
54887   ---------------------
54888
54889   procedure Initialize_4215 is
54890   begin
54891      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54892       (Base + 4215,
54893        AMF.Internals.Tables.UML_String_Data_06.MS_0682'Access);
54894   end Initialize_4215;
54895
54896   ---------------------
54897   -- Initialize_4216 --
54898   ---------------------
54899
54900   procedure Initialize_4216 is
54901   begin
54902      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54903       (Base + 4216,
54904        AMF.Internals.Tables.UML_String_Data_0A.MS_0A04'Access);
54905      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4216, (Is_Empty => True));
54906   end Initialize_4216;
54907
54908   ---------------------
54909   -- Initialize_4217 --
54910   ---------------------
54911
54912   procedure Initialize_4217 is
54913   begin
54914      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54915       (Base + 4217,
54916        AMF.Internals.Tables.UML_String_Data_01.MS_0131'Access);
54917   end Initialize_4217;
54918
54919   ---------------------
54920   -- Initialize_4218 --
54921   ---------------------
54922
54923   procedure Initialize_4218 is
54924   begin
54925      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4218, (Is_Empty => True));
54926   end Initialize_4218;
54927
54928   ---------------------
54929   -- Initialize_4219 --
54930   ---------------------
54931
54932   procedure Initialize_4219 is
54933   begin
54934      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54935       (Base + 4219,
54936        AMF.Internals.Tables.UML_String_Data_06.MS_064C'Access);
54937      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4219, (Is_Empty => True));
54938   end Initialize_4219;
54939
54940   ---------------------
54941   -- Initialize_4220 --
54942   ---------------------
54943
54944   procedure Initialize_4220 is
54945   begin
54946      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54947       (Base + 4220,
54948        AMF.Internals.Tables.UML_String_Data_09.MS_091B'Access);
54949   end Initialize_4220;
54950
54951   ---------------------
54952   -- Initialize_4221 --
54953   ---------------------
54954
54955   procedure Initialize_4221 is
54956   begin
54957      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4221, (Is_Empty => True));
54958   end Initialize_4221;
54959
54960   ---------------------
54961   -- Initialize_4222 --
54962   ---------------------
54963
54964   procedure Initialize_4222 is
54965   begin
54966      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54967       (Base + 4222,
54968        AMF.Internals.Tables.UML_String_Data_08.MS_0893'Access);
54969      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4222, (Is_Empty => True));
54970   end Initialize_4222;
54971
54972   ---------------------
54973   -- Initialize_4223 --
54974   ---------------------
54975
54976   procedure Initialize_4223 is
54977   begin
54978      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
54979       (Base + 4223,
54980        AMF.Internals.Tables.UML_String_Data_07.MS_072E'Access);
54981   end Initialize_4223;
54982
54983   ---------------------
54984   -- Initialize_4224 --
54985   ---------------------
54986
54987   procedure Initialize_4224 is
54988   begin
54989      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4224, (Is_Empty => True));
54990   end Initialize_4224;
54991
54992   ---------------------
54993   -- Initialize_4225 --
54994   ---------------------
54995
54996   procedure Initialize_4225 is
54997   begin
54998      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
54999       (Base + 4225,
55000        AMF.Internals.Tables.UML_String_Data_04.MS_048E'Access);
55001      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4225, (Is_Empty => True));
55002   end Initialize_4225;
55003
55004   ---------------------
55005   -- Initialize_4226 --
55006   ---------------------
55007
55008   procedure Initialize_4226 is
55009   begin
55010      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
55011       (Base + 4226,
55012        AMF.Internals.Tables.UML_String_Data_05.MS_05F6'Access);
55013   end Initialize_4226;
55014
55015   ---------------------
55016   -- Initialize_4227 --
55017   ---------------------
55018
55019   procedure Initialize_4227 is
55020   begin
55021      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4227, (Is_Empty => True));
55022   end Initialize_4227;
55023
55024   ---------------------
55025   -- Initialize_4228 --
55026   ---------------------
55027
55028   procedure Initialize_4228 is
55029   begin
55030      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
55031       (Base + 4228,
55032        AMF.Internals.Tables.UML_String_Data_03.MS_03DF'Access);
55033   end Initialize_4228;
55034
55035   ---------------------
55036   -- Initialize_4229 --
55037   ---------------------
55038
55039   procedure Initialize_4229 is
55040   begin
55041      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
55042       (Base + 4229,
55043        AMF.Internals.Tables.UML_String_Data_08.MS_0835'Access);
55044   end Initialize_4229;
55045
55046   ---------------------
55047   -- Initialize_4230 --
55048   ---------------------
55049
55050   procedure Initialize_4230 is
55051   begin
55052      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
55053       (Base + 4230,
55054        AMF.Internals.Tables.UML_String_Data_01.MS_018C'Access);
55055   end Initialize_4230;
55056
55057   ---------------------
55058   -- Initialize_4231 --
55059   ---------------------
55060
55061   procedure Initialize_4231 is
55062   begin
55063      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
55064       (Base + 4231,
55065        AMF.Internals.Tables.UML_String_Data_08.MS_084F'Access);
55066   end Initialize_4231;
55067
55068   ---------------------
55069   -- Initialize_4232 --
55070   ---------------------
55071
55072   procedure Initialize_4232 is
55073   begin
55074      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4232, True);
55075      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55076       (Base + 4232,
55077        AMF.Internals.Tables.UML_String_Data_0C.MS_0C30'Access);
55078      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4232, (False, AMF.CMOF.Public_Visibility));
55079   end Initialize_4232;
55080
55081   ---------------------
55082   -- Initialize_4233 --
55083   ---------------------
55084
55085   procedure Initialize_4233 is
55086   begin
55087      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
55088       (Base + 4233,
55089        AMF.Internals.Tables.UML_String_Data_05.MS_0529'Access);
55090   end Initialize_4233;
55091
55092   ---------------------
55093   -- Initialize_4234 --
55094   ---------------------
55095
55096   procedure Initialize_4234 is
55097   begin
55098      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55099       (Base + 4234,
55100        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
55101      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4234, (Is_Empty => True));
55102   end Initialize_4234;
55103
55104   ---------------------
55105   -- Initialize_4235 --
55106   ---------------------
55107
55108   procedure Initialize_4235 is
55109   begin
55110      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4235, (Is_Empty => True));
55111   end Initialize_4235;
55112
55113   ---------------------
55114   -- Initialize_4236 --
55115   ---------------------
55116
55117   procedure Initialize_4236 is
55118   begin
55119      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4236, AMF.CMOF.Return_Parameter);
55120      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55121       (Base + 4236,
55122        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
55123      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4236, (False, AMF.CMOF.Public_Visibility));
55124   end Initialize_4236;
55125
55126   ---------------------
55127   -- Initialize_4237 --
55128   ---------------------
55129
55130   procedure Initialize_4237 is
55131   begin
55132      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4237, AMF.CMOF.In_Parameter);
55133      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55134       (Base + 4237,
55135        AMF.Internals.Tables.UML_String_Data_07.MS_077E'Access);
55136      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4237, (False, AMF.CMOF.Public_Visibility));
55137   end Initialize_4237;
55138
55139   ---------------------
55140   -- Initialize_4238 --
55141   ---------------------
55142
55143   procedure Initialize_4238 is
55144   begin
55145      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4238, AMF.CMOF.In_Parameter);
55146      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55147       (Base + 4238,
55148        AMF.Internals.Tables.UML_String_Data_01.MS_01B0'Access);
55149      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4238, (False, AMF.CMOF.Public_Visibility));
55150   end Initialize_4238;
55151
55152   ---------------------
55153   -- Initialize_4239 --
55154   ---------------------
55155
55156   procedure Initialize_4239 is
55157   begin
55158      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4239, True);
55159      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55160       (Base + 4239,
55161        AMF.Internals.Tables.UML_String_Data_09.MS_09E7'Access);
55162      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4239, (False, AMF.CMOF.Public_Visibility));
55163   end Initialize_4239;
55164
55165   ---------------------
55166   -- Initialize_4240 --
55167   ---------------------
55168
55169   procedure Initialize_4240 is
55170   begin
55171      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
55172       (Base + 4240,
55173        AMF.Internals.Tables.UML_String_Data_04.MS_0434'Access);
55174   end Initialize_4240;
55175
55176   ---------------------
55177   -- Initialize_4241 --
55178   ---------------------
55179
55180   procedure Initialize_4241 is
55181   begin
55182      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55183       (Base + 4241,
55184        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
55185      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4241, (Is_Empty => True));
55186   end Initialize_4241;
55187
55188   ---------------------
55189   -- Initialize_4242 --
55190   ---------------------
55191
55192   procedure Initialize_4242 is
55193   begin
55194      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4242, (Is_Empty => True));
55195   end Initialize_4242;
55196
55197   ---------------------
55198   -- Initialize_4243 --
55199   ---------------------
55200
55201   procedure Initialize_4243 is
55202   begin
55203      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4243, AMF.CMOF.Return_Parameter);
55204      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55205       (Base + 4243,
55206        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
55207      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4243, (False, AMF.CMOF.Public_Visibility));
55208   end Initialize_4243;
55209
55210   ---------------------
55211   -- Initialize_4244 --
55212   ---------------------
55213
55214   procedure Initialize_4244 is
55215   begin
55216      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4244, AMF.CMOF.In_Parameter);
55217      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55218       (Base + 4244,
55219        AMF.Internals.Tables.UML_String_Data_07.MS_077E'Access);
55220      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4244, (False, AMF.CMOF.Public_Visibility));
55221   end Initialize_4244;
55222
55223   ---------------------
55224   -- Initialize_4245 --
55225   ---------------------
55226
55227   procedure Initialize_4245 is
55228   begin
55229      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4245, AMF.CMOF.In_Parameter);
55230      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55231       (Base + 4245,
55232        AMF.Internals.Tables.UML_String_Data_01.MS_01B0'Access);
55233      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4245, (False, AMF.CMOF.Public_Visibility));
55234   end Initialize_4245;
55235
55236   ---------------------
55237   -- Initialize_4246 --
55238   ---------------------
55239
55240   procedure Initialize_4246 is
55241   begin
55242      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4246, True);
55243      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55244       (Base + 4246,
55245        AMF.Internals.Tables.UML_String_Data_08.MS_08AE'Access);
55246      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4246, (False, AMF.CMOF.Public_Visibility));
55247   end Initialize_4246;
55248
55249   ---------------------
55250   -- Initialize_4247 --
55251   ---------------------
55252
55253   procedure Initialize_4247 is
55254   begin
55255      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
55256       (Base + 4247,
55257        AMF.Internals.Tables.UML_String_Data_08.MS_0863'Access);
55258   end Initialize_4247;
55259
55260   ---------------------
55261   -- Initialize_4248 --
55262   ---------------------
55263
55264   procedure Initialize_4248 is
55265   begin
55266      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55267       (Base + 4248,
55268        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
55269      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4248, (Is_Empty => True));
55270   end Initialize_4248;
55271
55272   ---------------------
55273   -- Initialize_4249 --
55274   ---------------------
55275
55276   procedure Initialize_4249 is
55277   begin
55278      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4249, (Is_Empty => True));
55279   end Initialize_4249;
55280
55281   ---------------------
55282   -- Initialize_4250 --
55283   ---------------------
55284
55285   procedure Initialize_4250 is
55286   begin
55287      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4250, AMF.CMOF.Return_Parameter);
55288      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55289       (Base + 4250,
55290        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
55291      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4250, (False, AMF.CMOF.Public_Visibility));
55292   end Initialize_4250;
55293
55294   ---------------------
55295   -- Initialize_4251 --
55296   ---------------------
55297
55298   procedure Initialize_4251 is
55299   begin
55300      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4251, AMF.CMOF.In_Parameter);
55301      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55302       (Base + 4251,
55303        AMF.Internals.Tables.UML_String_Data_0B.MS_0B5C'Access);
55304      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4251, (False, AMF.CMOF.Public_Visibility));
55305   end Initialize_4251;
55306
55307   ---------------------
55308   -- Initialize_4252 --
55309   ---------------------
55310
55311   procedure Initialize_4252 is
55312   begin
55313      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4252, True);
55314      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55315       (Base + 4252,
55316        AMF.Internals.Tables.UML_String_Data_0B.MS_0BA9'Access);
55317      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4252, (False, AMF.CMOF.Public_Visibility));
55318   end Initialize_4252;
55319
55320   ---------------------
55321   -- Initialize_4253 --
55322   ---------------------
55323
55324   procedure Initialize_4253 is
55325   begin
55326      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
55327       (Base + 4253,
55328        AMF.Internals.Tables.UML_String_Data_05.MS_05A7'Access);
55329   end Initialize_4253;
55330
55331   ---------------------
55332   -- Initialize_4254 --
55333   ---------------------
55334
55335   procedure Initialize_4254 is
55336   begin
55337      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55338       (Base + 4254,
55339        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
55340      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4254, (Is_Empty => True));
55341   end Initialize_4254;
55342
55343   ---------------------
55344   -- Initialize_4255 --
55345   ---------------------
55346
55347   procedure Initialize_4255 is
55348   begin
55349      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4255, (Is_Empty => True));
55350   end Initialize_4255;
55351
55352   ---------------------
55353   -- Initialize_4256 --
55354   ---------------------
55355
55356   procedure Initialize_4256 is
55357   begin
55358      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4256, AMF.CMOF.Return_Parameter);
55359      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55360       (Base + 4256,
55361        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
55362      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4256, (False, AMF.CMOF.Public_Visibility));
55363   end Initialize_4256;
55364
55365   ---------------------
55366   -- Initialize_4257 --
55367   ---------------------
55368
55369   procedure Initialize_4257 is
55370   begin
55371      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4257, AMF.CMOF.In_Parameter);
55372      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55373       (Base + 4257,
55374        AMF.Internals.Tables.UML_String_Data_07.MS_0712'Access);
55375      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4257, (False, AMF.CMOF.Public_Visibility));
55376   end Initialize_4257;
55377
55378   ---------------------
55379   -- Initialize_4258 --
55380   ---------------------
55381
55382   procedure Initialize_4258 is
55383   begin
55384      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
55385       (Base + 4258,
55386        AMF.Internals.Tables.UML_String_Data_00.MS_0041'Access);
55387   end Initialize_4258;
55388
55389   ---------------------
55390   -- Initialize_4259 --
55391   ---------------------
55392
55393   procedure Initialize_4259 is
55394   begin
55395      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55396       (Base + 4259,
55397        AMF.Internals.Tables.UML_String_Data_0C.MS_0C8D'Access);
55398      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4259, (Is_Empty => True));
55399   end Initialize_4259;
55400
55401   ---------------------
55402   -- Initialize_4260 --
55403   ---------------------
55404
55405   procedure Initialize_4260 is
55406   begin
55407      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
55408       (Base + 4260,
55409        AMF.Internals.Tables.UML_String_Data_0A.MS_0A3F'Access);
55410   end Initialize_4260;
55411
55412   ---------------------
55413   -- Initialize_4261 --
55414   ---------------------
55415
55416   procedure Initialize_4261 is
55417   begin
55418      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4261, (Is_Empty => True));
55419   end Initialize_4261;
55420
55421   ---------------------
55422   -- Initialize_4262 --
55423   ---------------------
55424
55425   procedure Initialize_4262 is
55426   begin
55427      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55428       (Base + 4262,
55429        AMF.Internals.Tables.UML_String_Data_01.MS_0123'Access);
55430      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4262, (Is_Empty => True));
55431   end Initialize_4262;
55432
55433   ---------------------
55434   -- Initialize_4263 --
55435   ---------------------
55436
55437   procedure Initialize_4263 is
55438   begin
55439      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
55440       (Base + 4263,
55441        AMF.Internals.Tables.UML_String_Data_0A.MS_0A2D'Access);
55442   end Initialize_4263;
55443
55444   ---------------------
55445   -- Initialize_4264 --
55446   ---------------------
55447
55448   procedure Initialize_4264 is
55449   begin
55450      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4264, (Is_Empty => True));
55451   end Initialize_4264;
55452
55453   ---------------------
55454   -- Initialize_4265 --
55455   ---------------------
55456
55457   procedure Initialize_4265 is
55458   begin
55459      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55460       (Base + 4265,
55461        AMF.Internals.Tables.UML_String_Data_09.MS_0956'Access);
55462      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4265, (Is_Empty => True));
55463   end Initialize_4265;
55464
55465   ---------------------
55466   -- Initialize_4266 --
55467   ---------------------
55468
55469   procedure Initialize_4266 is
55470   begin
55471      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
55472       (Base + 4266,
55473        AMF.Internals.Tables.UML_String_Data_05.MS_057F'Access);
55474   end Initialize_4266;
55475
55476   ---------------------
55477   -- Initialize_4267 --
55478   ---------------------
55479
55480   procedure Initialize_4267 is
55481   begin
55482      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4267, (Is_Empty => True));
55483   end Initialize_4267;
55484
55485   ---------------------
55486   -- Initialize_4268 --
55487   ---------------------
55488
55489   procedure Initialize_4268 is
55490   begin
55491      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55492       (Base + 4268,
55493        AMF.Internals.Tables.UML_String_Data_09.MS_090D'Access);
55494      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4268, (Is_Empty => True));
55495   end Initialize_4268;
55496
55497   ---------------------
55498   -- Initialize_4269 --
55499   ---------------------
55500
55501   procedure Initialize_4269 is
55502   begin
55503      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
55504       (Base + 4269,
55505        AMF.Internals.Tables.UML_String_Data_06.MS_062A'Access);
55506   end Initialize_4269;
55507
55508   ---------------------
55509   -- Initialize_4270 --
55510   ---------------------
55511
55512   procedure Initialize_4270 is
55513   begin
55514      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4270, (Is_Empty => True));
55515   end Initialize_4270;
55516
55517   ---------------------
55518   -- Initialize_4271 --
55519   ---------------------
55520
55521   procedure Initialize_4271 is
55522   begin
55523      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
55524       (Base + 4271,
55525        AMF.Internals.Tables.UML_String_Data_04.MS_04F8'Access);
55526   end Initialize_4271;
55527
55528   ---------------------
55529   -- Initialize_4272 --
55530   ---------------------
55531
55532   procedure Initialize_4272 is
55533   begin
55534      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
55535       (Base + 4272,
55536        AMF.Internals.Tables.UML_String_Data_05.MS_05BF'Access);
55537   end Initialize_4272;
55538
55539   ---------------------
55540   -- Initialize_4273 --
55541   ---------------------
55542
55543   procedure Initialize_4273 is
55544   begin
55545      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4273, True);
55546      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55547       (Base + 4273,
55548        AMF.Internals.Tables.UML_String_Data_05.MS_05B0'Access);
55549      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4273, (False, AMF.CMOF.Public_Visibility));
55550   end Initialize_4273;
55551
55552   ---------------------
55553   -- Initialize_4274 --
55554   ---------------------
55555
55556   procedure Initialize_4274 is
55557   begin
55558      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
55559       (Base + 4274,
55560        AMF.Internals.Tables.UML_String_Data_02.MS_02FD'Access);
55561   end Initialize_4274;
55562
55563   ---------------------
55564   -- Initialize_4275 --
55565   ---------------------
55566
55567   procedure Initialize_4275 is
55568   begin
55569      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55570       (Base + 4275,
55571        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
55572      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4275, (Is_Empty => True));
55573   end Initialize_4275;
55574
55575   ---------------------
55576   -- Initialize_4276 --
55577   ---------------------
55578
55579   procedure Initialize_4276 is
55580   begin
55581      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4276, (Is_Empty => True));
55582   end Initialize_4276;
55583
55584   ---------------------
55585   -- Initialize_4277 --
55586   ---------------------
55587
55588   procedure Initialize_4277 is
55589   begin
55590      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4277, AMF.CMOF.Return_Parameter);
55591      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55592       (Base + 4277,
55593        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
55594      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4277, (False, AMF.CMOF.Public_Visibility));
55595   end Initialize_4277;
55596
55597   ---------------------
55598   -- Initialize_4278 --
55599   ---------------------
55600
55601   procedure Initialize_4278 is
55602   begin
55603      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4278, True);
55604      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55605       (Base + 4278,
55606        AMF.Internals.Tables.UML_String_Data_0B.MS_0BB8'Access);
55607      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4278, (False, AMF.CMOF.Public_Visibility));
55608   end Initialize_4278;
55609
55610   ---------------------
55611   -- Initialize_4279 --
55612   ---------------------
55613
55614   procedure Initialize_4279 is
55615   begin
55616      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
55617       (Base + 4279,
55618        AMF.Internals.Tables.UML_String_Data_08.MS_08FC'Access);
55619   end Initialize_4279;
55620
55621   ---------------------
55622   -- Initialize_4280 --
55623   ---------------------
55624
55625   procedure Initialize_4280 is
55626   begin
55627      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55628       (Base + 4280,
55629        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
55630      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4280, (Is_Empty => True));
55631   end Initialize_4280;
55632
55633   ---------------------
55634   -- Initialize_4281 --
55635   ---------------------
55636
55637   procedure Initialize_4281 is
55638   begin
55639      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4281, (Is_Empty => True));
55640   end Initialize_4281;
55641
55642   ---------------------
55643   -- Initialize_4282 --
55644   ---------------------
55645
55646   procedure Initialize_4282 is
55647   begin
55648      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4282, AMF.CMOF.Return_Parameter);
55649      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55650       (Base + 4282,
55651        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
55652      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4282, (False, AMF.CMOF.Public_Visibility));
55653   end Initialize_4282;
55654
55655   ---------------------
55656   -- Initialize_4283 --
55657   ---------------------
55658
55659   procedure Initialize_4283 is
55660   begin
55661      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
55662       (Base + 4283,
55663        AMF.Internals.Tables.UML_String_Data_0A.MS_0AA6'Access);
55664   end Initialize_4283;
55665
55666   ---------------------
55667   -- Initialize_4284 --
55668   ---------------------
55669
55670   procedure Initialize_4284 is
55671   begin
55672      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55673       (Base + 4284,
55674        AMF.Internals.Tables.UML_String_Data_01.MS_0141'Access);
55675      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4284, (Is_Empty => True));
55676   end Initialize_4284;
55677
55678   ---------------------
55679   -- Initialize_4285 --
55680   ---------------------
55681
55682   procedure Initialize_4285 is
55683   begin
55684      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
55685       (Base + 4285,
55686        AMF.Internals.Tables.UML_String_Data_01.MS_012A'Access);
55687   end Initialize_4285;
55688
55689   ---------------------
55690   -- Initialize_4286 --
55691   ---------------------
55692
55693   procedure Initialize_4286 is
55694   begin
55695      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4286, (Is_Empty => True));
55696   end Initialize_4286;
55697
55698   ---------------------
55699   -- Initialize_4287 --
55700   ---------------------
55701
55702   procedure Initialize_4287 is
55703   begin
55704      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55705       (Base + 4287,
55706        AMF.Internals.Tables.UML_String_Data_07.MS_077D'Access);
55707      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4287, (Is_Empty => True));
55708   end Initialize_4287;
55709
55710   ---------------------
55711   -- Initialize_4288 --
55712   ---------------------
55713
55714   procedure Initialize_4288 is
55715   begin
55716      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
55717       (Base + 4288,
55718        AMF.Internals.Tables.UML_String_Data_05.MS_05F7'Access);
55719   end Initialize_4288;
55720
55721   ---------------------
55722   -- Initialize_4289 --
55723   ---------------------
55724
55725   procedure Initialize_4289 is
55726   begin
55727      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4289, (Is_Empty => True));
55728   end Initialize_4289;
55729
55730   ---------------------
55731   -- Initialize_4290 --
55732   ---------------------
55733
55734   procedure Initialize_4290 is
55735   begin
55736      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
55737       (Base + 4290,
55738        AMF.Internals.Tables.UML_String_Data_03.MS_0345'Access);
55739   end Initialize_4290;
55740
55741   ---------------------
55742   -- Initialize_4291 --
55743   ---------------------
55744
55745   procedure Initialize_4291 is
55746   begin
55747      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
55748       (Base + 4291,
55749        AMF.Internals.Tables.UML_String_Data_0B.MS_0B44'Access);
55750   end Initialize_4291;
55751
55752   ---------------------
55753   -- Initialize_4292 --
55754   ---------------------
55755
55756   procedure Initialize_4292 is
55757   begin
55758      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4292, True);
55759      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55760       (Base + 4292,
55761        AMF.Internals.Tables.UML_String_Data_0B.MS_0BB7'Access);
55762      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4292, (False, AMF.CMOF.Public_Visibility));
55763   end Initialize_4292;
55764
55765   ---------------------
55766   -- Initialize_4293 --
55767   ---------------------
55768
55769   procedure Initialize_4293 is
55770   begin
55771      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
55772       (Base + 4293,
55773        AMF.Internals.Tables.UML_String_Data_0C.MS_0C1F'Access);
55774   end Initialize_4293;
55775
55776   ---------------------
55777   -- Initialize_4294 --
55778   ---------------------
55779
55780   procedure Initialize_4294 is
55781   begin
55782      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55783       (Base + 4294,
55784        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
55785      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4294, (Is_Empty => True));
55786   end Initialize_4294;
55787
55788   ---------------------
55789   -- Initialize_4295 --
55790   ---------------------
55791
55792   procedure Initialize_4295 is
55793   begin
55794      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4295, (Is_Empty => True));
55795   end Initialize_4295;
55796
55797   ---------------------
55798   -- Initialize_4296 --
55799   ---------------------
55800
55801   procedure Initialize_4296 is
55802   begin
55803      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4296, AMF.CMOF.Return_Parameter);
55804      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55805       (Base + 4296,
55806        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
55807      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4296, (False, AMF.CMOF.Public_Visibility));
55808   end Initialize_4296;
55809
55810   ---------------------
55811   -- Initialize_4297 --
55812   ---------------------
55813
55814   procedure Initialize_4297 is
55815   begin
55816      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
55817       (Base + 4297,
55818        AMF.Internals.Tables.UML_String_Data_0C.MS_0C95'Access);
55819   end Initialize_4297;
55820
55821   ---------------------
55822   -- Initialize_4298 --
55823   ---------------------
55824
55825   procedure Initialize_4298 is
55826   begin
55827      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
55828       (Base + 4298,
55829        AMF.Internals.Tables.UML_String_Data_00.MS_00E6'Access);
55830   end Initialize_4298;
55831
55832   ---------------------
55833   -- Initialize_4299 --
55834   ---------------------
55835
55836   procedure Initialize_4299 is
55837   begin
55838      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
55839       (Base + 4299,
55840        AMF.Internals.Tables.UML_String_Data_05.MS_05C9'Access);
55841   end Initialize_4299;
55842
55843   ---------------------
55844   -- Initialize_4300 --
55845   ---------------------
55846
55847   procedure Initialize_4300 is
55848   begin
55849      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
55850       (Base + 4300,
55851        AMF.Internals.Tables.UML_String_Data_08.MS_085F'Access);
55852   end Initialize_4300;
55853
55854   ---------------------
55855   -- Initialize_4301 --
55856   ---------------------
55857
55858   procedure Initialize_4301 is
55859   begin
55860      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55861       (Base + 4301,
55862        AMF.Internals.Tables.UML_String_Data_04.MS_0441'Access);
55863      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4301, (Is_Empty => True));
55864   end Initialize_4301;
55865
55866   ---------------------
55867   -- Initialize_4302 --
55868   ---------------------
55869
55870   procedure Initialize_4302 is
55871   begin
55872      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
55873       (Base + 4302,
55874        AMF.Internals.Tables.UML_String_Data_00.MS_00AE'Access);
55875   end Initialize_4302;
55876
55877   ---------------------
55878   -- Initialize_4303 --
55879   ---------------------
55880
55881   procedure Initialize_4303 is
55882   begin
55883      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4303, (Is_Empty => True));
55884   end Initialize_4303;
55885
55886   ---------------------
55887   -- Initialize_4304 --
55888   ---------------------
55889
55890   procedure Initialize_4304 is
55891   begin
55892      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55893       (Base + 4304,
55894        AMF.Internals.Tables.UML_String_Data_0A.MS_0AE9'Access);
55895      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4304, (Is_Empty => True));
55896   end Initialize_4304;
55897
55898   ---------------------
55899   -- Initialize_4305 --
55900   ---------------------
55901
55902   procedure Initialize_4305 is
55903   begin
55904      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
55905       (Base + 4305,
55906        AMF.Internals.Tables.UML_String_Data_0A.MS_0A9F'Access);
55907   end Initialize_4305;
55908
55909   ---------------------
55910   -- Initialize_4306 --
55911   ---------------------
55912
55913   procedure Initialize_4306 is
55914   begin
55915      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4306, (Is_Empty => True));
55916   end Initialize_4306;
55917
55918   ---------------------
55919   -- Initialize_4307 --
55920   ---------------------
55921
55922   procedure Initialize_4307 is
55923   begin
55924      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55925       (Base + 4307,
55926        AMF.Internals.Tables.UML_String_Data_0B.MS_0B62'Access);
55927      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4307, (Is_Empty => True));
55928   end Initialize_4307;
55929
55930   ---------------------
55931   -- Initialize_4308 --
55932   ---------------------
55933
55934   procedure Initialize_4308 is
55935   begin
55936      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
55937       (Base + 4308,
55938        AMF.Internals.Tables.UML_String_Data_00.MS_0042'Access);
55939   end Initialize_4308;
55940
55941   ---------------------
55942   -- Initialize_4309 --
55943   ---------------------
55944
55945   procedure Initialize_4309 is
55946   begin
55947      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4309, (Is_Empty => True));
55948   end Initialize_4309;
55949
55950   ---------------------
55951   -- Initialize_4310 --
55952   ---------------------
55953
55954   procedure Initialize_4310 is
55955   begin
55956      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55957       (Base + 4310,
55958        AMF.Internals.Tables.UML_String_Data_04.MS_0422'Access);
55959      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4310, (Is_Empty => True));
55960   end Initialize_4310;
55961
55962   ---------------------
55963   -- Initialize_4311 --
55964   ---------------------
55965
55966   procedure Initialize_4311 is
55967   begin
55968      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
55969       (Base + 4311,
55970        AMF.Internals.Tables.UML_String_Data_00.MS_0091'Access);
55971   end Initialize_4311;
55972
55973   ---------------------
55974   -- Initialize_4312 --
55975   ---------------------
55976
55977   procedure Initialize_4312 is
55978   begin
55979      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4312, (Is_Empty => True));
55980   end Initialize_4312;
55981
55982   ---------------------
55983   -- Initialize_4313 --
55984   ---------------------
55985
55986   procedure Initialize_4313 is
55987   begin
55988      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
55989       (Base + 4313,
55990        AMF.Internals.Tables.UML_String_Data_0B.MS_0B0E'Access);
55991      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4313, (Is_Empty => True));
55992   end Initialize_4313;
55993
55994   ---------------------
55995   -- Initialize_4314 --
55996   ---------------------
55997
55998   procedure Initialize_4314 is
55999   begin
56000      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56001       (Base + 4314,
56002        AMF.Internals.Tables.UML_String_Data_04.MS_04D6'Access);
56003   end Initialize_4314;
56004
56005   ---------------------
56006   -- Initialize_4315 --
56007   ---------------------
56008
56009   procedure Initialize_4315 is
56010   begin
56011      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4315, (Is_Empty => True));
56012   end Initialize_4315;
56013
56014   ---------------------
56015   -- Initialize_4316 --
56016   ---------------------
56017
56018   procedure Initialize_4316 is
56019   begin
56020      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56021       (Base + 4316,
56022        AMF.Internals.Tables.UML_String_Data_04.MS_0428'Access);
56023   end Initialize_4316;
56024
56025   ---------------------
56026   -- Initialize_4317 --
56027   ---------------------
56028
56029   procedure Initialize_4317 is
56030   begin
56031      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56032       (Base + 4317,
56033        AMF.Internals.Tables.UML_String_Data_0B.MS_0B7A'Access);
56034   end Initialize_4317;
56035
56036   ---------------------
56037   -- Initialize_4318 --
56038   ---------------------
56039
56040   procedure Initialize_4318 is
56041   begin
56042      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56043       (Base + 4318,
56044        AMF.Internals.Tables.UML_String_Data_03.MS_0388'Access);
56045   end Initialize_4318;
56046
56047   ---------------------
56048   -- Initialize_4319 --
56049   ---------------------
56050
56051   procedure Initialize_4319 is
56052   begin
56053      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56054       (Base + 4319,
56055        AMF.Internals.Tables.UML_String_Data_08.MS_0857'Access);
56056   end Initialize_4319;
56057
56058   ---------------------
56059   -- Initialize_4320 --
56060   ---------------------
56061
56062   procedure Initialize_4320 is
56063   begin
56064      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
56065       (Base + 4320,
56066        AMF.Internals.Tables.UML_String_Data_0A.MS_0ABC'Access);
56067      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4320, (Is_Empty => True));
56068   end Initialize_4320;
56069
56070   ---------------------
56071   -- Initialize_4321 --
56072   ---------------------
56073
56074   procedure Initialize_4321 is
56075   begin
56076      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56077       (Base + 4321,
56078        AMF.Internals.Tables.UML_String_Data_03.MS_03D5'Access);
56079   end Initialize_4321;
56080
56081   ---------------------
56082   -- Initialize_4322 --
56083   ---------------------
56084
56085   procedure Initialize_4322 is
56086   begin
56087      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4322, (Is_Empty => True));
56088   end Initialize_4322;
56089
56090   ---------------------
56091   -- Initialize_4323 --
56092   ---------------------
56093
56094   procedure Initialize_4323 is
56095   begin
56096      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
56097       (Base + 4323,
56098        AMF.Internals.Tables.UML_String_Data_09.MS_099B'Access);
56099      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4323, (Is_Empty => True));
56100   end Initialize_4323;
56101
56102   ---------------------
56103   -- Initialize_4324 --
56104   ---------------------
56105
56106   procedure Initialize_4324 is
56107   begin
56108      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56109       (Base + 4324,
56110        AMF.Internals.Tables.UML_String_Data_07.MS_079C'Access);
56111   end Initialize_4324;
56112
56113   ---------------------
56114   -- Initialize_4325 --
56115   ---------------------
56116
56117   procedure Initialize_4325 is
56118   begin
56119      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4325, (Is_Empty => True));
56120   end Initialize_4325;
56121
56122   ---------------------
56123   -- Initialize_4326 --
56124   ---------------------
56125
56126   procedure Initialize_4326 is
56127   begin
56128      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
56129       (Base + 4326,
56130        AMF.Internals.Tables.UML_String_Data_09.MS_095F'Access);
56131      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4326, (Is_Empty => True));
56132   end Initialize_4326;
56133
56134   ---------------------
56135   -- Initialize_4327 --
56136   ---------------------
56137
56138   procedure Initialize_4327 is
56139   begin
56140      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56141       (Base + 4327,
56142        AMF.Internals.Tables.UML_String_Data_03.MS_03A1'Access);
56143   end Initialize_4327;
56144
56145   ---------------------
56146   -- Initialize_4328 --
56147   ---------------------
56148
56149   procedure Initialize_4328 is
56150   begin
56151      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4328, (Is_Empty => True));
56152   end Initialize_4328;
56153
56154   ---------------------
56155   -- Initialize_4329 --
56156   ---------------------
56157
56158   procedure Initialize_4329 is
56159   begin
56160      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56161       (Base + 4329,
56162        AMF.Internals.Tables.UML_String_Data_09.MS_0951'Access);
56163   end Initialize_4329;
56164
56165   ---------------------
56166   -- Initialize_4330 --
56167   ---------------------
56168
56169   procedure Initialize_4330 is
56170   begin
56171      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56172       (Base + 4330,
56173        AMF.Internals.Tables.UML_String_Data_04.MS_04E0'Access);
56174   end Initialize_4330;
56175
56176   ---------------------
56177   -- Initialize_4331 --
56178   ---------------------
56179
56180   procedure Initialize_4331 is
56181   begin
56182      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56183       (Base + 4331,
56184        AMF.Internals.Tables.UML_String_Data_05.MS_0535'Access);
56185   end Initialize_4331;
56186
56187   ---------------------
56188   -- Initialize_4332 --
56189   ---------------------
56190
56191   procedure Initialize_4332 is
56192   begin
56193      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56194       (Base + 4332,
56195        AMF.Internals.Tables.UML_String_Data_01.MS_0124'Access);
56196   end Initialize_4332;
56197
56198   ---------------------
56199   -- Initialize_4333 --
56200   ---------------------
56201
56202   procedure Initialize_4333 is
56203   begin
56204      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56205       (Base + 4333,
56206        AMF.Internals.Tables.UML_String_Data_05.MS_05D2'Access);
56207   end Initialize_4333;
56208
56209   ---------------------
56210   -- Initialize_4334 --
56211   ---------------------
56212
56213   procedure Initialize_4334 is
56214   begin
56215      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56216       (Base + 4334,
56217        AMF.Internals.Tables.UML_String_Data_0C.MS_0C21'Access);
56218   end Initialize_4334;
56219
56220   ---------------------
56221   -- Initialize_4335 --
56222   ---------------------
56223
56224   procedure Initialize_4335 is
56225   begin
56226      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
56227       (Base + 4335,
56228        AMF.Internals.Tables.UML_String_Data_0A.MS_0A4F'Access);
56229      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4335, (Is_Empty => True));
56230   end Initialize_4335;
56231
56232   ---------------------
56233   -- Initialize_4336 --
56234   ---------------------
56235
56236   procedure Initialize_4336 is
56237   begin
56238      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56239       (Base + 4336,
56240        AMF.Internals.Tables.UML_String_Data_09.MS_0900'Access);
56241   end Initialize_4336;
56242
56243   ---------------------
56244   -- Initialize_4337 --
56245   ---------------------
56246
56247   procedure Initialize_4337 is
56248   begin
56249      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4337, (Is_Empty => True));
56250   end Initialize_4337;
56251
56252   ---------------------
56253   -- Initialize_4338 --
56254   ---------------------
56255
56256   procedure Initialize_4338 is
56257   begin
56258      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56259       (Base + 4338,
56260        AMF.Internals.Tables.UML_String_Data_0A.MS_0A3A'Access);
56261   end Initialize_4338;
56262
56263   ---------------------
56264   -- Initialize_4339 --
56265   ---------------------
56266
56267   procedure Initialize_4339 is
56268   begin
56269      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56270       (Base + 4339,
56271        AMF.Internals.Tables.UML_String_Data_03.MS_03B6'Access);
56272   end Initialize_4339;
56273
56274   ---------------------
56275   -- Initialize_4340 --
56276   ---------------------
56277
56278   procedure Initialize_4340 is
56279   begin
56280      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56281       (Base + 4340,
56282        AMF.Internals.Tables.UML_String_Data_05.MS_051E'Access);
56283   end Initialize_4340;
56284
56285   ---------------------
56286   -- Initialize_4341 --
56287   ---------------------
56288
56289   procedure Initialize_4341 is
56290   begin
56291      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56292       (Base + 4341,
56293        AMF.Internals.Tables.UML_String_Data_07.MS_0770'Access);
56294   end Initialize_4341;
56295
56296   ---------------------
56297   -- Initialize_4342 --
56298   ---------------------
56299
56300   procedure Initialize_4342 is
56301   begin
56302      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4342, True);
56303      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
56304       (Base + 4342,
56305        AMF.Internals.Tables.UML_String_Data_04.MS_047C'Access);
56306      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4342, (False, AMF.CMOF.Public_Visibility));
56307   end Initialize_4342;
56308
56309   ---------------------
56310   -- Initialize_4343 --
56311   ---------------------
56312
56313   procedure Initialize_4343 is
56314   begin
56315      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56316       (Base + 4343,
56317        AMF.Internals.Tables.UML_String_Data_08.MS_08AF'Access);
56318   end Initialize_4343;
56319
56320   ---------------------
56321   -- Initialize_4344 --
56322   ---------------------
56323
56324   procedure Initialize_4344 is
56325   begin
56326      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
56327       (Base + 4344,
56328        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
56329      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4344, (Is_Empty => True));
56330   end Initialize_4344;
56331
56332   ---------------------
56333   -- Initialize_4345 --
56334   ---------------------
56335
56336   procedure Initialize_4345 is
56337   begin
56338      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4345, (Is_Empty => True));
56339   end Initialize_4345;
56340
56341   ---------------------
56342   -- Initialize_4346 --
56343   ---------------------
56344
56345   procedure Initialize_4346 is
56346   begin
56347      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4346, AMF.CMOF.Return_Parameter);
56348      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 4346, (False, 0));
56349      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
56350       (Base + 4346,
56351        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
56352      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 4346, (False, (Unlimited => True)));
56353      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4346, (False, AMF.CMOF.Public_Visibility));
56354   end Initialize_4346;
56355
56356   ---------------------
56357   -- Initialize_4347 --
56358   ---------------------
56359
56360   procedure Initialize_4347 is
56361   begin
56362      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56363       (Base + 4347,
56364        AMF.Internals.Tables.UML_String_Data_04.MS_04A1'Access);
56365   end Initialize_4347;
56366
56367   ---------------------
56368   -- Initialize_4348 --
56369   ---------------------
56370
56371   procedure Initialize_4348 is
56372   begin
56373      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56374       (Base + 4348,
56375        AMF.Internals.Tables.UML_String_Data_03.MS_031C'Access);
56376   end Initialize_4348;
56377
56378   ---------------------
56379   -- Initialize_4349 --
56380   ---------------------
56381
56382   procedure Initialize_4349 is
56383   begin
56384      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56385       (Base + 4349,
56386        AMF.Internals.Tables.UML_String_Data_03.MS_03BE'Access);
56387   end Initialize_4349;
56388
56389   ---------------------
56390   -- Initialize_4350 --
56391   ---------------------
56392
56393   procedure Initialize_4350 is
56394   begin
56395      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56396       (Base + 4350,
56397        AMF.Internals.Tables.UML_String_Data_02.MS_02FF'Access);
56398   end Initialize_4350;
56399
56400   ---------------------
56401   -- Initialize_4351 --
56402   ---------------------
56403
56404   procedure Initialize_4351 is
56405   begin
56406      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
56407       (Base + 4351,
56408        AMF.Internals.Tables.UML_String_Data_0B.MS_0B66'Access);
56409      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4351, (Is_Empty => True));
56410   end Initialize_4351;
56411
56412   ---------------------
56413   -- Initialize_4352 --
56414   ---------------------
56415
56416   procedure Initialize_4352 is
56417   begin
56418      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56419       (Base + 4352,
56420        AMF.Internals.Tables.UML_String_Data_04.MS_046C'Access);
56421   end Initialize_4352;
56422
56423   ---------------------
56424   -- Initialize_4353 --
56425   ---------------------
56426
56427   procedure Initialize_4353 is
56428   begin
56429      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4353, (Is_Empty => True));
56430   end Initialize_4353;
56431
56432   ---------------------
56433   -- Initialize_4354 --
56434   ---------------------
56435
56436   procedure Initialize_4354 is
56437   begin
56438      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
56439       (Base + 4354,
56440        AMF.Internals.Tables.UML_String_Data_08.MS_0844'Access);
56441      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4354, (Is_Empty => True));
56442   end Initialize_4354;
56443
56444   ---------------------
56445   -- Initialize_4355 --
56446   ---------------------
56447
56448   procedure Initialize_4355 is
56449   begin
56450      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56451       (Base + 4355,
56452        AMF.Internals.Tables.UML_String_Data_03.MS_03F1'Access);
56453   end Initialize_4355;
56454
56455   ---------------------
56456   -- Initialize_4356 --
56457   ---------------------
56458
56459   procedure Initialize_4356 is
56460   begin
56461      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4356, (Is_Empty => True));
56462   end Initialize_4356;
56463
56464   ---------------------
56465   -- Initialize_4357 --
56466   ---------------------
56467
56468   procedure Initialize_4357 is
56469   begin
56470      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56471       (Base + 4357,
56472        AMF.Internals.Tables.UML_String_Data_02.MS_0280'Access);
56473   end Initialize_4357;
56474
56475   ---------------------
56476   -- Initialize_4358 --
56477   ---------------------
56478
56479   procedure Initialize_4358 is
56480   begin
56481      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56482       (Base + 4358,
56483        AMF.Internals.Tables.UML_String_Data_09.MS_0911'Access);
56484   end Initialize_4358;
56485
56486   ---------------------
56487   -- Initialize_4359 --
56488   ---------------------
56489
56490   procedure Initialize_4359 is
56491   begin
56492      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56493       (Base + 4359,
56494        AMF.Internals.Tables.UML_String_Data_05.MS_05CD'Access);
56495   end Initialize_4359;
56496
56497   ---------------------
56498   -- Initialize_4360 --
56499   ---------------------
56500
56501   procedure Initialize_4360 is
56502   begin
56503      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56504       (Base + 4360,
56505        AMF.Internals.Tables.UML_String_Data_00.MS_00A4'Access);
56506   end Initialize_4360;
56507
56508   ---------------------
56509   -- Initialize_4361 --
56510   ---------------------
56511
56512   procedure Initialize_4361 is
56513   begin
56514      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
56515       (Base + 4361,
56516        AMF.Internals.Tables.UML_String_Data_05.MS_0501'Access);
56517      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4361, (Is_Empty => True));
56518   end Initialize_4361;
56519
56520   ---------------------
56521   -- Initialize_4362 --
56522   ---------------------
56523
56524   procedure Initialize_4362 is
56525   begin
56526      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56527       (Base + 4362,
56528        AMF.Internals.Tables.UML_String_Data_01.MS_01BC'Access);
56529   end Initialize_4362;
56530
56531   ---------------------
56532   -- Initialize_4363 --
56533   ---------------------
56534
56535   procedure Initialize_4363 is
56536   begin
56537      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4363, (Is_Empty => True));
56538   end Initialize_4363;
56539
56540   ---------------------
56541   -- Initialize_4364 --
56542   ---------------------
56543
56544   procedure Initialize_4364 is
56545   begin
56546      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56547       (Base + 4364,
56548        AMF.Internals.Tables.UML_String_Data_00.MS_0047'Access);
56549   end Initialize_4364;
56550
56551   ---------------------
56552   -- Initialize_4365 --
56553   ---------------------
56554
56555   procedure Initialize_4365 is
56556   begin
56557      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56558       (Base + 4365,
56559        AMF.Internals.Tables.UML_String_Data_0C.MS_0C6C'Access);
56560   end Initialize_4365;
56561
56562   ---------------------
56563   -- Initialize_4366 --
56564   ---------------------
56565
56566   procedure Initialize_4366 is
56567   begin
56568      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56569       (Base + 4366,
56570        AMF.Internals.Tables.UML_String_Data_0B.MS_0B39'Access);
56571   end Initialize_4366;
56572
56573   ---------------------
56574   -- Initialize_4367 --
56575   ---------------------
56576
56577   procedure Initialize_4367 is
56578   begin
56579      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56580       (Base + 4367,
56581        AMF.Internals.Tables.UML_String_Data_09.MS_09B3'Access);
56582   end Initialize_4367;
56583
56584   ---------------------
56585   -- Initialize_4368 --
56586   ---------------------
56587
56588   procedure Initialize_4368 is
56589   begin
56590      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56591       (Base + 4368,
56592        AMF.Internals.Tables.UML_String_Data_05.MS_051B'Access);
56593   end Initialize_4368;
56594
56595   ---------------------
56596   -- Initialize_4369 --
56597   ---------------------
56598
56599   procedure Initialize_4369 is
56600   begin
56601      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56602       (Base + 4369,
56603        AMF.Internals.Tables.UML_String_Data_0C.MS_0C5D'Access);
56604   end Initialize_4369;
56605
56606   ---------------------
56607   -- Initialize_4370 --
56608   ---------------------
56609
56610   procedure Initialize_4370 is
56611   begin
56612      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
56613       (Base + 4370,
56614        AMF.Internals.Tables.UML_String_Data_05.MS_0501'Access);
56615      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4370, (Is_Empty => True));
56616   end Initialize_4370;
56617
56618   ---------------------
56619   -- Initialize_4371 --
56620   ---------------------
56621
56622   procedure Initialize_4371 is
56623   begin
56624      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56625       (Base + 4371,
56626        AMF.Internals.Tables.UML_String_Data_07.MS_07C0'Access);
56627   end Initialize_4371;
56628
56629   ---------------------
56630   -- Initialize_4372 --
56631   ---------------------
56632
56633   procedure Initialize_4372 is
56634   begin
56635      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4372, (Is_Empty => True));
56636   end Initialize_4372;
56637
56638   ---------------------
56639   -- Initialize_4373 --
56640   ---------------------
56641
56642   procedure Initialize_4373 is
56643   begin
56644      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56645       (Base + 4373,
56646        AMF.Internals.Tables.UML_String_Data_02.MS_023B'Access);
56647   end Initialize_4373;
56648
56649   ---------------------
56650   -- Initialize_4374 --
56651   ---------------------
56652
56653   procedure Initialize_4374 is
56654   begin
56655      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56656       (Base + 4374,
56657        AMF.Internals.Tables.UML_String_Data_0A.MS_0A55'Access);
56658   end Initialize_4374;
56659
56660   ---------------------
56661   -- Initialize_4375 --
56662   ---------------------
56663
56664   procedure Initialize_4375 is
56665   begin
56666      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56667       (Base + 4375,
56668        AMF.Internals.Tables.UML_String_Data_06.MS_06E5'Access);
56669   end Initialize_4375;
56670
56671   ---------------------
56672   -- Initialize_4376 --
56673   ---------------------
56674
56675   procedure Initialize_4376 is
56676   begin
56677      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56678       (Base + 4376,
56679        AMF.Internals.Tables.UML_String_Data_02.MS_0207'Access);
56680   end Initialize_4376;
56681
56682   ---------------------
56683   -- Initialize_4377 --
56684   ---------------------
56685
56686   procedure Initialize_4377 is
56687   begin
56688      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56689       (Base + 4377,
56690        AMF.Internals.Tables.UML_String_Data_02.MS_0251'Access);
56691   end Initialize_4377;
56692
56693   ---------------------
56694   -- Initialize_4378 --
56695   ---------------------
56696
56697   procedure Initialize_4378 is
56698   begin
56699      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
56700       (Base + 4378,
56701        AMF.Internals.Tables.UML_String_Data_01.MS_01EF'Access);
56702      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4378, (Is_Empty => True));
56703   end Initialize_4378;
56704
56705   ---------------------
56706   -- Initialize_4379 --
56707   ---------------------
56708
56709   procedure Initialize_4379 is
56710   begin
56711      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56712       (Base + 4379,
56713        AMF.Internals.Tables.UML_String_Data_00.MS_001F'Access);
56714   end Initialize_4379;
56715
56716   ---------------------
56717   -- Initialize_4380 --
56718   ---------------------
56719
56720   procedure Initialize_4380 is
56721   begin
56722      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4380, (Is_Empty => True));
56723   end Initialize_4380;
56724
56725   ---------------------
56726   -- Initialize_4381 --
56727   ---------------------
56728
56729   procedure Initialize_4381 is
56730   begin
56731      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56732       (Base + 4381,
56733        AMF.Internals.Tables.UML_String_Data_08.MS_0858'Access);
56734   end Initialize_4381;
56735
56736   ---------------------
56737   -- Initialize_4382 --
56738   ---------------------
56739
56740   procedure Initialize_4382 is
56741   begin
56742      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56743       (Base + 4382,
56744        AMF.Internals.Tables.UML_String_Data_00.MS_00BF'Access);
56745   end Initialize_4382;
56746
56747   ---------------------
56748   -- Initialize_4383 --
56749   ---------------------
56750
56751   procedure Initialize_4383 is
56752   begin
56753      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56754       (Base + 4383,
56755        AMF.Internals.Tables.UML_String_Data_08.MS_0811'Access);
56756   end Initialize_4383;
56757
56758   ---------------------
56759   -- Initialize_4384 --
56760   ---------------------
56761
56762   procedure Initialize_4384 is
56763   begin
56764      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56765       (Base + 4384,
56766        AMF.Internals.Tables.UML_String_Data_0C.MS_0C7C'Access);
56767   end Initialize_4384;
56768
56769   ---------------------
56770   -- Initialize_4385 --
56771   ---------------------
56772
56773   procedure Initialize_4385 is
56774   begin
56775      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56776       (Base + 4385,
56777        AMF.Internals.Tables.UML_String_Data_07.MS_0754'Access);
56778   end Initialize_4385;
56779
56780   ---------------------
56781   -- Initialize_4386 --
56782   ---------------------
56783
56784   procedure Initialize_4386 is
56785   begin
56786      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56787       (Base + 4386,
56788        AMF.Internals.Tables.UML_String_Data_02.MS_0207'Access);
56789   end Initialize_4386;
56790
56791   ---------------------
56792   -- Initialize_4387 --
56793   ---------------------
56794
56795   procedure Initialize_4387 is
56796   begin
56797      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4387, True);
56798      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
56799       (Base + 4387,
56800        AMF.Internals.Tables.UML_String_Data_01.MS_014E'Access);
56801      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4387, (False, AMF.CMOF.Public_Visibility));
56802   end Initialize_4387;
56803
56804   ---------------------
56805   -- Initialize_4388 --
56806   ---------------------
56807
56808   procedure Initialize_4388 is
56809   begin
56810      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56811       (Base + 4388,
56812        AMF.Internals.Tables.UML_String_Data_0B.MS_0BDB'Access);
56813   end Initialize_4388;
56814
56815   ---------------------
56816   -- Initialize_4389 --
56817   ---------------------
56818
56819   procedure Initialize_4389 is
56820   begin
56821      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
56822       (Base + 4389,
56823        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
56824      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4389, (Is_Empty => True));
56825   end Initialize_4389;
56826
56827   ---------------------
56828   -- Initialize_4390 --
56829   ---------------------
56830
56831   procedure Initialize_4390 is
56832   begin
56833      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4390, (Is_Empty => True));
56834   end Initialize_4390;
56835
56836   ---------------------
56837   -- Initialize_4391 --
56838   ---------------------
56839
56840   procedure Initialize_4391 is
56841   begin
56842      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4391, AMF.CMOF.Return_Parameter);
56843      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
56844       (Base + 4391,
56845        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
56846      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4391, (False, AMF.CMOF.Public_Visibility));
56847   end Initialize_4391;
56848
56849   ---------------------
56850   -- Initialize_4392 --
56851   ---------------------
56852
56853   procedure Initialize_4392 is
56854   begin
56855      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4392, True);
56856      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
56857       (Base + 4392,
56858        AMF.Internals.Tables.UML_String_Data_00.MS_003F'Access);
56859      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4392, (False, AMF.CMOF.Public_Visibility));
56860   end Initialize_4392;
56861
56862   ---------------------
56863   -- Initialize_4393 --
56864   ---------------------
56865
56866   procedure Initialize_4393 is
56867   begin
56868      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56869       (Base + 4393,
56870        AMF.Internals.Tables.UML_String_Data_03.MS_031B'Access);
56871   end Initialize_4393;
56872
56873   ---------------------
56874   -- Initialize_4394 --
56875   ---------------------
56876
56877   procedure Initialize_4394 is
56878   begin
56879      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
56880       (Base + 4394,
56881        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
56882      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4394, (Is_Empty => True));
56883   end Initialize_4394;
56884
56885   ---------------------
56886   -- Initialize_4395 --
56887   ---------------------
56888
56889   procedure Initialize_4395 is
56890   begin
56891      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4395, (Is_Empty => True));
56892   end Initialize_4395;
56893
56894   ---------------------
56895   -- Initialize_4396 --
56896   ---------------------
56897
56898   procedure Initialize_4396 is
56899   begin
56900      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4396, AMF.CMOF.Return_Parameter);
56901      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 4396, (False, 0));
56902      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
56903       (Base + 4396,
56904        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
56905      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 4396, (False, (Unlimited => True)));
56906      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4396, (False, AMF.CMOF.Public_Visibility));
56907   end Initialize_4396;
56908
56909   ---------------------
56910   -- Initialize_4397 --
56911   ---------------------
56912
56913   procedure Initialize_4397 is
56914   begin
56915      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56916       (Base + 4397,
56917        AMF.Internals.Tables.UML_String_Data_06.MS_0601'Access);
56918   end Initialize_4397;
56919
56920   ---------------------
56921   -- Initialize_4398 --
56922   ---------------------
56923
56924   procedure Initialize_4398 is
56925   begin
56926      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
56927       (Base + 4398,
56928        AMF.Internals.Tables.UML_String_Data_04.MS_0441'Access);
56929      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4398, (Is_Empty => True));
56930   end Initialize_4398;
56931
56932   ---------------------
56933   -- Initialize_4399 --
56934   ---------------------
56935
56936   procedure Initialize_4399 is
56937   begin
56938      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56939       (Base + 4399,
56940        AMF.Internals.Tables.UML_String_Data_06.MS_063C'Access);
56941   end Initialize_4399;
56942
56943   ---------------------
56944   -- Initialize_4400 --
56945   ---------------------
56946
56947   procedure Initialize_4400 is
56948   begin
56949      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4400, (Is_Empty => True));
56950   end Initialize_4400;
56951
56952   ---------------------
56953   -- Initialize_4401 --
56954   ---------------------
56955
56956   procedure Initialize_4401 is
56957   begin
56958      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
56959       (Base + 4401,
56960        AMF.Internals.Tables.UML_String_Data_06.MS_0680'Access);
56961      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4401, (Is_Empty => True));
56962   end Initialize_4401;
56963
56964   ---------------------
56965   -- Initialize_4402 --
56966   ---------------------
56967
56968   procedure Initialize_4402 is
56969   begin
56970      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
56971       (Base + 4402,
56972        AMF.Internals.Tables.UML_String_Data_0C.MS_0C41'Access);
56973   end Initialize_4402;
56974
56975   ---------------------
56976   -- Initialize_4403 --
56977   ---------------------
56978
56979   procedure Initialize_4403 is
56980   begin
56981      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4403, (Is_Empty => True));
56982   end Initialize_4403;
56983
56984   ---------------------
56985   -- Initialize_4404 --
56986   ---------------------
56987
56988   procedure Initialize_4404 is
56989   begin
56990      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
56991       (Base + 4404,
56992        AMF.Internals.Tables.UML_String_Data_03.MS_030D'Access);
56993      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4404, (Is_Empty => True));
56994   end Initialize_4404;
56995
56996   ---------------------
56997   -- Initialize_4405 --
56998   ---------------------
56999
57000   procedure Initialize_4405 is
57001   begin
57002      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57003       (Base + 4405,
57004        AMF.Internals.Tables.UML_String_Data_01.MS_0143'Access);
57005   end Initialize_4405;
57006
57007   ---------------------
57008   -- Initialize_4406 --
57009   ---------------------
57010
57011   procedure Initialize_4406 is
57012   begin
57013      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4406, (Is_Empty => True));
57014   end Initialize_4406;
57015
57016   ---------------------
57017   -- Initialize_4407 --
57018   ---------------------
57019
57020   procedure Initialize_4407 is
57021   begin
57022      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57023       (Base + 4407,
57024        AMF.Internals.Tables.UML_String_Data_03.MS_036A'Access);
57025   end Initialize_4407;
57026
57027   ---------------------
57028   -- Initialize_4408 --
57029   ---------------------
57030
57031   procedure Initialize_4408 is
57032   begin
57033      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57034       (Base + 4408,
57035        AMF.Internals.Tables.UML_String_Data_01.MS_0156'Access);
57036   end Initialize_4408;
57037
57038   ---------------------
57039   -- Initialize_4409 --
57040   ---------------------
57041
57042   procedure Initialize_4409 is
57043   begin
57044      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57045       (Base + 4409,
57046        AMF.Internals.Tables.UML_String_Data_03.MS_036A'Access);
57047   end Initialize_4409;
57048
57049   ---------------------
57050   -- Initialize_4410 --
57051   ---------------------
57052
57053   procedure Initialize_4410 is
57054   begin
57055      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57056       (Base + 4410,
57057        AMF.Internals.Tables.UML_String_Data_03.MS_0369'Access);
57058   end Initialize_4410;
57059
57060   ---------------------
57061   -- Initialize_4411 --
57062   ---------------------
57063
57064   procedure Initialize_4411 is
57065   begin
57066      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57067       (Base + 4411,
57068        AMF.Internals.Tables.UML_String_Data_03.MS_0368'Access);
57069   end Initialize_4411;
57070
57071   ---------------------
57072   -- Initialize_4412 --
57073   ---------------------
57074
57075   procedure Initialize_4412 is
57076   begin
57077      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57078       (Base + 4412,
57079        AMF.Internals.Tables.UML_String_Data_06.MS_06AE'Access);
57080   end Initialize_4412;
57081
57082   ---------------------
57083   -- Initialize_4413 --
57084   ---------------------
57085
57086   procedure Initialize_4413 is
57087   begin
57088      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57089       (Base + 4413,
57090        AMF.Internals.Tables.UML_String_Data_09.MS_09F9'Access);
57091   end Initialize_4413;
57092
57093   ---------------------
57094   -- Initialize_4414 --
57095   ---------------------
57096
57097   procedure Initialize_4414 is
57098   begin
57099      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57100       (Base + 4414,
57101        AMF.Internals.Tables.UML_String_Data_00.MS_004C'Access);
57102   end Initialize_4414;
57103
57104   ---------------------
57105   -- Initialize_4415 --
57106   ---------------------
57107
57108   procedure Initialize_4415 is
57109   begin
57110      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
57111       (Base + 4415,
57112        AMF.Internals.Tables.UML_String_Data_07.MS_0772'Access);
57113      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4415, (Is_Empty => True));
57114   end Initialize_4415;
57115
57116   ---------------------
57117   -- Initialize_4416 --
57118   ---------------------
57119
57120   procedure Initialize_4416 is
57121   begin
57122      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57123       (Base + 4416,
57124        AMF.Internals.Tables.UML_String_Data_09.MS_0995'Access);
57125   end Initialize_4416;
57126
57127   ---------------------
57128   -- Initialize_4417 --
57129   ---------------------
57130
57131   procedure Initialize_4417 is
57132   begin
57133      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4417, (Is_Empty => True));
57134   end Initialize_4417;
57135
57136   ---------------------
57137   -- Initialize_4418 --
57138   ---------------------
57139
57140   procedure Initialize_4418 is
57141   begin
57142      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
57143       (Base + 4418,
57144        AMF.Internals.Tables.UML_String_Data_03.MS_03E5'Access);
57145      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4418, (Is_Empty => True));
57146   end Initialize_4418;
57147
57148   ---------------------
57149   -- Initialize_4419 --
57150   ---------------------
57151
57152   procedure Initialize_4419 is
57153   begin
57154      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57155       (Base + 4419,
57156        AMF.Internals.Tables.UML_String_Data_08.MS_08ED'Access);
57157   end Initialize_4419;
57158
57159   ---------------------
57160   -- Initialize_4420 --
57161   ---------------------
57162
57163   procedure Initialize_4420 is
57164   begin
57165      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4420, (Is_Empty => True));
57166   end Initialize_4420;
57167
57168   ---------------------
57169   -- Initialize_4421 --
57170   ---------------------
57171
57172   procedure Initialize_4421 is
57173   begin
57174      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57175       (Base + 4421,
57176        AMF.Internals.Tables.UML_String_Data_01.MS_017B'Access);
57177   end Initialize_4421;
57178
57179   ---------------------
57180   -- Initialize_4422 --
57181   ---------------------
57182
57183   procedure Initialize_4422 is
57184   begin
57185      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57186       (Base + 4422,
57187        AMF.Internals.Tables.UML_String_Data_0B.MS_0B4C'Access);
57188   end Initialize_4422;
57189
57190   ---------------------
57191   -- Initialize_4423 --
57192   ---------------------
57193
57194   procedure Initialize_4423 is
57195   begin
57196      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57197       (Base + 4423,
57198        AMF.Internals.Tables.UML_String_Data_04.MS_0491'Access);
57199   end Initialize_4423;
57200
57201   ---------------------
57202   -- Initialize_4424 --
57203   ---------------------
57204
57205   procedure Initialize_4424 is
57206   begin
57207      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57208       (Base + 4424,
57209        AMF.Internals.Tables.UML_String_Data_06.MS_06F0'Access);
57210   end Initialize_4424;
57211
57212   ---------------------
57213   -- Initialize_4425 --
57214   ---------------------
57215
57216   procedure Initialize_4425 is
57217   begin
57218      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57219       (Base + 4425,
57220        AMF.Internals.Tables.UML_String_Data_09.MS_0928'Access);
57221   end Initialize_4425;
57222
57223   ---------------------
57224   -- Initialize_4426 --
57225   ---------------------
57226
57227   procedure Initialize_4426 is
57228   begin
57229      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57230       (Base + 4426,
57231        AMF.Internals.Tables.UML_String_Data_08.MS_0856'Access);
57232   end Initialize_4426;
57233
57234   ---------------------
57235   -- Initialize_4427 --
57236   ---------------------
57237
57238   procedure Initialize_4427 is
57239   begin
57240      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57241       (Base + 4427,
57242        AMF.Internals.Tables.UML_String_Data_07.MS_0759'Access);
57243   end Initialize_4427;
57244
57245   ---------------------
57246   -- Initialize_4428 --
57247   ---------------------
57248
57249   procedure Initialize_4428 is
57250   begin
57251      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57252       (Base + 4428,
57253        AMF.Internals.Tables.UML_String_Data_02.MS_02B0'Access);
57254   end Initialize_4428;
57255
57256   ---------------------
57257   -- Initialize_4429 --
57258   ---------------------
57259
57260   procedure Initialize_4429 is
57261   begin
57262      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57263       (Base + 4429,
57264        AMF.Internals.Tables.UML_String_Data_0A.MS_0A7C'Access);
57265   end Initialize_4429;
57266
57267   ---------------------
57268   -- Initialize_4430 --
57269   ---------------------
57270
57271   procedure Initialize_4430 is
57272   begin
57273      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57274       (Base + 4430,
57275        AMF.Internals.Tables.UML_String_Data_0B.MS_0B1E'Access);
57276   end Initialize_4430;
57277
57278   ---------------------
57279   -- Initialize_4431 --
57280   ---------------------
57281
57282   procedure Initialize_4431 is
57283   begin
57284      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57285       (Base + 4431,
57286        AMF.Internals.Tables.UML_String_Data_01.MS_01CF'Access);
57287   end Initialize_4431;
57288
57289   ---------------------
57290   -- Initialize_4432 --
57291   ---------------------
57292
57293   procedure Initialize_4432 is
57294   begin
57295      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57296       (Base + 4432,
57297        AMF.Internals.Tables.UML_String_Data_00.MS_002E'Access);
57298   end Initialize_4432;
57299
57300   ---------------------
57301   -- Initialize_4433 --
57302   ---------------------
57303
57304   procedure Initialize_4433 is
57305   begin
57306      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
57307       (Base + 4433,
57308        AMF.Internals.Tables.UML_String_Data_02.MS_02DD'Access);
57309      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4433, (Is_Empty => True));
57310   end Initialize_4433;
57311
57312   ---------------------
57313   -- Initialize_4434 --
57314   ---------------------
57315
57316   procedure Initialize_4434 is
57317   begin
57318      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57319       (Base + 4434,
57320        AMF.Internals.Tables.UML_String_Data_0C.MS_0C55'Access);
57321   end Initialize_4434;
57322
57323   ---------------------
57324   -- Initialize_4435 --
57325   ---------------------
57326
57327   procedure Initialize_4435 is
57328   begin
57329      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4435, (Is_Empty => True));
57330   end Initialize_4435;
57331
57332   ---------------------
57333   -- Initialize_4436 --
57334   ---------------------
57335
57336   procedure Initialize_4436 is
57337   begin
57338      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
57339       (Base + 4436,
57340        AMF.Internals.Tables.UML_String_Data_02.MS_0274'Access);
57341      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4436, (Is_Empty => True));
57342   end Initialize_4436;
57343
57344   ---------------------
57345   -- Initialize_4437 --
57346   ---------------------
57347
57348   procedure Initialize_4437 is
57349   begin
57350      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57351       (Base + 4437,
57352        AMF.Internals.Tables.UML_String_Data_03.MS_037E'Access);
57353   end Initialize_4437;
57354
57355   ---------------------
57356   -- Initialize_4438 --
57357   ---------------------
57358
57359   procedure Initialize_4438 is
57360   begin
57361      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4438, (Is_Empty => True));
57362   end Initialize_4438;
57363
57364   ---------------------
57365   -- Initialize_4439 --
57366   ---------------------
57367
57368   procedure Initialize_4439 is
57369   begin
57370      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
57371       (Base + 4439,
57372        AMF.Internals.Tables.UML_String_Data_03.MS_031A'Access);
57373      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4439, (Is_Empty => True));
57374   end Initialize_4439;
57375
57376   ---------------------
57377   -- Initialize_4440 --
57378   ---------------------
57379
57380   procedure Initialize_4440 is
57381   begin
57382      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57383       (Base + 4440,
57384        AMF.Internals.Tables.UML_String_Data_06.MS_0690'Access);
57385   end Initialize_4440;
57386
57387   ---------------------
57388   -- Initialize_4441 --
57389   ---------------------
57390
57391   procedure Initialize_4441 is
57392   begin
57393      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4441, (Is_Empty => True));
57394   end Initialize_4441;
57395
57396   ---------------------
57397   -- Initialize_4442 --
57398   ---------------------
57399
57400   procedure Initialize_4442 is
57401   begin
57402      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
57403       (Base + 4442,
57404        AMF.Internals.Tables.UML_String_Data_07.MS_07DA'Access);
57405      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4442, (Is_Empty => True));
57406   end Initialize_4442;
57407
57408   ---------------------
57409   -- Initialize_4443 --
57410   ---------------------
57411
57412   procedure Initialize_4443 is
57413   begin
57414      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57415       (Base + 4443,
57416        AMF.Internals.Tables.UML_String_Data_0C.MS_0C4D'Access);
57417   end Initialize_4443;
57418
57419   ---------------------
57420   -- Initialize_4444 --
57421   ---------------------
57422
57423   procedure Initialize_4444 is
57424   begin
57425      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4444, (Is_Empty => True));
57426   end Initialize_4444;
57427
57428   ---------------------
57429   -- Initialize_4445 --
57430   ---------------------
57431
57432   procedure Initialize_4445 is
57433   begin
57434      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
57435       (Base + 4445,
57436        AMF.Internals.Tables.UML_String_Data_0C.MS_0C58'Access);
57437      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4445, (Is_Empty => True));
57438   end Initialize_4445;
57439
57440   ---------------------
57441   -- Initialize_4446 --
57442   ---------------------
57443
57444   procedure Initialize_4446 is
57445   begin
57446      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57447       (Base + 4446,
57448        AMF.Internals.Tables.UML_String_Data_0A.MS_0A9B'Access);
57449   end Initialize_4446;
57450
57451   ---------------------
57452   -- Initialize_4447 --
57453   ---------------------
57454
57455   procedure Initialize_4447 is
57456   begin
57457      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4447, (Is_Empty => True));
57458   end Initialize_4447;
57459
57460   ---------------------
57461   -- Initialize_4448 --
57462   ---------------------
57463
57464   procedure Initialize_4448 is
57465   begin
57466      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
57467       (Base + 4448,
57468        AMF.Internals.Tables.UML_String_Data_06.MS_06A8'Access);
57469      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4448, (Is_Empty => True));
57470   end Initialize_4448;
57471
57472   ---------------------
57473   -- Initialize_4449 --
57474   ---------------------
57475
57476   procedure Initialize_4449 is
57477   begin
57478      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57479       (Base + 4449,
57480        AMF.Internals.Tables.UML_String_Data_04.MS_045F'Access);
57481   end Initialize_4449;
57482
57483   ---------------------
57484   -- Initialize_4450 --
57485   ---------------------
57486
57487   procedure Initialize_4450 is
57488   begin
57489      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4450, (Is_Empty => True));
57490   end Initialize_4450;
57491
57492   ---------------------
57493   -- Initialize_4451 --
57494   ---------------------
57495
57496   procedure Initialize_4451 is
57497   begin
57498      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
57499       (Base + 4451,
57500        AMF.Internals.Tables.UML_String_Data_09.MS_09C7'Access);
57501      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4451, (Is_Empty => True));
57502   end Initialize_4451;
57503
57504   ---------------------
57505   -- Initialize_4452 --
57506   ---------------------
57507
57508   procedure Initialize_4452 is
57509   begin
57510      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57511       (Base + 4452,
57512        AMF.Internals.Tables.UML_String_Data_03.MS_038F'Access);
57513   end Initialize_4452;
57514
57515   ---------------------
57516   -- Initialize_4453 --
57517   ---------------------
57518
57519   procedure Initialize_4453 is
57520   begin
57521      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4453, (Is_Empty => True));
57522   end Initialize_4453;
57523
57524   ---------------------
57525   -- Initialize_4454 --
57526   ---------------------
57527
57528   procedure Initialize_4454 is
57529   begin
57530      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
57531       (Base + 4454,
57532        AMF.Internals.Tables.UML_String_Data_08.MS_081C'Access);
57533      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4454, (Is_Empty => True));
57534   end Initialize_4454;
57535
57536   ---------------------
57537   -- Initialize_4455 --
57538   ---------------------
57539
57540   procedure Initialize_4455 is
57541   begin
57542      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57543       (Base + 4455,
57544        AMF.Internals.Tables.UML_String_Data_09.MS_0985'Access);
57545   end Initialize_4455;
57546
57547   ---------------------
57548   -- Initialize_4456 --
57549   ---------------------
57550
57551   procedure Initialize_4456 is
57552   begin
57553      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4456, (Is_Empty => True));
57554   end Initialize_4456;
57555
57556   ---------------------
57557   -- Initialize_4457 --
57558   ---------------------
57559
57560   procedure Initialize_4457 is
57561   begin
57562      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
57563       (Base + 4457,
57564        AMF.Internals.Tables.UML_String_Data_09.MS_09D0'Access);
57565      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4457, (Is_Empty => True));
57566   end Initialize_4457;
57567
57568   ---------------------
57569   -- Initialize_4458 --
57570   ---------------------
57571
57572   procedure Initialize_4458 is
57573   begin
57574      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57575       (Base + 4458,
57576        AMF.Internals.Tables.UML_String_Data_06.MS_0602'Access);
57577   end Initialize_4458;
57578
57579   ---------------------
57580   -- Initialize_4459 --
57581   ---------------------
57582
57583   procedure Initialize_4459 is
57584   begin
57585      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4459, (Is_Empty => True));
57586   end Initialize_4459;
57587
57588   ---------------------
57589   -- Initialize_4460 --
57590   ---------------------
57591
57592   procedure Initialize_4460 is
57593   begin
57594      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
57595       (Base + 4460,
57596        AMF.Internals.Tables.UML_String_Data_04.MS_04B6'Access);
57597      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4460, (Is_Empty => True));
57598   end Initialize_4460;
57599
57600   ---------------------
57601   -- Initialize_4461 --
57602   ---------------------
57603
57604   procedure Initialize_4461 is
57605   begin
57606      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57607       (Base + 4461,
57608        AMF.Internals.Tables.UML_String_Data_09.MS_0925'Access);
57609   end Initialize_4461;
57610
57611   ---------------------
57612   -- Initialize_4462 --
57613   ---------------------
57614
57615   procedure Initialize_4462 is
57616   begin
57617      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4462, (Is_Empty => True));
57618   end Initialize_4462;
57619
57620   ---------------------
57621   -- Initialize_4463 --
57622   ---------------------
57623
57624   procedure Initialize_4463 is
57625   begin
57626      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57627       (Base + 4463,
57628        AMF.Internals.Tables.UML_String_Data_05.MS_0545'Access);
57629   end Initialize_4463;
57630
57631   ---------------------
57632   -- Initialize_4464 --
57633   ---------------------
57634
57635   procedure Initialize_4464 is
57636   begin
57637      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57638       (Base + 4464,
57639        AMF.Internals.Tables.UML_String_Data_04.MS_0486'Access);
57640   end Initialize_4464;
57641
57642   ---------------------
57643   -- Initialize_4465 --
57644   ---------------------
57645
57646   procedure Initialize_4465 is
57647   begin
57648      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57649       (Base + 4465,
57650        AMF.Internals.Tables.UML_String_Data_04.MS_0479'Access);
57651   end Initialize_4465;
57652
57653   ---------------------
57654   -- Initialize_4466 --
57655   ---------------------
57656
57657   procedure Initialize_4466 is
57658   begin
57659      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57660       (Base + 4466,
57661        AMF.Internals.Tables.UML_String_Data_0A.MS_0A50'Access);
57662   end Initialize_4466;
57663
57664   ---------------------
57665   -- Initialize_4467 --
57666   ---------------------
57667
57668   procedure Initialize_4467 is
57669   begin
57670      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57671       (Base + 4467,
57672        AMF.Internals.Tables.UML_String_Data_08.MS_082A'Access);
57673   end Initialize_4467;
57674
57675   ---------------------
57676   -- Initialize_4468 --
57677   ---------------------
57678
57679   procedure Initialize_4468 is
57680   begin
57681      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57682       (Base + 4468,
57683        AMF.Internals.Tables.UML_String_Data_02.MS_0254'Access);
57684   end Initialize_4468;
57685
57686   ---------------------
57687   -- Initialize_4469 --
57688   ---------------------
57689
57690   procedure Initialize_4469 is
57691   begin
57692      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57693       (Base + 4469,
57694        AMF.Internals.Tables.UML_String_Data_01.MS_0142'Access);
57695   end Initialize_4469;
57696
57697   ---------------------
57698   -- Initialize_4470 --
57699   ---------------------
57700
57701   procedure Initialize_4470 is
57702   begin
57703      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57704       (Base + 4470,
57705        AMF.Internals.Tables.UML_String_Data_07.MS_0781'Access);
57706   end Initialize_4470;
57707
57708   ---------------------
57709   -- Initialize_4471 --
57710   ---------------------
57711
57712   procedure Initialize_4471 is
57713   begin
57714      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57715       (Base + 4471,
57716        AMF.Internals.Tables.UML_String_Data_03.MS_03FE'Access);
57717   end Initialize_4471;
57718
57719   ---------------------
57720   -- Initialize_4472 --
57721   ---------------------
57722
57723   procedure Initialize_4472 is
57724   begin
57725      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4472, True);
57726      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
57727       (Base + 4472,
57728        AMF.Internals.Tables.UML_String_Data_00.MS_00F2'Access);
57729      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4472, (False, AMF.CMOF.Public_Visibility));
57730   end Initialize_4472;
57731
57732   ---------------------
57733   -- Initialize_4473 --
57734   ---------------------
57735
57736   procedure Initialize_4473 is
57737   begin
57738      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57739       (Base + 4473,
57740        AMF.Internals.Tables.UML_String_Data_06.MS_06BB'Access);
57741   end Initialize_4473;
57742
57743   ---------------------
57744   -- Initialize_4474 --
57745   ---------------------
57746
57747   procedure Initialize_4474 is
57748   begin
57749      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
57750       (Base + 4474,
57751        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
57752      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4474, (Is_Empty => True));
57753   end Initialize_4474;
57754
57755   ---------------------
57756   -- Initialize_4475 --
57757   ---------------------
57758
57759   procedure Initialize_4475 is
57760   begin
57761      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4475, (Is_Empty => True));
57762   end Initialize_4475;
57763
57764   ---------------------
57765   -- Initialize_4476 --
57766   ---------------------
57767
57768   procedure Initialize_4476 is
57769   begin
57770      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4476, AMF.CMOF.Return_Parameter);
57771      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
57772       (Base + 4476,
57773        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
57774      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4476, (False, AMF.CMOF.Public_Visibility));
57775   end Initialize_4476;
57776
57777   ---------------------
57778   -- Initialize_4477 --
57779   ---------------------
57780
57781   procedure Initialize_4477 is
57782   begin
57783      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4477, True);
57784      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
57785       (Base + 4477,
57786        AMF.Internals.Tables.UML_String_Data_08.MS_08AE'Access);
57787      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4477, (False, AMF.CMOF.Public_Visibility));
57788   end Initialize_4477;
57789
57790   ---------------------
57791   -- Initialize_4478 --
57792   ---------------------
57793
57794   procedure Initialize_4478 is
57795   begin
57796      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57797       (Base + 4478,
57798        AMF.Internals.Tables.UML_String_Data_06.MS_0699'Access);
57799   end Initialize_4478;
57800
57801   ---------------------
57802   -- Initialize_4479 --
57803   ---------------------
57804
57805   procedure Initialize_4479 is
57806   begin
57807      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
57808       (Base + 4479,
57809        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
57810      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4479, (Is_Empty => True));
57811   end Initialize_4479;
57812
57813   ---------------------
57814   -- Initialize_4480 --
57815   ---------------------
57816
57817   procedure Initialize_4480 is
57818   begin
57819      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4480, (Is_Empty => True));
57820   end Initialize_4480;
57821
57822   ---------------------
57823   -- Initialize_4481 --
57824   ---------------------
57825
57826   procedure Initialize_4481 is
57827   begin
57828      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
57829       (Base + 4481,
57830        AMF.Internals.Tables.UML_String_Data_0B.MS_0BFB'Access);
57831      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4481, (Is_Empty => True));
57832   end Initialize_4481;
57833
57834   ---------------------
57835   -- Initialize_4482 --
57836   ---------------------
57837
57838   procedure Initialize_4482 is
57839   begin
57840      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4482, (Is_Empty => True));
57841   end Initialize_4482;
57842
57843   ---------------------
57844   -- Initialize_4483 --
57845   ---------------------
57846
57847   procedure Initialize_4483 is
57848   begin
57849      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4483, AMF.CMOF.Return_Parameter);
57850      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
57851       (Base + 4483,
57852        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
57853      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4483, (False, AMF.CMOF.Public_Visibility));
57854   end Initialize_4483;
57855
57856   ---------------------
57857   -- Initialize_4484 --
57858   ---------------------
57859
57860   procedure Initialize_4484 is
57861   begin
57862      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4484, AMF.CMOF.In_Parameter);
57863      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
57864       (Base + 4484,
57865        AMF.Internals.Tables.UML_String_Data_0B.MS_0B5C'Access);
57866      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4484, (False, AMF.CMOF.Public_Visibility));
57867   end Initialize_4484;
57868
57869   ---------------------
57870   -- Initialize_4485 --
57871   ---------------------
57872
57873   procedure Initialize_4485 is
57874   begin
57875      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4485, True);
57876      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
57877       (Base + 4485,
57878        AMF.Internals.Tables.UML_String_Data_03.MS_036B'Access);
57879      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4485, (False, AMF.CMOF.Public_Visibility));
57880   end Initialize_4485;
57881
57882   ---------------------
57883   -- Initialize_4486 --
57884   ---------------------
57885
57886   procedure Initialize_4486 is
57887   begin
57888      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57889       (Base + 4486,
57890        AMF.Internals.Tables.UML_String_Data_04.MS_044F'Access);
57891   end Initialize_4486;
57892
57893   ---------------------
57894   -- Initialize_4487 --
57895   ---------------------
57896
57897   procedure Initialize_4487 is
57898   begin
57899      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
57900       (Base + 4487,
57901        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
57902      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4487, (Is_Empty => True));
57903   end Initialize_4487;
57904
57905   ---------------------
57906   -- Initialize_4488 --
57907   ---------------------
57908
57909   procedure Initialize_4488 is
57910   begin
57911      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4488, (Is_Empty => True));
57912   end Initialize_4488;
57913
57914   ---------------------
57915   -- Initialize_4489 --
57916   ---------------------
57917
57918   procedure Initialize_4489 is
57919   begin
57920      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4489, AMF.CMOF.Return_Parameter);
57921      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
57922       (Base + 4489,
57923        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
57924      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4489, (False, AMF.CMOF.Public_Visibility));
57925   end Initialize_4489;
57926
57927   ---------------------
57928   -- Initialize_4490 --
57929   ---------------------
57930
57931   procedure Initialize_4490 is
57932   begin
57933      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57934       (Base + 4490,
57935        AMF.Internals.Tables.UML_String_Data_03.MS_0381'Access);
57936   end Initialize_4490;
57937
57938   ---------------------
57939   -- Initialize_4491 --
57940   ---------------------
57941
57942   procedure Initialize_4491 is
57943   begin
57944      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57945       (Base + 4491,
57946        AMF.Internals.Tables.UML_String_Data_05.MS_055F'Access);
57947   end Initialize_4491;
57948
57949   ---------------------
57950   -- Initialize_4492 --
57951   ---------------------
57952
57953   procedure Initialize_4492 is
57954   begin
57955      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57956       (Base + 4492,
57957        AMF.Internals.Tables.UML_String_Data_00.MS_0066'Access);
57958   end Initialize_4492;
57959
57960   ---------------------
57961   -- Initialize_4493 --
57962   ---------------------
57963
57964   procedure Initialize_4493 is
57965   begin
57966      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57967       (Base + 4493,
57968        AMF.Internals.Tables.UML_String_Data_07.MS_07E2'Access);
57969   end Initialize_4493;
57970
57971   ---------------------
57972   -- Initialize_4494 --
57973   ---------------------
57974
57975   procedure Initialize_4494 is
57976   begin
57977      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57978       (Base + 4494,
57979        AMF.Internals.Tables.UML_String_Data_05.MS_050E'Access);
57980   end Initialize_4494;
57981
57982   ---------------------
57983   -- Initialize_4495 --
57984   ---------------------
57985
57986   procedure Initialize_4495 is
57987   begin
57988      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
57989       (Base + 4495,
57990        AMF.Internals.Tables.UML_String_Data_08.MS_089B'Access);
57991   end Initialize_4495;
57992
57993   ---------------------
57994   -- Initialize_4496 --
57995   ---------------------
57996
57997   procedure Initialize_4496 is
57998   begin
57999      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58000       (Base + 4496,
58001        AMF.Internals.Tables.UML_String_Data_00.MS_0082'Access);
58002   end Initialize_4496;
58003
58004   ---------------------
58005   -- Initialize_4497 --
58006   ---------------------
58007
58008   procedure Initialize_4497 is
58009   begin
58010      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4497, True);
58011      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
58012       (Base + 4497,
58013        AMF.Internals.Tables.UML_String_Data_06.MS_061B'Access);
58014      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4497, (False, AMF.CMOF.Public_Visibility));
58015   end Initialize_4497;
58016
58017   ---------------------
58018   -- Initialize_4498 --
58019   ---------------------
58020
58021   procedure Initialize_4498 is
58022   begin
58023      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58024       (Base + 4498,
58025        AMF.Internals.Tables.UML_String_Data_05.MS_051D'Access);
58026   end Initialize_4498;
58027
58028   ---------------------
58029   -- Initialize_4499 --
58030   ---------------------
58031
58032   procedure Initialize_4499 is
58033   begin
58034      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
58035       (Base + 4499,
58036        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
58037      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4499, (Is_Empty => True));
58038   end Initialize_4499;
58039
58040   ---------------------
58041   -- Initialize_4500 --
58042   ---------------------
58043
58044   procedure Initialize_4500 is
58045   begin
58046      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4500, (Is_Empty => True));
58047   end Initialize_4500;
58048
58049   ---------------------
58050   -- Initialize_4501 --
58051   ---------------------
58052
58053   procedure Initialize_4501 is
58054   begin
58055      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4501, AMF.CMOF.Return_Parameter);
58056      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
58057       (Base + 4501,
58058        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
58059      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4501, (False, AMF.CMOF.Public_Visibility));
58060   end Initialize_4501;
58061
58062   ---------------------
58063   -- Initialize_4502 --
58064   ---------------------
58065
58066   procedure Initialize_4502 is
58067   begin
58068      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4502, AMF.CMOF.In_Parameter);
58069      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
58070       (Base + 4502,
58071        AMF.Internals.Tables.UML_String_Data_00.MS_008C'Access);
58072      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4502, (False, AMF.CMOF.Public_Visibility));
58073   end Initialize_4502;
58074
58075   ---------------------
58076   -- Initialize_4503 --
58077   ---------------------
58078
58079   procedure Initialize_4503 is
58080   begin
58081      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58082       (Base + 4503,
58083        AMF.Internals.Tables.UML_String_Data_00.MS_0034'Access);
58084   end Initialize_4503;
58085
58086   ---------------------
58087   -- Initialize_4504 --
58088   ---------------------
58089
58090   procedure Initialize_4504 is
58091   begin
58092      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58093       (Base + 4504,
58094        AMF.Internals.Tables.UML_String_Data_05.MS_05F9'Access);
58095   end Initialize_4504;
58096
58097   ---------------------
58098   -- Initialize_4505 --
58099   ---------------------
58100
58101   procedure Initialize_4505 is
58102   begin
58103      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58104       (Base + 4505,
58105        AMF.Internals.Tables.UML_String_Data_06.MS_068C'Access);
58106   end Initialize_4505;
58107
58108   ---------------------
58109   -- Initialize_4506 --
58110   ---------------------
58111
58112   procedure Initialize_4506 is
58113   begin
58114      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58115       (Base + 4506,
58116        AMF.Internals.Tables.UML_String_Data_04.MS_04B3'Access);
58117   end Initialize_4506;
58118
58119   ---------------------
58120   -- Initialize_4507 --
58121   ---------------------
58122
58123   procedure Initialize_4507 is
58124   begin
58125      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58126       (Base + 4507,
58127        AMF.Internals.Tables.UML_String_Data_03.MS_03B3'Access);
58128   end Initialize_4507;
58129
58130   ---------------------
58131   -- Initialize_4508 --
58132   ---------------------
58133
58134   procedure Initialize_4508 is
58135   begin
58136      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
58137       (Base + 4508,
58138        AMF.Internals.Tables.UML_String_Data_01.MS_0136'Access);
58139      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4508, (Is_Empty => True));
58140   end Initialize_4508;
58141
58142   ---------------------
58143   -- Initialize_4509 --
58144   ---------------------
58145
58146   procedure Initialize_4509 is
58147   begin
58148      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58149       (Base + 4509,
58150        AMF.Internals.Tables.UML_String_Data_0C.MS_0C5C'Access);
58151   end Initialize_4509;
58152
58153   ---------------------
58154   -- Initialize_4510 --
58155   ---------------------
58156
58157   procedure Initialize_4510 is
58158   begin
58159      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4510, (Is_Empty => True));
58160   end Initialize_4510;
58161
58162   ---------------------
58163   -- Initialize_4511 --
58164   ---------------------
58165
58166   procedure Initialize_4511 is
58167   begin
58168      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
58169       (Base + 4511,
58170        AMF.Internals.Tables.UML_String_Data_02.MS_0222'Access);
58171      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4511, (Is_Empty => True));
58172   end Initialize_4511;
58173
58174   ---------------------
58175   -- Initialize_4512 --
58176   ---------------------
58177
58178   procedure Initialize_4512 is
58179   begin
58180      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58181       (Base + 4512,
58182        AMF.Internals.Tables.UML_String_Data_09.MS_09F0'Access);
58183   end Initialize_4512;
58184
58185   ---------------------
58186   -- Initialize_4513 --
58187   ---------------------
58188
58189   procedure Initialize_4513 is
58190   begin
58191      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4513, (Is_Empty => True));
58192   end Initialize_4513;
58193
58194   ---------------------
58195   -- Initialize_4514 --
58196   ---------------------
58197
58198   procedure Initialize_4514 is
58199   begin
58200      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
58201       (Base + 4514,
58202        AMF.Internals.Tables.UML_String_Data_04.MS_04D9'Access);
58203      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4514, (Is_Empty => True));
58204   end Initialize_4514;
58205
58206   ---------------------
58207   -- Initialize_4515 --
58208   ---------------------
58209
58210   procedure Initialize_4515 is
58211   begin
58212      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58213       (Base + 4515,
58214        AMF.Internals.Tables.UML_String_Data_07.MS_07A7'Access);
58215   end Initialize_4515;
58216
58217   ---------------------
58218   -- Initialize_4516 --
58219   ---------------------
58220
58221   procedure Initialize_4516 is
58222   begin
58223      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4516, (Is_Empty => True));
58224   end Initialize_4516;
58225
58226   ---------------------
58227   -- Initialize_4517 --
58228   ---------------------
58229
58230   procedure Initialize_4517 is
58231   begin
58232      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
58233       (Base + 4517,
58234        AMF.Internals.Tables.UML_String_Data_04.MS_0431'Access);
58235      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4517, (Is_Empty => True));
58236   end Initialize_4517;
58237
58238   ---------------------
58239   -- Initialize_4518 --
58240   ---------------------
58241
58242   procedure Initialize_4518 is
58243   begin
58244      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58245       (Base + 4518,
58246        AMF.Internals.Tables.UML_String_Data_02.MS_028F'Access);
58247   end Initialize_4518;
58248
58249   ---------------------
58250   -- Initialize_4519 --
58251   ---------------------
58252
58253   procedure Initialize_4519 is
58254   begin
58255      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4519, (Is_Empty => True));
58256   end Initialize_4519;
58257
58258   ---------------------
58259   -- Initialize_4520 --
58260   ---------------------
58261
58262   procedure Initialize_4520 is
58263   begin
58264      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
58265       (Base + 4520,
58266        AMF.Internals.Tables.UML_String_Data_08.MS_0891'Access);
58267      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4520, (Is_Empty => True));
58268   end Initialize_4520;
58269
58270   ---------------------
58271   -- Initialize_4521 --
58272   ---------------------
58273
58274   procedure Initialize_4521 is
58275   begin
58276      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58277       (Base + 4521,
58278        AMF.Internals.Tables.UML_String_Data_04.MS_041C'Access);
58279   end Initialize_4521;
58280
58281   ---------------------
58282   -- Initialize_4522 --
58283   ---------------------
58284
58285   procedure Initialize_4522 is
58286   begin
58287      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4522, (Is_Empty => True));
58288   end Initialize_4522;
58289
58290   ---------------------
58291   -- Initialize_4523 --
58292   ---------------------
58293
58294   procedure Initialize_4523 is
58295   begin
58296      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
58297       (Base + 4523,
58298        AMF.Internals.Tables.UML_String_Data_08.MS_0821'Access);
58299      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4523, (Is_Empty => True));
58300   end Initialize_4523;
58301
58302   ---------------------
58303   -- Initialize_4524 --
58304   ---------------------
58305
58306   procedure Initialize_4524 is
58307   begin
58308      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58309       (Base + 4524,
58310        AMF.Internals.Tables.UML_String_Data_0C.MS_0C7F'Access);
58311   end Initialize_4524;
58312
58313   ---------------------
58314   -- Initialize_4525 --
58315   ---------------------
58316
58317   procedure Initialize_4525 is
58318   begin
58319      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4525, (Is_Empty => True));
58320   end Initialize_4525;
58321
58322   ---------------------
58323   -- Initialize_4526 --
58324   ---------------------
58325
58326   procedure Initialize_4526 is
58327   begin
58328      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
58329       (Base + 4526,
58330        AMF.Internals.Tables.UML_String_Data_0A.MS_0AE9'Access);
58331      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4526, (Is_Empty => True));
58332   end Initialize_4526;
58333
58334   ---------------------
58335   -- Initialize_4527 --
58336   ---------------------
58337
58338   procedure Initialize_4527 is
58339   begin
58340      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58341       (Base + 4527,
58342        AMF.Internals.Tables.UML_String_Data_01.MS_0137'Access);
58343   end Initialize_4527;
58344
58345   ---------------------
58346   -- Initialize_4528 --
58347   ---------------------
58348
58349   procedure Initialize_4528 is
58350   begin
58351      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4528, (Is_Empty => True));
58352   end Initialize_4528;
58353
58354   ---------------------
58355   -- Initialize_4529 --
58356   ---------------------
58357
58358   procedure Initialize_4529 is
58359   begin
58360      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58361       (Base + 4529,
58362        AMF.Internals.Tables.UML_String_Data_07.MS_07EA'Access);
58363   end Initialize_4529;
58364
58365   ---------------------
58366   -- Initialize_4530 --
58367   ---------------------
58368
58369   procedure Initialize_4530 is
58370   begin
58371      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58372       (Base + 4530,
58373        AMF.Internals.Tables.UML_String_Data_0A.MS_0A33'Access);
58374   end Initialize_4530;
58375
58376   ---------------------
58377   -- Initialize_4531 --
58378   ---------------------
58379
58380   procedure Initialize_4531 is
58381   begin
58382      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58383       (Base + 4531,
58384        AMF.Internals.Tables.UML_String_Data_03.MS_0391'Access);
58385   end Initialize_4531;
58386
58387   ---------------------
58388   -- Initialize_4532 --
58389   ---------------------
58390
58391   procedure Initialize_4532 is
58392   begin
58393      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58394       (Base + 4532,
58395        AMF.Internals.Tables.UML_String_Data_04.MS_04D5'Access);
58396   end Initialize_4532;
58397
58398   ---------------------
58399   -- Initialize_4533 --
58400   ---------------------
58401
58402   procedure Initialize_4533 is
58403   begin
58404      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58405       (Base + 4533,
58406        AMF.Internals.Tables.UML_String_Data_0A.MS_0A9E'Access);
58407   end Initialize_4533;
58408
58409   ---------------------
58410   -- Initialize_4534 --
58411   ---------------------
58412
58413   procedure Initialize_4534 is
58414   begin
58415      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
58416       (Base + 4534,
58417        AMF.Internals.Tables.UML_String_Data_04.MS_0404'Access);
58418      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4534, (Is_Empty => True));
58419   end Initialize_4534;
58420
58421   ---------------------
58422   -- Initialize_4535 --
58423   ---------------------
58424
58425   procedure Initialize_4535 is
58426   begin
58427      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58428       (Base + 4535,
58429        AMF.Internals.Tables.UML_String_Data_07.MS_0795'Access);
58430   end Initialize_4535;
58431
58432   ---------------------
58433   -- Initialize_4536 --
58434   ---------------------
58435
58436   procedure Initialize_4536 is
58437   begin
58438      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4536, (Is_Empty => True));
58439   end Initialize_4536;
58440
58441   ---------------------
58442   -- Initialize_4537 --
58443   ---------------------
58444
58445   procedure Initialize_4537 is
58446   begin
58447      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
58448       (Base + 4537,
58449        AMF.Internals.Tables.UML_String_Data_08.MS_08D8'Access);
58450      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4537, (Is_Empty => True));
58451   end Initialize_4537;
58452
58453   ---------------------
58454   -- Initialize_4538 --
58455   ---------------------
58456
58457   procedure Initialize_4538 is
58458   begin
58459      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58460       (Base + 4538,
58461        AMF.Internals.Tables.UML_String_Data_01.MS_01DF'Access);
58462   end Initialize_4538;
58463
58464   ---------------------
58465   -- Initialize_4539 --
58466   ---------------------
58467
58468   procedure Initialize_4539 is
58469   begin
58470      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4539, (Is_Empty => True));
58471   end Initialize_4539;
58472
58473   ---------------------
58474   -- Initialize_4540 --
58475   ---------------------
58476
58477   procedure Initialize_4540 is
58478   begin
58479      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
58480       (Base + 4540,
58481        AMF.Internals.Tables.UML_String_Data_05.MS_0559'Access);
58482      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4540, (Is_Empty => True));
58483   end Initialize_4540;
58484
58485   ---------------------
58486   -- Initialize_4541 --
58487   ---------------------
58488
58489   procedure Initialize_4541 is
58490   begin
58491      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58492       (Base + 4541,
58493        AMF.Internals.Tables.UML_String_Data_01.MS_016C'Access);
58494   end Initialize_4541;
58495
58496   ---------------------
58497   -- Initialize_4542 --
58498   ---------------------
58499
58500   procedure Initialize_4542 is
58501   begin
58502      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4542, (Is_Empty => True));
58503   end Initialize_4542;
58504
58505   ---------------------
58506   -- Initialize_4543 --
58507   ---------------------
58508
58509   procedure Initialize_4543 is
58510   begin
58511      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
58512       (Base + 4543,
58513        AMF.Internals.Tables.UML_String_Data_00.MS_00B4'Access);
58514      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4543, (Is_Empty => True));
58515   end Initialize_4543;
58516
58517   ---------------------
58518   -- Initialize_4544 --
58519   ---------------------
58520
58521   procedure Initialize_4544 is
58522   begin
58523      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58524       (Base + 4544,
58525        AMF.Internals.Tables.UML_String_Data_00.MS_0095'Access);
58526   end Initialize_4544;
58527
58528   ---------------------
58529   -- Initialize_4545 --
58530   ---------------------
58531
58532   procedure Initialize_4545 is
58533   begin
58534      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4545, (Is_Empty => True));
58535   end Initialize_4545;
58536
58537   ---------------------
58538   -- Initialize_4546 --
58539   ---------------------
58540
58541   procedure Initialize_4546 is
58542   begin
58543      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58544       (Base + 4546,
58545        AMF.Internals.Tables.UML_String_Data_00.MS_00DE'Access);
58546   end Initialize_4546;
58547
58548   ---------------------
58549   -- Initialize_4547 --
58550   ---------------------
58551
58552   procedure Initialize_4547 is
58553   begin
58554      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58555       (Base + 4547,
58556        AMF.Internals.Tables.UML_String_Data_05.MS_053D'Access);
58557   end Initialize_4547;
58558
58559   ---------------------
58560   -- Initialize_4548 --
58561   ---------------------
58562
58563   procedure Initialize_4548 is
58564   begin
58565      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58566       (Base + 4548,
58567        AMF.Internals.Tables.UML_String_Data_05.MS_05EF'Access);
58568   end Initialize_4548;
58569
58570   ---------------------
58571   -- Initialize_4549 --
58572   ---------------------
58573
58574   procedure Initialize_4549 is
58575   begin
58576      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58577       (Base + 4549,
58578        AMF.Internals.Tables.UML_String_Data_09.MS_09FA'Access);
58579   end Initialize_4549;
58580
58581   ---------------------
58582   -- Initialize_4550 --
58583   ---------------------
58584
58585   procedure Initialize_4550 is
58586   begin
58587      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4550, True);
58588      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
58589       (Base + 4550,
58590        AMF.Internals.Tables.UML_String_Data_0C.MS_0C88'Access);
58591      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4550, (False, AMF.CMOF.Public_Visibility));
58592   end Initialize_4550;
58593
58594   ---------------------
58595   -- Initialize_4551 --
58596   ---------------------
58597
58598   procedure Initialize_4551 is
58599   begin
58600      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58601       (Base + 4551,
58602        AMF.Internals.Tables.UML_String_Data_0A.MS_0A88'Access);
58603   end Initialize_4551;
58604
58605   ---------------------
58606   -- Initialize_4552 --
58607   ---------------------
58608
58609   procedure Initialize_4552 is
58610   begin
58611      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
58612       (Base + 4552,
58613        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
58614      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4552, (Is_Empty => True));
58615   end Initialize_4552;
58616
58617   ---------------------
58618   -- Initialize_4553 --
58619   ---------------------
58620
58621   procedure Initialize_4553 is
58622   begin
58623      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4553, (Is_Empty => True));
58624   end Initialize_4553;
58625
58626   ---------------------
58627   -- Initialize_4554 --
58628   ---------------------
58629
58630   procedure Initialize_4554 is
58631   begin
58632      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4554, AMF.CMOF.Return_Parameter);
58633      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 4554, (False, 0));
58634      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
58635       (Base + 4554,
58636        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
58637      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 4554, (False, (Unlimited => True)));
58638      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4554, (False, AMF.CMOF.Public_Visibility));
58639   end Initialize_4554;
58640
58641   ---------------------
58642   -- Initialize_4555 --
58643   ---------------------
58644
58645   procedure Initialize_4555 is
58646   begin
58647      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58648       (Base + 4555,
58649        AMF.Internals.Tables.UML_String_Data_05.MS_0586'Access);
58650   end Initialize_4555;
58651
58652   ---------------------
58653   -- Initialize_4556 --
58654   ---------------------
58655
58656   procedure Initialize_4556 is
58657   begin
58658      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
58659       (Base + 4556,
58660        AMF.Internals.Tables.UML_String_Data_00.MS_0090'Access);
58661      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4556, (Is_Empty => True));
58662   end Initialize_4556;
58663
58664   ---------------------
58665   -- Initialize_4557 --
58666   ---------------------
58667
58668   procedure Initialize_4557 is
58669   begin
58670      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58671       (Base + 4557,
58672        AMF.Internals.Tables.UML_String_Data_00.MS_00A9'Access);
58673   end Initialize_4557;
58674
58675   ---------------------
58676   -- Initialize_4558 --
58677   ---------------------
58678
58679   procedure Initialize_4558 is
58680   begin
58681      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4558, (Is_Empty => True));
58682   end Initialize_4558;
58683
58684   ---------------------
58685   -- Initialize_4559 --
58686   ---------------------
58687
58688   procedure Initialize_4559 is
58689   begin
58690      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
58691       (Base + 4559,
58692        AMF.Internals.Tables.UML_String_Data_06.MS_0626'Access);
58693      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4559, (Is_Empty => True));
58694   end Initialize_4559;
58695
58696   ---------------------
58697   -- Initialize_4560 --
58698   ---------------------
58699
58700   procedure Initialize_4560 is
58701   begin
58702      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58703       (Base + 4560,
58704        AMF.Internals.Tables.UML_String_Data_01.MS_0174'Access);
58705   end Initialize_4560;
58706
58707   ---------------------
58708   -- Initialize_4561 --
58709   ---------------------
58710
58711   procedure Initialize_4561 is
58712   begin
58713      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4561, (Is_Empty => True));
58714   end Initialize_4561;
58715
58716   ---------------------
58717   -- Initialize_4562 --
58718   ---------------------
58719
58720   procedure Initialize_4562 is
58721   begin
58722      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58723       (Base + 4562,
58724        AMF.Internals.Tables.UML_String_Data_00.MS_00E7'Access);
58725   end Initialize_4562;
58726
58727   ---------------------
58728   -- Initialize_4563 --
58729   ---------------------
58730
58731   procedure Initialize_4563 is
58732   begin
58733      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58734       (Base + 4563,
58735        AMF.Internals.Tables.UML_String_Data_08.MS_08FB'Access);
58736   end Initialize_4563;
58737
58738   ---------------------
58739   -- Initialize_4564 --
58740   ---------------------
58741
58742   procedure Initialize_4564 is
58743   begin
58744      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58745       (Base + 4564,
58746        AMF.Internals.Tables.UML_String_Data_01.MS_01B8'Access);
58747   end Initialize_4564;
58748
58749   ---------------------
58750   -- Initialize_4565 --
58751   ---------------------
58752
58753   procedure Initialize_4565 is
58754   begin
58755      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4565, True);
58756      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
58757       (Base + 4565,
58758        AMF.Internals.Tables.UML_String_Data_03.MS_03AB'Access);
58759      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4565, (False, AMF.CMOF.Public_Visibility));
58760   end Initialize_4565;
58761
58762   ---------------------
58763   -- Initialize_4566 --
58764   ---------------------
58765
58766   procedure Initialize_4566 is
58767   begin
58768      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58769       (Base + 4566,
58770        AMF.Internals.Tables.UML_String_Data_02.MS_02A9'Access);
58771   end Initialize_4566;
58772
58773   ---------------------
58774   -- Initialize_4567 --
58775   ---------------------
58776
58777   procedure Initialize_4567 is
58778   begin
58779      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
58780       (Base + 4567,
58781        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
58782      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4567, (Is_Empty => True));
58783   end Initialize_4567;
58784
58785   ---------------------
58786   -- Initialize_4568 --
58787   ---------------------
58788
58789   procedure Initialize_4568 is
58790   begin
58791      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4568, (Is_Empty => True));
58792   end Initialize_4568;
58793
58794   ---------------------
58795   -- Initialize_4569 --
58796   ---------------------
58797
58798   procedure Initialize_4569 is
58799   begin
58800      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4569, AMF.CMOF.Return_Parameter);
58801      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 4569, (False, 0));
58802      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
58803       (Base + 4569,
58804        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
58805      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4569, (False, AMF.CMOF.Public_Visibility));
58806   end Initialize_4569;
58807
58808   ---------------------
58809   -- Initialize_4570 --
58810   ---------------------
58811
58812   procedure Initialize_4570 is
58813   begin
58814      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4570, True);
58815      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
58816       (Base + 4570,
58817        AMF.Internals.Tables.UML_String_Data_0B.MS_0B69'Access);
58818      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4570, (False, AMF.CMOF.Public_Visibility));
58819   end Initialize_4570;
58820
58821   ---------------------
58822   -- Initialize_4571 --
58823   ---------------------
58824
58825   procedure Initialize_4571 is
58826   begin
58827      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58828       (Base + 4571,
58829        AMF.Internals.Tables.UML_String_Data_06.MS_06FC'Access);
58830   end Initialize_4571;
58831
58832   ---------------------
58833   -- Initialize_4572 --
58834   ---------------------
58835
58836   procedure Initialize_4572 is
58837   begin
58838      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
58839       (Base + 4572,
58840        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
58841      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4572, (Is_Empty => True));
58842   end Initialize_4572;
58843
58844   ---------------------
58845   -- Initialize_4573 --
58846   ---------------------
58847
58848   procedure Initialize_4573 is
58849   begin
58850      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4573, (Is_Empty => True));
58851   end Initialize_4573;
58852
58853   ---------------------
58854   -- Initialize_4574 --
58855   ---------------------
58856
58857   procedure Initialize_4574 is
58858   begin
58859      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4574, AMF.CMOF.Return_Parameter);
58860      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 4574, (False, 0));
58861      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
58862       (Base + 4574,
58863        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
58864      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4574, (False, AMF.CMOF.Public_Visibility));
58865   end Initialize_4574;
58866
58867   ---------------------
58868   -- Initialize_4575 --
58869   ---------------------
58870
58871   procedure Initialize_4575 is
58872   begin
58873      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4575, True);
58874      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
58875       (Base + 4575,
58876        AMF.Internals.Tables.UML_String_Data_08.MS_0820'Access);
58877      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4575, (False, AMF.CMOF.Public_Visibility));
58878   end Initialize_4575;
58879
58880   ---------------------
58881   -- Initialize_4576 --
58882   ---------------------
58883
58884   procedure Initialize_4576 is
58885   begin
58886      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58887       (Base + 4576,
58888        AMF.Internals.Tables.UML_String_Data_07.MS_07CC'Access);
58889   end Initialize_4576;
58890
58891   ---------------------
58892   -- Initialize_4577 --
58893   ---------------------
58894
58895   procedure Initialize_4577 is
58896   begin
58897      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
58898       (Base + 4577,
58899        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
58900      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4577, (Is_Empty => True));
58901   end Initialize_4577;
58902
58903   ---------------------
58904   -- Initialize_4578 --
58905   ---------------------
58906
58907   procedure Initialize_4578 is
58908   begin
58909      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4578, (Is_Empty => True));
58910   end Initialize_4578;
58911
58912   ---------------------
58913   -- Initialize_4579 --
58914   ---------------------
58915
58916   procedure Initialize_4579 is
58917   begin
58918      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4579, AMF.CMOF.Return_Parameter);
58919      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
58920       (Base + 4579,
58921        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
58922      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4579, (False, AMF.CMOF.Public_Visibility));
58923   end Initialize_4579;
58924
58925   ---------------------
58926   -- Initialize_4580 --
58927   ---------------------
58928
58929   procedure Initialize_4580 is
58930   begin
58931      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4580, AMF.CMOF.In_Parameter);
58932      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
58933       (Base + 4580,
58934        AMF.Internals.Tables.UML_String_Data_01.MS_01C3'Access);
58935      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4580, (False, AMF.CMOF.Public_Visibility));
58936   end Initialize_4580;
58937
58938   ---------------------
58939   -- Initialize_4581 --
58940   ---------------------
58941
58942   procedure Initialize_4581 is
58943   begin
58944      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4581, True);
58945      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
58946       (Base + 4581,
58947        AMF.Internals.Tables.UML_String_Data_03.MS_03CD'Access);
58948      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4581, (False, AMF.CMOF.Public_Visibility));
58949   end Initialize_4581;
58950
58951   ---------------------
58952   -- Initialize_4582 --
58953   ---------------------
58954
58955   procedure Initialize_4582 is
58956   begin
58957      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
58958       (Base + 4582,
58959        AMF.Internals.Tables.UML_String_Data_0A.MS_0A68'Access);
58960   end Initialize_4582;
58961
58962   ---------------------
58963   -- Initialize_4583 --
58964   ---------------------
58965
58966   procedure Initialize_4583 is
58967   begin
58968      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
58969       (Base + 4583,
58970        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
58971      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4583, (Is_Empty => True));
58972   end Initialize_4583;
58973
58974   ---------------------
58975   -- Initialize_4584 --
58976   ---------------------
58977
58978   procedure Initialize_4584 is
58979   begin
58980      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4584, (Is_Empty => True));
58981   end Initialize_4584;
58982
58983   ---------------------
58984   -- Initialize_4585 --
58985   ---------------------
58986
58987   procedure Initialize_4585 is
58988   begin
58989      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4585, AMF.CMOF.Return_Parameter);
58990      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
58991       (Base + 4585,
58992        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
58993      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4585, (False, AMF.CMOF.Public_Visibility));
58994   end Initialize_4585;
58995
58996   ---------------------
58997   -- Initialize_4586 --
58998   ---------------------
58999
59000   procedure Initialize_4586 is
59001   begin
59002      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4586, True);
59003      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59004       (Base + 4586,
59005        AMF.Internals.Tables.UML_String_Data_04.MS_0423'Access);
59006      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4586, (False, AMF.CMOF.Public_Visibility));
59007   end Initialize_4586;
59008
59009   ---------------------
59010   -- Initialize_4587 --
59011   ---------------------
59012
59013   procedure Initialize_4587 is
59014   begin
59015      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59016       (Base + 4587,
59017        AMF.Internals.Tables.UML_String_Data_09.MS_09E5'Access);
59018   end Initialize_4587;
59019
59020   ---------------------
59021   -- Initialize_4588 --
59022   ---------------------
59023
59024   procedure Initialize_4588 is
59025   begin
59026      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59027       (Base + 4588,
59028        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
59029      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4588, (Is_Empty => True));
59030   end Initialize_4588;
59031
59032   ---------------------
59033   -- Initialize_4589 --
59034   ---------------------
59035
59036   procedure Initialize_4589 is
59037   begin
59038      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4589, (Is_Empty => True));
59039   end Initialize_4589;
59040
59041   ---------------------
59042   -- Initialize_4590 --
59043   ---------------------
59044
59045   procedure Initialize_4590 is
59046   begin
59047      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4590, AMF.CMOF.Return_Parameter);
59048      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59049       (Base + 4590,
59050        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
59051      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4590, (False, AMF.CMOF.Public_Visibility));
59052   end Initialize_4590;
59053
59054   ---------------------
59055   -- Initialize_4591 --
59056   ---------------------
59057
59058   procedure Initialize_4591 is
59059   begin
59060      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4591, True);
59061      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59062       (Base + 4591,
59063        AMF.Internals.Tables.UML_String_Data_00.MS_0036'Access);
59064      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4591, (False, AMF.CMOF.Public_Visibility));
59065   end Initialize_4591;
59066
59067   ---------------------
59068   -- Initialize_4592 --
59069   ---------------------
59070
59071   procedure Initialize_4592 is
59072   begin
59073      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59074       (Base + 4592,
59075        AMF.Internals.Tables.UML_String_Data_00.MS_0077'Access);
59076   end Initialize_4592;
59077
59078   ---------------------
59079   -- Initialize_4593 --
59080   ---------------------
59081
59082   procedure Initialize_4593 is
59083   begin
59084      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59085       (Base + 4593,
59086        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
59087      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4593, (Is_Empty => True));
59088   end Initialize_4593;
59089
59090   ---------------------
59091   -- Initialize_4594 --
59092   ---------------------
59093
59094   procedure Initialize_4594 is
59095   begin
59096      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4594, (Is_Empty => True));
59097   end Initialize_4594;
59098
59099   ---------------------
59100   -- Initialize_4595 --
59101   ---------------------
59102
59103   procedure Initialize_4595 is
59104   begin
59105      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4595, AMF.CMOF.Return_Parameter);
59106      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 4595, (False, 0));
59107      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59108       (Base + 4595,
59109        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
59110      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4595, (False, AMF.CMOF.Public_Visibility));
59111   end Initialize_4595;
59112
59113   ---------------------
59114   -- Initialize_4596 --
59115   ---------------------
59116
59117   procedure Initialize_4596 is
59118   begin
59119      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4596, True);
59120      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59121       (Base + 4596,
59122        AMF.Internals.Tables.UML_String_Data_0B.MS_0BB7'Access);
59123      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4596, (False, AMF.CMOF.Public_Visibility));
59124   end Initialize_4596;
59125
59126   ---------------------
59127   -- Initialize_4597 --
59128   ---------------------
59129
59130   procedure Initialize_4597 is
59131   begin
59132      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59133       (Base + 4597,
59134        AMF.Internals.Tables.UML_String_Data_07.MS_078E'Access);
59135   end Initialize_4597;
59136
59137   ---------------------
59138   -- Initialize_4598 --
59139   ---------------------
59140
59141   procedure Initialize_4598 is
59142   begin
59143      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59144       (Base + 4598,
59145        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
59146      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4598, (Is_Empty => True));
59147   end Initialize_4598;
59148
59149   ---------------------
59150   -- Initialize_4599 --
59151   ---------------------
59152
59153   procedure Initialize_4599 is
59154   begin
59155      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4599, (Is_Empty => True));
59156   end Initialize_4599;
59157
59158   ---------------------
59159   -- Initialize_4600 --
59160   ---------------------
59161
59162   procedure Initialize_4600 is
59163   begin
59164      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4600, AMF.CMOF.Return_Parameter);
59165      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 4600, (False, 0));
59166      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59167       (Base + 4600,
59168        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
59169      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4600, (False, AMF.CMOF.Public_Visibility));
59170   end Initialize_4600;
59171
59172   ---------------------
59173   -- Initialize_4601 --
59174   ---------------------
59175
59176   procedure Initialize_4601 is
59177   begin
59178      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4601, True);
59179      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59180       (Base + 4601,
59181        AMF.Internals.Tables.UML_String_Data_00.MS_00B5'Access);
59182      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4601, (False, AMF.CMOF.Public_Visibility));
59183   end Initialize_4601;
59184
59185   ---------------------
59186   -- Initialize_4602 --
59187   ---------------------
59188
59189   procedure Initialize_4602 is
59190   begin
59191      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59192       (Base + 4602,
59193        AMF.Internals.Tables.UML_String_Data_0C.MS_0C00'Access);
59194   end Initialize_4602;
59195
59196   ---------------------
59197   -- Initialize_4603 --
59198   ---------------------
59199
59200   procedure Initialize_4603 is
59201   begin
59202      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59203       (Base + 4603,
59204        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
59205      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4603, (Is_Empty => True));
59206   end Initialize_4603;
59207
59208   ---------------------
59209   -- Initialize_4604 --
59210   ---------------------
59211
59212   procedure Initialize_4604 is
59213   begin
59214      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4604, (Is_Empty => True));
59215   end Initialize_4604;
59216
59217   ---------------------
59218   -- Initialize_4605 --
59219   ---------------------
59220
59221   procedure Initialize_4605 is
59222   begin
59223      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4605, AMF.CMOF.Return_Parameter);
59224      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 4605, (False, 0));
59225      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59226       (Base + 4605,
59227        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
59228      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4605, (False, AMF.CMOF.Public_Visibility));
59229   end Initialize_4605;
59230
59231   ---------------------
59232   -- Initialize_4606 --
59233   ---------------------
59234
59235   procedure Initialize_4606 is
59236   begin
59237      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59238       (Base + 4606,
59239        AMF.Internals.Tables.UML_String_Data_00.MS_00C2'Access);
59240   end Initialize_4606;
59241
59242   ---------------------
59243   -- Initialize_4607 --
59244   ---------------------
59245
59246   procedure Initialize_4607 is
59247   begin
59248      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59249       (Base + 4607,
59250        AMF.Internals.Tables.UML_String_Data_04.MS_0441'Access);
59251      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4607, (Is_Empty => True));
59252   end Initialize_4607;
59253
59254   ---------------------
59255   -- Initialize_4608 --
59256   ---------------------
59257
59258   procedure Initialize_4608 is
59259   begin
59260      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59261       (Base + 4608,
59262        AMF.Internals.Tables.UML_String_Data_06.MS_0679'Access);
59263   end Initialize_4608;
59264
59265   ---------------------
59266   -- Initialize_4609 --
59267   ---------------------
59268
59269   procedure Initialize_4609 is
59270   begin
59271      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4609, (Is_Empty => True));
59272   end Initialize_4609;
59273
59274   ---------------------
59275   -- Initialize_4610 --
59276   ---------------------
59277
59278   procedure Initialize_4610 is
59279   begin
59280      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59281       (Base + 4610,
59282        AMF.Internals.Tables.UML_String_Data_06.MS_0626'Access);
59283      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4610, (Is_Empty => True));
59284   end Initialize_4610;
59285
59286   ---------------------
59287   -- Initialize_4611 --
59288   ---------------------
59289
59290   procedure Initialize_4611 is
59291   begin
59292      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59293       (Base + 4611,
59294        AMF.Internals.Tables.UML_String_Data_06.MS_0612'Access);
59295   end Initialize_4611;
59296
59297   ---------------------
59298   -- Initialize_4612 --
59299   ---------------------
59300
59301   procedure Initialize_4612 is
59302   begin
59303      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4612, (Is_Empty => True));
59304   end Initialize_4612;
59305
59306   ---------------------
59307   -- Initialize_4613 --
59308   ---------------------
59309
59310   procedure Initialize_4613 is
59311   begin
59312      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59313       (Base + 4613,
59314        AMF.Internals.Tables.UML_String_Data_01.MS_01A2'Access);
59315   end Initialize_4613;
59316
59317   ---------------------
59318   -- Initialize_4614 --
59319   ---------------------
59320
59321   procedure Initialize_4614 is
59322   begin
59323      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59324       (Base + 4614,
59325        AMF.Internals.Tables.UML_String_Data_0B.MS_0BB1'Access);
59326   end Initialize_4614;
59327
59328   ---------------------
59329   -- Initialize_4615 --
59330   ---------------------
59331
59332   procedure Initialize_4615 is
59333   begin
59334      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59335       (Base + 4615,
59336        AMF.Internals.Tables.UML_String_Data_06.MS_06C6'Access);
59337   end Initialize_4615;
59338
59339   ---------------------
59340   -- Initialize_4616 --
59341   ---------------------
59342
59343   procedure Initialize_4616 is
59344   begin
59345      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59346       (Base + 4616,
59347        AMF.Internals.Tables.UML_String_Data_01.MS_0165'Access);
59348   end Initialize_4616;
59349
59350   ---------------------
59351   -- Initialize_4617 --
59352   ---------------------
59353
59354   procedure Initialize_4617 is
59355   begin
59356      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59357       (Base + 4617,
59358        AMF.Internals.Tables.UML_String_Data_01.MS_0153'Access);
59359      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4617, (Is_Empty => True));
59360   end Initialize_4617;
59361
59362   ---------------------
59363   -- Initialize_4618 --
59364   ---------------------
59365
59366   procedure Initialize_4618 is
59367   begin
59368      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59369       (Base + 4618,
59370        AMF.Internals.Tables.UML_String_Data_02.MS_02EE'Access);
59371   end Initialize_4618;
59372
59373   ---------------------
59374   -- Initialize_4619 --
59375   ---------------------
59376
59377   procedure Initialize_4619 is
59378   begin
59379      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4619, (Is_Empty => True));
59380   end Initialize_4619;
59381
59382   ---------------------
59383   -- Initialize_4620 --
59384   ---------------------
59385
59386   procedure Initialize_4620 is
59387   begin
59388      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59389       (Base + 4620,
59390        AMF.Internals.Tables.UML_String_Data_01.MS_0113'Access);
59391   end Initialize_4620;
59392
59393   ---------------------
59394   -- Initialize_4621 --
59395   ---------------------
59396
59397   procedure Initialize_4621 is
59398   begin
59399      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59400       (Base + 4621,
59401        AMF.Internals.Tables.UML_String_Data_02.MS_02C6'Access);
59402   end Initialize_4621;
59403
59404   ---------------------
59405   -- Initialize_4622 --
59406   ---------------------
59407
59408   procedure Initialize_4622 is
59409   begin
59410      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4622, True);
59411      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59412       (Base + 4622,
59413        AMF.Internals.Tables.UML_String_Data_03.MS_03FD'Access);
59414      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4622, (False, AMF.CMOF.Public_Visibility));
59415   end Initialize_4622;
59416
59417   ---------------------
59418   -- Initialize_4623 --
59419   ---------------------
59420
59421   procedure Initialize_4623 is
59422   begin
59423      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59424       (Base + 4623,
59425        AMF.Internals.Tables.UML_String_Data_07.MS_07F9'Access);
59426   end Initialize_4623;
59427
59428   ---------------------
59429   -- Initialize_4624 --
59430   ---------------------
59431
59432   procedure Initialize_4624 is
59433   begin
59434      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59435       (Base + 4624,
59436        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
59437      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4624, (Is_Empty => True));
59438   end Initialize_4624;
59439
59440   ---------------------
59441   -- Initialize_4625 --
59442   ---------------------
59443
59444   procedure Initialize_4625 is
59445   begin
59446      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4625, (Is_Empty => True));
59447   end Initialize_4625;
59448
59449   ---------------------
59450   -- Initialize_4626 --
59451   ---------------------
59452
59453   procedure Initialize_4626 is
59454   begin
59455      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4626, AMF.CMOF.Return_Parameter);
59456      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59457       (Base + 4626,
59458        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
59459      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4626, (False, AMF.CMOF.Public_Visibility));
59460   end Initialize_4626;
59461
59462   ---------------------
59463   -- Initialize_4627 --
59464   ---------------------
59465
59466   procedure Initialize_4627 is
59467   begin
59468      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4627, AMF.CMOF.In_Parameter);
59469      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59470       (Base + 4627,
59471        AMF.Internals.Tables.UML_String_Data_04.MS_049E'Access);
59472      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4627, (False, AMF.CMOF.Public_Visibility));
59473   end Initialize_4627;
59474
59475   ---------------------
59476   -- Initialize_4628 --
59477   ---------------------
59478
59479   procedure Initialize_4628 is
59480   begin
59481      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59482       (Base + 4628,
59483        AMF.Internals.Tables.UML_String_Data_07.MS_0755'Access);
59484   end Initialize_4628;
59485
59486   ---------------------
59487   -- Initialize_4629 --
59488   ---------------------
59489
59490   procedure Initialize_4629 is
59491   begin
59492      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59493       (Base + 4629,
59494        AMF.Internals.Tables.UML_String_Data_09.MS_0983'Access);
59495      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4629, (Is_Empty => True));
59496   end Initialize_4629;
59497
59498   ---------------------
59499   -- Initialize_4630 --
59500   ---------------------
59501
59502   procedure Initialize_4630 is
59503   begin
59504      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59505       (Base + 4630,
59506        AMF.Internals.Tables.UML_String_Data_0B.MS_0BAF'Access);
59507   end Initialize_4630;
59508
59509   ---------------------
59510   -- Initialize_4631 --
59511   ---------------------
59512
59513   procedure Initialize_4631 is
59514   begin
59515      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4631, (Is_Empty => True));
59516   end Initialize_4631;
59517
59518   ---------------------
59519   -- Initialize_4632 --
59520   ---------------------
59521
59522   procedure Initialize_4632 is
59523   begin
59524      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59525       (Base + 4632,
59526        AMF.Internals.Tables.UML_String_Data_0B.MS_0B8B'Access);
59527   end Initialize_4632;
59528
59529   ---------------------
59530   -- Initialize_4633 --
59531   ---------------------
59532
59533   procedure Initialize_4633 is
59534   begin
59535      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59536       (Base + 4633,
59537        AMF.Internals.Tables.UML_String_Data_0B.MS_0B1C'Access);
59538   end Initialize_4633;
59539
59540   ---------------------
59541   -- Initialize_4634 --
59542   ---------------------
59543
59544   procedure Initialize_4634 is
59545   begin
59546      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59547       (Base + 4634,
59548        AMF.Internals.Tables.UML_String_Data_04.MS_0432'Access);
59549   end Initialize_4634;
59550
59551   ---------------------
59552   -- Initialize_4635 --
59553   ---------------------
59554
59555   procedure Initialize_4635 is
59556   begin
59557      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59558       (Base + 4635,
59559        AMF.Internals.Tables.UML_String_Data_0A.MS_0A32'Access);
59560   end Initialize_4635;
59561
59562   ---------------------
59563   -- Initialize_4636 --
59564   ---------------------
59565
59566   procedure Initialize_4636 is
59567   begin
59568      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59569       (Base + 4636,
59570        AMF.Internals.Tables.UML_String_Data_08.MS_0800'Access);
59571   end Initialize_4636;
59572
59573   ---------------------
59574   -- Initialize_4637 --
59575   ---------------------
59576
59577   procedure Initialize_4637 is
59578   begin
59579      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4637, True);
59580      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59581       (Base + 4637,
59582        AMF.Internals.Tables.UML_String_Data_00.MS_00F2'Access);
59583      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4637, (False, AMF.CMOF.Public_Visibility));
59584   end Initialize_4637;
59585
59586   ---------------------
59587   -- Initialize_4638 --
59588   ---------------------
59589
59590   procedure Initialize_4638 is
59591   begin
59592      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59593       (Base + 4638,
59594        AMF.Internals.Tables.UML_String_Data_01.MS_01B6'Access);
59595   end Initialize_4638;
59596
59597   ---------------------
59598   -- Initialize_4639 --
59599   ---------------------
59600
59601   procedure Initialize_4639 is
59602   begin
59603      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59604       (Base + 4639,
59605        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
59606      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4639, (Is_Empty => True));
59607   end Initialize_4639;
59608
59609   ---------------------
59610   -- Initialize_4640 --
59611   ---------------------
59612
59613   procedure Initialize_4640 is
59614   begin
59615      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4640, (Is_Empty => True));
59616   end Initialize_4640;
59617
59618   ---------------------
59619   -- Initialize_4641 --
59620   ---------------------
59621
59622   procedure Initialize_4641 is
59623   begin
59624      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4641, AMF.CMOF.Return_Parameter);
59625      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59626       (Base + 4641,
59627        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
59628      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4641, (False, AMF.CMOF.Public_Visibility));
59629   end Initialize_4641;
59630
59631   ---------------------
59632   -- Initialize_4642 --
59633   ---------------------
59634
59635   procedure Initialize_4642 is
59636   begin
59637      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4642, True);
59638      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59639       (Base + 4642,
59640        AMF.Internals.Tables.UML_String_Data_04.MS_040B'Access);
59641      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4642, (False, AMF.CMOF.Public_Visibility));
59642   end Initialize_4642;
59643
59644   ---------------------
59645   -- Initialize_4643 --
59646   ---------------------
59647
59648   procedure Initialize_4643 is
59649   begin
59650      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59651       (Base + 4643,
59652        AMF.Internals.Tables.UML_String_Data_0A.MS_0AF8'Access);
59653   end Initialize_4643;
59654
59655   ---------------------
59656   -- Initialize_4644 --
59657   ---------------------
59658
59659   procedure Initialize_4644 is
59660   begin
59661      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59662       (Base + 4644,
59663        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
59664      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4644, (Is_Empty => True));
59665   end Initialize_4644;
59666
59667   ---------------------
59668   -- Initialize_4645 --
59669   ---------------------
59670
59671   procedure Initialize_4645 is
59672   begin
59673      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4645, (Is_Empty => True));
59674   end Initialize_4645;
59675
59676   ---------------------
59677   -- Initialize_4646 --
59678   ---------------------
59679
59680   procedure Initialize_4646 is
59681   begin
59682      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4646, AMF.CMOF.Return_Parameter);
59683      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 4646, (False, 0));
59684      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59685       (Base + 4646,
59686        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
59687      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 4646, (False, (Unlimited => True)));
59688      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4646, (False, AMF.CMOF.Public_Visibility));
59689   end Initialize_4646;
59690
59691   ---------------------
59692   -- Initialize_4647 --
59693   ---------------------
59694
59695   procedure Initialize_4647 is
59696   begin
59697      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Is_Query (Base + 4647, True);
59698      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59699       (Base + 4647,
59700        AMF.Internals.Tables.UML_String_Data_00.MS_003C'Access);
59701      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4647, (False, AMF.CMOF.Public_Visibility));
59702   end Initialize_4647;
59703
59704   ---------------------
59705   -- Initialize_4648 --
59706   ---------------------
59707
59708   procedure Initialize_4648 is
59709   begin
59710      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59711       (Base + 4648,
59712        AMF.Internals.Tables.UML_String_Data_07.MS_07CA'Access);
59713   end Initialize_4648;
59714
59715   ---------------------
59716   -- Initialize_4649 --
59717   ---------------------
59718
59719   procedure Initialize_4649 is
59720   begin
59721      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59722       (Base + 4649,
59723        AMF.Internals.Tables.UML_String_Data_02.MS_02F4'Access);
59724      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4649, (Is_Empty => True));
59725   end Initialize_4649;
59726
59727   ---------------------
59728   -- Initialize_4650 --
59729   ---------------------
59730
59731   procedure Initialize_4650 is
59732   begin
59733      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4650, (Is_Empty => True));
59734   end Initialize_4650;
59735
59736   ---------------------
59737   -- Initialize_4651 --
59738   ---------------------
59739
59740   procedure Initialize_4651 is
59741   begin
59742      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Direction (Base + 4651, AMF.CMOF.Return_Parameter);
59743      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Lower (Base + 4651, (False, 0));
59744      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59745       (Base + 4651,
59746        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD4'Access);
59747      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Upper (Base + 4651, (False, (Unlimited => True)));
59748      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4651, (False, AMF.CMOF.Public_Visibility));
59749   end Initialize_4651;
59750
59751   ---------------------
59752   -- Initialize_4652 --
59753   ---------------------
59754
59755   procedure Initialize_4652 is
59756   begin
59757      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59758       (Base + 4652,
59759        AMF.Internals.Tables.UML_String_Data_07.MS_07E1'Access);
59760   end Initialize_4652;
59761
59762   ---------------------
59763   -- Initialize_4653 --
59764   ---------------------
59765
59766   procedure Initialize_4653 is
59767   begin
59768      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59769       (Base + 4653,
59770        AMF.Internals.Tables.UML_String_Data_06.MS_0615'Access);
59771      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4653, (Is_Empty => True));
59772   end Initialize_4653;
59773
59774   ---------------------
59775   -- Initialize_4654 --
59776   ---------------------
59777
59778   procedure Initialize_4654 is
59779   begin
59780      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59781       (Base + 4654,
59782        AMF.Internals.Tables.UML_String_Data_0B.MS_0B4A'Access);
59783   end Initialize_4654;
59784
59785   ---------------------
59786   -- Initialize_4655 --
59787   ---------------------
59788
59789   procedure Initialize_4655 is
59790   begin
59791      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4655, (Is_Empty => True));
59792   end Initialize_4655;
59793
59794   ---------------------
59795   -- Initialize_4656 --
59796   ---------------------
59797
59798   procedure Initialize_4656 is
59799   begin
59800      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59801       (Base + 4656,
59802        AMF.Internals.Tables.UML_String_Data_00.MS_005D'Access);
59803   end Initialize_4656;
59804
59805   ---------------------
59806   -- Initialize_4657 --
59807   ---------------------
59808
59809   procedure Initialize_4657 is
59810   begin
59811      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59812       (Base + 4657,
59813        AMF.Internals.Tables.UML_String_Data_04.MS_04D9'Access);
59814      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4657, (Is_Empty => True));
59815   end Initialize_4657;
59816
59817   ---------------------
59818   -- Initialize_4658 --
59819   ---------------------
59820
59821   procedure Initialize_4658 is
59822   begin
59823      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59824       (Base + 4658,
59825        AMF.Internals.Tables.UML_String_Data_06.MS_06DF'Access);
59826   end Initialize_4658;
59827
59828   ---------------------
59829   -- Initialize_4659 --
59830   ---------------------
59831
59832   procedure Initialize_4659 is
59833   begin
59834      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4659, (Is_Empty => True));
59835   end Initialize_4659;
59836
59837   ---------------------
59838   -- Initialize_4660 --
59839   ---------------------
59840
59841   procedure Initialize_4660 is
59842   begin
59843      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59844       (Base + 4660,
59845        AMF.Internals.Tables.UML_String_Data_01.MS_01DA'Access);
59846      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4660, (Is_Empty => True));
59847   end Initialize_4660;
59848
59849   ---------------------
59850   -- Initialize_4661 --
59851   ---------------------
59852
59853   procedure Initialize_4661 is
59854   begin
59855      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59856       (Base + 4661,
59857        AMF.Internals.Tables.UML_String_Data_00.MS_0020'Access);
59858   end Initialize_4661;
59859
59860   ---------------------
59861   -- Initialize_4662 --
59862   ---------------------
59863
59864   procedure Initialize_4662 is
59865   begin
59866      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4662, (Is_Empty => True));
59867   end Initialize_4662;
59868
59869   ---------------------
59870   -- Initialize_4663 --
59871   ---------------------
59872
59873   procedure Initialize_4663 is
59874   begin
59875      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59876       (Base + 4663,
59877        AMF.Internals.Tables.UML_String_Data_04.MS_0441'Access);
59878      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4663, (Is_Empty => True));
59879   end Initialize_4663;
59880
59881   ---------------------
59882   -- Initialize_4664 --
59883   ---------------------
59884
59885   procedure Initialize_4664 is
59886   begin
59887      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59888       (Base + 4664,
59889        AMF.Internals.Tables.UML_String_Data_00.MS_009E'Access);
59890   end Initialize_4664;
59891
59892   ---------------------
59893   -- Initialize_4665 --
59894   ---------------------
59895
59896   procedure Initialize_4665 is
59897   begin
59898      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4665, (Is_Empty => True));
59899   end Initialize_4665;
59900
59901   ---------------------
59902   -- Initialize_4666 --
59903   ---------------------
59904
59905   procedure Initialize_4666 is
59906   begin
59907      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59908       (Base + 4666,
59909        AMF.Internals.Tables.UML_String_Data_0B.MS_0BD3'Access);
59910      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4666, (Is_Empty => True));
59911   end Initialize_4666;
59912
59913   ---------------------
59914   -- Initialize_4667 --
59915   ---------------------
59916
59917   procedure Initialize_4667 is
59918   begin
59919      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59920       (Base + 4667,
59921        AMF.Internals.Tables.UML_String_Data_0A.MS_0A56'Access);
59922   end Initialize_4667;
59923
59924   ---------------------
59925   -- Initialize_4668 --
59926   ---------------------
59927
59928   procedure Initialize_4668 is
59929   begin
59930      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4668, (Is_Empty => True));
59931   end Initialize_4668;
59932
59933   ---------------------
59934   -- Initialize_4669 --
59935   ---------------------
59936
59937   procedure Initialize_4669 is
59938   begin
59939      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59940       (Base + 4669,
59941        AMF.Internals.Tables.UML_String_Data_01.MS_01A2'Access);
59942   end Initialize_4669;
59943
59944   ---------------------
59945   -- Initialize_4670 --
59946   ---------------------
59947
59948   procedure Initialize_4670 is
59949   begin
59950      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59951       (Base + 4670,
59952        AMF.Internals.Tables.UML_String_Data_07.MS_07FF'Access);
59953   end Initialize_4670;
59954
59955   ---------------------
59956   -- Initialize_4671 --
59957   ---------------------
59958
59959   procedure Initialize_4671 is
59960   begin
59961      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59962       (Base + 4671,
59963        AMF.Internals.Tables.UML_String_Data_09.MS_09EE'Access);
59964   end Initialize_4671;
59965
59966   ---------------------
59967   -- Initialize_4672 --
59968   ---------------------
59969
59970   procedure Initialize_4672 is
59971   begin
59972      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
59973       (Base + 4672,
59974        AMF.Internals.Tables.UML_String_Data_0A.MS_0AE9'Access);
59975      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4672, (Is_Empty => True));
59976   end Initialize_4672;
59977
59978   ---------------------
59979   -- Initialize_4673 --
59980   ---------------------
59981
59982   procedure Initialize_4673 is
59983   begin
59984      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
59985       (Base + 4673,
59986        AMF.Internals.Tables.UML_String_Data_0C.MS_0C37'Access);
59987   end Initialize_4673;
59988
59989   ---------------------
59990   -- Initialize_4674 --
59991   ---------------------
59992
59993   procedure Initialize_4674 is
59994   begin
59995      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4674, (Is_Empty => True));
59996   end Initialize_4674;
59997
59998   ---------------------
59999   -- Initialize_4675 --
60000   ---------------------
60001
60002   procedure Initialize_4675 is
60003   begin
60004      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60005       (Base + 4675,
60006        AMF.Internals.Tables.UML_String_Data_04.MS_0441'Access);
60007      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4675, (Is_Empty => True));
60008   end Initialize_4675;
60009
60010   ---------------------
60011   -- Initialize_4676 --
60012   ---------------------
60013
60014   procedure Initialize_4676 is
60015   begin
60016      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60017       (Base + 4676,
60018        AMF.Internals.Tables.UML_String_Data_00.MS_009E'Access);
60019   end Initialize_4676;
60020
60021   ---------------------
60022   -- Initialize_4677 --
60023   ---------------------
60024
60025   procedure Initialize_4677 is
60026   begin
60027      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4677, (Is_Empty => True));
60028   end Initialize_4677;
60029
60030   ---------------------
60031   -- Initialize_4678 --
60032   ---------------------
60033
60034   procedure Initialize_4678 is
60035   begin
60036      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60037       (Base + 4678,
60038        AMF.Internals.Tables.UML_String_Data_04.MS_04C8'Access);
60039   end Initialize_4678;
60040
60041   ---------------------
60042   -- Initialize_4679 --
60043   ---------------------
60044
60045   procedure Initialize_4679 is
60046   begin
60047      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60048       (Base + 4679,
60049        AMF.Internals.Tables.UML_String_Data_05.MS_0537'Access);
60050      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4679, (Is_Empty => True));
60051   end Initialize_4679;
60052
60053   ---------------------
60054   -- Initialize_4680 --
60055   ---------------------
60056
60057   procedure Initialize_4680 is
60058   begin
60059      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60060       (Base + 4680,
60061        AMF.Internals.Tables.UML_String_Data_06.MS_06AB'Access);
60062   end Initialize_4680;
60063
60064   ---------------------
60065   -- Initialize_4681 --
60066   ---------------------
60067
60068   procedure Initialize_4681 is
60069   begin
60070      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60071       (Base + 4681,
60072        AMF.Internals.Tables.UML_String_Data_01.MS_015B'Access);
60073      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4681, (Is_Empty => True));
60074   end Initialize_4681;
60075
60076   ---------------------
60077   -- Initialize_4682 --
60078   ---------------------
60079
60080   procedure Initialize_4682 is
60081   begin
60082      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60083       (Base + 4682,
60084        AMF.Internals.Tables.UML_String_Data_08.MS_0875'Access);
60085   end Initialize_4682;
60086
60087   ---------------------
60088   -- Initialize_4683 --
60089   ---------------------
60090
60091   procedure Initialize_4683 is
60092   begin
60093      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60094       (Base + 4683,
60095        AMF.Internals.Tables.UML_String_Data_0B.MS_0B32'Access);
60096      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4683, (Is_Empty => True));
60097   end Initialize_4683;
60098
60099   ---------------------
60100   -- Initialize_4684 --
60101   ---------------------
60102
60103   procedure Initialize_4684 is
60104   begin
60105      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60106       (Base + 4684,
60107        AMF.Internals.Tables.UML_String_Data_01.MS_0106'Access);
60108   end Initialize_4684;
60109
60110   ---------------------
60111   -- Initialize_4685 --
60112   ---------------------
60113
60114   procedure Initialize_4685 is
60115   begin
60116      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60117       (Base + 4685,
60118        AMF.Internals.Tables.UML_String_Data_08.MS_085E'Access);
60119      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4685, (Is_Empty => True));
60120   end Initialize_4685;
60121
60122   ---------------------
60123   -- Initialize_4686 --
60124   ---------------------
60125
60126   procedure Initialize_4686 is
60127   begin
60128      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60129       (Base + 4686,
60130        AMF.Internals.Tables.UML_String_Data_09.MS_0946'Access);
60131   end Initialize_4686;
60132
60133   ---------------------
60134   -- Initialize_4687 --
60135   ---------------------
60136
60137   procedure Initialize_4687 is
60138   begin
60139      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60140       (Base + 4687,
60141        AMF.Internals.Tables.UML_String_Data_06.MS_06B7'Access);
60142      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4687, (Is_Empty => True));
60143   end Initialize_4687;
60144
60145   ---------------------
60146   -- Initialize_4688 --
60147   ---------------------
60148
60149   procedure Initialize_4688 is
60150   begin
60151      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60152       (Base + 4688,
60153        AMF.Internals.Tables.UML_String_Data_0C.MS_0C9C'Access);
60154   end Initialize_4688;
60155
60156   ---------------------
60157   -- Initialize_4689 --
60158   ---------------------
60159
60160   procedure Initialize_4689 is
60161   begin
60162      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60163       (Base + 4689,
60164        AMF.Internals.Tables.UML_String_Data_0C.MS_0C14'Access);
60165      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4689, (Is_Empty => True));
60166   end Initialize_4689;
60167
60168   ---------------------
60169   -- Initialize_4690 --
60170   ---------------------
60171
60172   procedure Initialize_4690 is
60173   begin
60174      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60175       (Base + 4690,
60176        AMF.Internals.Tables.UML_String_Data_0B.MS_0B1B'Access);
60177   end Initialize_4690;
60178
60179   ---------------------
60180   -- Initialize_4691 --
60181   ---------------------
60182
60183   procedure Initialize_4691 is
60184   begin
60185      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60186       (Base + 4691,
60187        AMF.Internals.Tables.UML_String_Data_05.MS_0594'Access);
60188      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4691, (Is_Empty => True));
60189   end Initialize_4691;
60190
60191   ---------------------
60192   -- Initialize_4692 --
60193   ---------------------
60194
60195   procedure Initialize_4692 is
60196   begin
60197      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60198       (Base + 4692,
60199        AMF.Internals.Tables.UML_String_Data_02.MS_027E'Access);
60200   end Initialize_4692;
60201
60202   ---------------------
60203   -- Initialize_4693 --
60204   ---------------------
60205
60206   procedure Initialize_4693 is
60207   begin
60208      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60209       (Base + 4693,
60210        AMF.Internals.Tables.UML_String_Data_02.MS_026D'Access);
60211      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4693, (Is_Empty => True));
60212   end Initialize_4693;
60213
60214   ---------------------
60215   -- Initialize_4694 --
60216   ---------------------
60217
60218   procedure Initialize_4694 is
60219   begin
60220      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60221       (Base + 4694,
60222        AMF.Internals.Tables.UML_String_Data_06.MS_0607'Access);
60223   end Initialize_4694;
60224
60225   ---------------------
60226   -- Initialize_4695 --
60227   ---------------------
60228
60229   procedure Initialize_4695 is
60230   begin
60231      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60232       (Base + 4695,
60233        AMF.Internals.Tables.UML_String_Data_07.MS_0723'Access);
60234      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4695, (Is_Empty => True));
60235   end Initialize_4695;
60236
60237   ---------------------
60238   -- Initialize_4696 --
60239   ---------------------
60240
60241   procedure Initialize_4696 is
60242   begin
60243      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60244       (Base + 4696,
60245        AMF.Internals.Tables.UML_String_Data_03.MS_03BF'Access);
60246   end Initialize_4696;
60247
60248   ---------------------
60249   -- Initialize_4697 --
60250   ---------------------
60251
60252   procedure Initialize_4697 is
60253   begin
60254      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60255       (Base + 4697,
60256        AMF.Internals.Tables.UML_String_Data_01.MS_0147'Access);
60257      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4697, (Is_Empty => True));
60258   end Initialize_4697;
60259
60260   ---------------------
60261   -- Initialize_4698 --
60262   ---------------------
60263
60264   procedure Initialize_4698 is
60265   begin
60266      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60267       (Base + 4698,
60268        AMF.Internals.Tables.UML_String_Data_01.MS_01FB'Access);
60269   end Initialize_4698;
60270
60271   ---------------------
60272   -- Initialize_4699 --
60273   ---------------------
60274
60275   procedure Initialize_4699 is
60276   begin
60277      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60278       (Base + 4699,
60279        AMF.Internals.Tables.UML_String_Data_05.MS_05E8'Access);
60280      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4699, (Is_Empty => True));
60281   end Initialize_4699;
60282
60283   ---------------------
60284   -- Initialize_4700 --
60285   ---------------------
60286
60287   procedure Initialize_4700 is
60288   begin
60289      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60290       (Base + 4700,
60291        AMF.Internals.Tables.UML_String_Data_0B.MS_0B9A'Access);
60292   end Initialize_4700;
60293
60294   ---------------------
60295   -- Initialize_4701 --
60296   ---------------------
60297
60298   procedure Initialize_4701 is
60299   begin
60300      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60301       (Base + 4701,
60302        AMF.Internals.Tables.UML_String_Data_03.MS_03B0'Access);
60303      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4701, (Is_Empty => True));
60304   end Initialize_4701;
60305
60306   ---------------------
60307   -- Initialize_4702 --
60308   ---------------------
60309
60310   procedure Initialize_4702 is
60311   begin
60312      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60313       (Base + 4702,
60314        AMF.Internals.Tables.UML_String_Data_0A.MS_0A2F'Access);
60315   end Initialize_4702;
60316
60317   ---------------------
60318   -- Initialize_4703 --
60319   ---------------------
60320
60321   procedure Initialize_4703 is
60322   begin
60323      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60324       (Base + 4703,
60325        AMF.Internals.Tables.UML_String_Data_06.MS_06E6'Access);
60326      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4703, (Is_Empty => True));
60327   end Initialize_4703;
60328
60329   ---------------------
60330   -- Initialize_4704 --
60331   ---------------------
60332
60333   procedure Initialize_4704 is
60334   begin
60335      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60336       (Base + 4704,
60337        AMF.Internals.Tables.UML_String_Data_03.MS_034C'Access);
60338   end Initialize_4704;
60339
60340   ---------------------
60341   -- Initialize_4705 --
60342   ---------------------
60343
60344   procedure Initialize_4705 is
60345   begin
60346      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60347       (Base + 4705,
60348        AMF.Internals.Tables.UML_String_Data_04.MS_047F'Access);
60349      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4705, (Is_Empty => True));
60350   end Initialize_4705;
60351
60352   ---------------------
60353   -- Initialize_4706 --
60354   ---------------------
60355
60356   procedure Initialize_4706 is
60357   begin
60358      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60359       (Base + 4706,
60360        AMF.Internals.Tables.UML_String_Data_01.MS_014C'Access);
60361   end Initialize_4706;
60362
60363   ---------------------
60364   -- Initialize_4707 --
60365   ---------------------
60366
60367   procedure Initialize_4707 is
60368   begin
60369      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60370       (Base + 4707,
60371        AMF.Internals.Tables.UML_String_Data_04.MS_0405'Access);
60372      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4707, (Is_Empty => True));
60373   end Initialize_4707;
60374
60375   ---------------------
60376   -- Initialize_4708 --
60377   ---------------------
60378
60379   procedure Initialize_4708 is
60380   begin
60381      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60382       (Base + 4708,
60383        AMF.Internals.Tables.UML_String_Data_0A.MS_0A9C'Access);
60384   end Initialize_4708;
60385
60386   ---------------------
60387   -- Initialize_4709 --
60388   ---------------------
60389
60390   procedure Initialize_4709 is
60391   begin
60392      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60393       (Base + 4709,
60394        AMF.Internals.Tables.UML_String_Data_09.MS_09E6'Access);
60395      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4709, (Is_Empty => True));
60396   end Initialize_4709;
60397
60398   ---------------------
60399   -- Initialize_4710 --
60400   ---------------------
60401
60402   procedure Initialize_4710 is
60403   begin
60404      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60405       (Base + 4710,
60406        AMF.Internals.Tables.UML_String_Data_03.MS_0352'Access);
60407   end Initialize_4710;
60408
60409   ---------------------
60410   -- Initialize_4711 --
60411   ---------------------
60412
60413   procedure Initialize_4711 is
60414   begin
60415      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60416       (Base + 4711,
60417        AMF.Internals.Tables.UML_String_Data_07.MS_07F5'Access);
60418      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4711, (Is_Empty => True));
60419   end Initialize_4711;
60420
60421   ---------------------
60422   -- Initialize_4712 --
60423   ---------------------
60424
60425   procedure Initialize_4712 is
60426   begin
60427      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60428       (Base + 4712,
60429        AMF.Internals.Tables.UML_String_Data_06.MS_06D9'Access);
60430   end Initialize_4712;
60431
60432   ---------------------
60433   -- Initialize_4713 --
60434   ---------------------
60435
60436   procedure Initialize_4713 is
60437   begin
60438      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60439       (Base + 4713,
60440        AMF.Internals.Tables.UML_String_Data_09.MS_0953'Access);
60441      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4713, (Is_Empty => True));
60442   end Initialize_4713;
60443
60444   ---------------------
60445   -- Initialize_4714 --
60446   ---------------------
60447
60448   procedure Initialize_4714 is
60449   begin
60450      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60451       (Base + 4714,
60452        AMF.Internals.Tables.UML_String_Data_0C.MS_0C78'Access);
60453   end Initialize_4714;
60454
60455   ---------------------
60456   -- Initialize_4715 --
60457   ---------------------
60458
60459   procedure Initialize_4715 is
60460   begin
60461      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60462       (Base + 4715,
60463        AMF.Internals.Tables.UML_String_Data_0A.MS_0AD1'Access);
60464      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4715, (Is_Empty => True));
60465   end Initialize_4715;
60466
60467   ---------------------
60468   -- Initialize_4716 --
60469   ---------------------
60470
60471   procedure Initialize_4716 is
60472   begin
60473      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60474       (Base + 4716,
60475        AMF.Internals.Tables.UML_String_Data_01.MS_0105'Access);
60476   end Initialize_4716;
60477
60478   ---------------------
60479   -- Initialize_4717 --
60480   ---------------------
60481
60482   procedure Initialize_4717 is
60483   begin
60484      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60485       (Base + 4717,
60486        AMF.Internals.Tables.UML_String_Data_08.MS_0832'Access);
60487      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4717, (Is_Empty => True));
60488   end Initialize_4717;
60489
60490   ---------------------
60491   -- Initialize_4718 --
60492   ---------------------
60493
60494   procedure Initialize_4718 is
60495   begin
60496      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60497       (Base + 4718,
60498        AMF.Internals.Tables.UML_String_Data_04.MS_0498'Access);
60499   end Initialize_4718;
60500
60501   ---------------------
60502   -- Initialize_4719 --
60503   ---------------------
60504
60505   procedure Initialize_4719 is
60506   begin
60507      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60508       (Base + 4719,
60509        AMF.Internals.Tables.UML_String_Data_03.MS_0382'Access);
60510      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4719, (Is_Empty => True));
60511   end Initialize_4719;
60512
60513   ---------------------
60514   -- Initialize_4720 --
60515   ---------------------
60516
60517   procedure Initialize_4720 is
60518   begin
60519      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60520       (Base + 4720,
60521        AMF.Internals.Tables.UML_String_Data_08.MS_0894'Access);
60522   end Initialize_4720;
60523
60524   ---------------------
60525   -- Initialize_4721 --
60526   ---------------------
60527
60528   procedure Initialize_4721 is
60529   begin
60530      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60531       (Base + 4721,
60532        AMF.Internals.Tables.UML_String_Data_01.MS_0104'Access);
60533      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4721, (Is_Empty => True));
60534   end Initialize_4721;
60535
60536   ---------------------
60537   -- Initialize_4722 --
60538   ---------------------
60539
60540   procedure Initialize_4722 is
60541   begin
60542      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60543       (Base + 4722,
60544        AMF.Internals.Tables.UML_String_Data_01.MS_01BA'Access);
60545   end Initialize_4722;
60546
60547   ---------------------
60548   -- Initialize_4723 --
60549   ---------------------
60550
60551   procedure Initialize_4723 is
60552   begin
60553      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60554       (Base + 4723,
60555        AMF.Internals.Tables.UML_String_Data_04.MS_040E'Access);
60556      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4723, (Is_Empty => True));
60557   end Initialize_4723;
60558
60559   ---------------------
60560   -- Initialize_4724 --
60561   ---------------------
60562
60563   procedure Initialize_4724 is
60564   begin
60565      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60566       (Base + 4724,
60567        AMF.Internals.Tables.UML_String_Data_0C.MS_0C89'Access);
60568   end Initialize_4724;
60569
60570   ---------------------
60571   -- Initialize_4725 --
60572   ---------------------
60573
60574   procedure Initialize_4725 is
60575   begin
60576      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60577       (Base + 4725,
60578        AMF.Internals.Tables.UML_String_Data_08.MS_0843'Access);
60579      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4725, (Is_Empty => True));
60580   end Initialize_4725;
60581
60582   ---------------------
60583   -- Initialize_4726 --
60584   ---------------------
60585
60586   procedure Initialize_4726 is
60587   begin
60588      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60589       (Base + 4726,
60590        AMF.Internals.Tables.UML_String_Data_0A.MS_0AB5'Access);
60591   end Initialize_4726;
60592
60593   ---------------------
60594   -- Initialize_4727 --
60595   ---------------------
60596
60597   procedure Initialize_4727 is
60598   begin
60599      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60600       (Base + 4727,
60601        AMF.Internals.Tables.UML_String_Data_07.MS_0773'Access);
60602      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4727, (Is_Empty => True));
60603   end Initialize_4727;
60604
60605   ---------------------
60606   -- Initialize_4728 --
60607   ---------------------
60608
60609   procedure Initialize_4728 is
60610   begin
60611      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60612       (Base + 4728,
60613        AMF.Internals.Tables.UML_String_Data_0A.MS_0A26'Access);
60614   end Initialize_4728;
60615
60616   ---------------------
60617   -- Initialize_4729 --
60618   ---------------------
60619
60620   procedure Initialize_4729 is
60621   begin
60622      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60623       (Base + 4729,
60624        AMF.Internals.Tables.UML_String_Data_00.MS_007F'Access);
60625      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4729, (Is_Empty => True));
60626   end Initialize_4729;
60627
60628   ---------------------
60629   -- Initialize_4730 --
60630   ---------------------
60631
60632   procedure Initialize_4730 is
60633   begin
60634      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60635       (Base + 4730,
60636        AMF.Internals.Tables.UML_String_Data_02.MS_0224'Access);
60637   end Initialize_4730;
60638
60639   ---------------------
60640   -- Initialize_4731 --
60641   ---------------------
60642
60643   procedure Initialize_4731 is
60644   begin
60645      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60646       (Base + 4731,
60647        AMF.Internals.Tables.UML_String_Data_08.MS_0812'Access);
60648      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4731, (Is_Empty => True));
60649   end Initialize_4731;
60650
60651   ---------------------
60652   -- Initialize_4732 --
60653   ---------------------
60654
60655   procedure Initialize_4732 is
60656   begin
60657      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60658       (Base + 4732,
60659        AMF.Internals.Tables.UML_String_Data_06.MS_06F8'Access);
60660   end Initialize_4732;
60661
60662   ---------------------
60663   -- Initialize_4733 --
60664   ---------------------
60665
60666   procedure Initialize_4733 is
60667   begin
60668      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60669       (Base + 4733,
60670        AMF.Internals.Tables.UML_String_Data_00.MS_00C4'Access);
60671      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4733, (Is_Empty => True));
60672   end Initialize_4733;
60673
60674   ---------------------
60675   -- Initialize_4734 --
60676   ---------------------
60677
60678   procedure Initialize_4734 is
60679   begin
60680      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60681       (Base + 4734,
60682        AMF.Internals.Tables.UML_String_Data_06.MS_06BF'Access);
60683   end Initialize_4734;
60684
60685   ---------------------
60686   -- Initialize_4735 --
60687   ---------------------
60688
60689   procedure Initialize_4735 is
60690   begin
60691      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60692       (Base + 4735,
60693        AMF.Internals.Tables.UML_String_Data_09.MS_09D6'Access);
60694      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4735, (Is_Empty => True));
60695   end Initialize_4735;
60696
60697   ---------------------
60698   -- Initialize_4736 --
60699   ---------------------
60700
60701   procedure Initialize_4736 is
60702   begin
60703      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60704       (Base + 4736,
60705        AMF.Internals.Tables.UML_String_Data_02.MS_0245'Access);
60706   end Initialize_4736;
60707
60708   ---------------------
60709   -- Initialize_4737 --
60710   ---------------------
60711
60712   procedure Initialize_4737 is
60713   begin
60714      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60715       (Base + 4737,
60716        AMF.Internals.Tables.UML_String_Data_05.MS_05A1'Access);
60717      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4737, (Is_Empty => True));
60718   end Initialize_4737;
60719
60720   ---------------------
60721   -- Initialize_4738 --
60722   ---------------------
60723
60724   procedure Initialize_4738 is
60725   begin
60726      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60727       (Base + 4738,
60728        AMF.Internals.Tables.UML_String_Data_08.MS_0889'Access);
60729   end Initialize_4738;
60730
60731   ---------------------
60732   -- Initialize_4739 --
60733   ---------------------
60734
60735   procedure Initialize_4739 is
60736   begin
60737      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60738       (Base + 4739,
60739        AMF.Internals.Tables.UML_String_Data_01.MS_01D0'Access);
60740      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4739, (Is_Empty => True));
60741   end Initialize_4739;
60742
60743   ---------------------
60744   -- Initialize_4740 --
60745   ---------------------
60746
60747   procedure Initialize_4740 is
60748   begin
60749      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60750       (Base + 4740,
60751        AMF.Internals.Tables.UML_String_Data_0C.MS_0C98'Access);
60752   end Initialize_4740;
60753
60754   ---------------------
60755   -- Initialize_4741 --
60756   ---------------------
60757
60758   procedure Initialize_4741 is
60759   begin
60760      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60761       (Base + 4741,
60762        AMF.Internals.Tables.UML_String_Data_01.MS_01BE'Access);
60763      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4741, (Is_Empty => True));
60764   end Initialize_4741;
60765
60766   ---------------------
60767   -- Initialize_4742 --
60768   ---------------------
60769
60770   procedure Initialize_4742 is
60771   begin
60772      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60773       (Base + 4742,
60774        AMF.Internals.Tables.UML_String_Data_0A.MS_0AF3'Access);
60775   end Initialize_4742;
60776
60777   ---------------------
60778   -- Initialize_4743 --
60779   ---------------------
60780
60781   procedure Initialize_4743 is
60782   begin
60783      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60784       (Base + 4743,
60785        AMF.Internals.Tables.UML_String_Data_0A.MS_0A8D'Access);
60786      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4743, (Is_Empty => True));
60787   end Initialize_4743;
60788
60789   ---------------------
60790   -- Initialize_4744 --
60791   ---------------------
60792
60793   procedure Initialize_4744 is
60794   begin
60795      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60796       (Base + 4744,
60797        AMF.Internals.Tables.UML_String_Data_07.MS_07B0'Access);
60798   end Initialize_4744;
60799
60800   ---------------------
60801   -- Initialize_4745 --
60802   ---------------------
60803
60804   procedure Initialize_4745 is
60805   begin
60806      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60807       (Base + 4745,
60808        AMF.Internals.Tables.UML_String_Data_01.MS_0178'Access);
60809      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4745, (Is_Empty => True));
60810   end Initialize_4745;
60811
60812   ---------------------
60813   -- Initialize_4746 --
60814   ---------------------
60815
60816   procedure Initialize_4746 is
60817   begin
60818      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60819       (Base + 4746,
60820        AMF.Internals.Tables.UML_String_Data_02.MS_0249'Access);
60821   end Initialize_4746;
60822
60823   ---------------------
60824   -- Initialize_4747 --
60825   ---------------------
60826
60827   procedure Initialize_4747 is
60828   begin
60829      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60830       (Base + 4747,
60831        AMF.Internals.Tables.UML_String_Data_09.MS_09BF'Access);
60832      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4747, (Is_Empty => True));
60833   end Initialize_4747;
60834
60835   ---------------------
60836   -- Initialize_4748 --
60837   ---------------------
60838
60839   procedure Initialize_4748 is
60840   begin
60841      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60842       (Base + 4748,
60843        AMF.Internals.Tables.UML_String_Data_01.MS_0185'Access);
60844   end Initialize_4748;
60845
60846   ---------------------
60847   -- Initialize_4749 --
60848   ---------------------
60849
60850   procedure Initialize_4749 is
60851   begin
60852      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60853       (Base + 4749,
60854        AMF.Internals.Tables.UML_String_Data_04.MS_0438'Access);
60855      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4749, (Is_Empty => True));
60856   end Initialize_4749;
60857
60858   ---------------------
60859   -- Initialize_4750 --
60860   ---------------------
60861
60862   procedure Initialize_4750 is
60863   begin
60864      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60865       (Base + 4750,
60866        AMF.Internals.Tables.UML_String_Data_07.MS_0777'Access);
60867   end Initialize_4750;
60868
60869   ---------------------
60870   -- Initialize_4751 --
60871   ---------------------
60872
60873   procedure Initialize_4751 is
60874   begin
60875      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60876       (Base + 4751,
60877        AMF.Internals.Tables.UML_String_Data_08.MS_0803'Access);
60878      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4751, (Is_Empty => True));
60879   end Initialize_4751;
60880
60881   ---------------------
60882   -- Initialize_4752 --
60883   ---------------------
60884
60885   procedure Initialize_4752 is
60886   begin
60887      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60888       (Base + 4752,
60889        AMF.Internals.Tables.UML_String_Data_01.MS_01B4'Access);
60890   end Initialize_4752;
60891
60892   ---------------------
60893   -- Initialize_4753 --
60894   ---------------------
60895
60896   procedure Initialize_4753 is
60897   begin
60898      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60899       (Base + 4753,
60900        AMF.Internals.Tables.UML_String_Data_00.MS_00B0'Access);
60901      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4753, (Is_Empty => True));
60902   end Initialize_4753;
60903
60904   ---------------------
60905   -- Initialize_4754 --
60906   ---------------------
60907
60908   procedure Initialize_4754 is
60909   begin
60910      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60911       (Base + 4754,
60912        AMF.Internals.Tables.UML_String_Data_07.MS_0786'Access);
60913   end Initialize_4754;
60914
60915   ---------------------
60916   -- Initialize_4755 --
60917   ---------------------
60918
60919   procedure Initialize_4755 is
60920   begin
60921      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60922       (Base + 4755,
60923        AMF.Internals.Tables.UML_String_Data_00.MS_00E5'Access);
60924      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4755, (Is_Empty => True));
60925   end Initialize_4755;
60926
60927   ---------------------
60928   -- Initialize_4756 --
60929   ---------------------
60930
60931   procedure Initialize_4756 is
60932   begin
60933      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60934       (Base + 4756,
60935        AMF.Internals.Tables.UML_String_Data_07.MS_07BC'Access);
60936   end Initialize_4756;
60937
60938   ---------------------
60939   -- Initialize_4757 --
60940   ---------------------
60941
60942   procedure Initialize_4757 is
60943   begin
60944      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60945       (Base + 4757,
60946        AMF.Internals.Tables.UML_String_Data_04.MS_04F3'Access);
60947      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4757, (Is_Empty => True));
60948   end Initialize_4757;
60949
60950   ---------------------
60951   -- Initialize_4758 --
60952   ---------------------
60953
60954   procedure Initialize_4758 is
60955   begin
60956      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60957       (Base + 4758,
60958        AMF.Internals.Tables.UML_String_Data_01.MS_0177'Access);
60959   end Initialize_4758;
60960
60961   ---------------------
60962   -- Initialize_4759 --
60963   ---------------------
60964
60965   procedure Initialize_4759 is
60966   begin
60967      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60968       (Base + 4759,
60969        AMF.Internals.Tables.UML_String_Data_0A.MS_0ACA'Access);
60970      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4759, (Is_Empty => True));
60971   end Initialize_4759;
60972
60973   ---------------------
60974   -- Initialize_4760 --
60975   ---------------------
60976
60977   procedure Initialize_4760 is
60978   begin
60979      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
60980       (Base + 4760,
60981        AMF.Internals.Tables.UML_String_Data_00.MS_00D8'Access);
60982   end Initialize_4760;
60983
60984   ---------------------
60985   -- Initialize_4761 --
60986   ---------------------
60987
60988   procedure Initialize_4761 is
60989   begin
60990      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
60991       (Base + 4761,
60992        AMF.Internals.Tables.UML_String_Data_03.MS_03EC'Access);
60993      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4761, (Is_Empty => True));
60994   end Initialize_4761;
60995
60996   ---------------------
60997   -- Initialize_4762 --
60998   ---------------------
60999
61000   procedure Initialize_4762 is
61001   begin
61002      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
61003       (Base + 4762,
61004        AMF.Internals.Tables.UML_String_Data_02.MS_02FC'Access);
61005   end Initialize_4762;
61006
61007   ---------------------
61008   -- Initialize_4763 --
61009   ---------------------
61010
61011   procedure Initialize_4763 is
61012   begin
61013      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
61014       (Base + 4763,
61015        AMF.Internals.Tables.UML_String_Data_01.MS_0146'Access);
61016      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4763, (Is_Empty => True));
61017   end Initialize_4763;
61018
61019   ---------------------
61020   -- Initialize_4764 --
61021   ---------------------
61022
61023   procedure Initialize_4764 is
61024   begin
61025      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
61026       (Base + 4764,
61027        AMF.Internals.Tables.UML_String_Data_00.MS_00BA'Access);
61028   end Initialize_4764;
61029
61030   ---------------------
61031   -- Initialize_4765 --
61032   ---------------------
61033
61034   procedure Initialize_4765 is
61035   begin
61036      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
61037       (Base + 4765,
61038        AMF.Internals.Tables.UML_String_Data_0A.MS_0A8F'Access);
61039      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4765, (Is_Empty => True));
61040   end Initialize_4765;
61041
61042   ---------------------
61043   -- Initialize_4766 --
61044   ---------------------
61045
61046   procedure Initialize_4766 is
61047   begin
61048      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
61049       (Base + 4766,
61050        AMF.Internals.Tables.UML_String_Data_00.MS_00CD'Access);
61051   end Initialize_4766;
61052
61053   ---------------------
61054   -- Initialize_4767 --
61055   ---------------------
61056
61057   procedure Initialize_4767 is
61058   begin
61059      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
61060       (Base + 4767,
61061        AMF.Internals.Tables.UML_String_Data_0C.MS_0C7A'Access);
61062      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4767, (Is_Empty => True));
61063   end Initialize_4767;
61064
61065   ---------------------
61066   -- Initialize_4768 --
61067   ---------------------
61068
61069   procedure Initialize_4768 is
61070   begin
61071      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
61072       (Base + 4768,
61073        AMF.Internals.Tables.UML_String_Data_00.MS_000C'Access);
61074   end Initialize_4768;
61075
61076   ---------------------
61077   -- Initialize_4769 --
61078   ---------------------
61079
61080   procedure Initialize_4769 is
61081   begin
61082      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
61083       (Base + 4769,
61084        AMF.Internals.Tables.UML_String_Data_0A.MS_0A8E'Access);
61085      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4769, (Is_Empty => True));
61086   end Initialize_4769;
61087
61088   ---------------------
61089   -- Initialize_4770 --
61090   ---------------------
61091
61092   procedure Initialize_4770 is
61093   begin
61094      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
61095       (Base + 4770,
61096        AMF.Internals.Tables.UML_String_Data_0B.MS_0B36'Access);
61097   end Initialize_4770;
61098
61099   ---------------------
61100   -- Initialize_4771 --
61101   ---------------------
61102
61103   procedure Initialize_4771 is
61104   begin
61105      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
61106       (Base + 4771,
61107        AMF.Internals.Tables.UML_String_Data_06.MS_0688'Access);
61108      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4771, (Is_Empty => True));
61109   end Initialize_4771;
61110
61111   ---------------------
61112   -- Initialize_4772 --
61113   ---------------------
61114
61115   procedure Initialize_4772 is
61116   begin
61117      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
61118       (Base + 4772,
61119        AMF.Internals.Tables.UML_String_Data_0A.MS_0AA2'Access);
61120   end Initialize_4772;
61121
61122   ---------------------
61123   -- Initialize_4773 --
61124   ---------------------
61125
61126   procedure Initialize_4773 is
61127   begin
61128      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
61129       (Base + 4773,
61130        AMF.Internals.Tables.UML_String_Data_03.MS_0333'Access);
61131      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4773, (Is_Empty => True));
61132   end Initialize_4773;
61133
61134   ---------------------
61135   -- Initialize_4774 --
61136   ---------------------
61137
61138   procedure Initialize_4774 is
61139   begin
61140      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
61141       (Base + 4774,
61142        AMF.Internals.Tables.UML_String_Data_01.MS_01A0'Access);
61143   end Initialize_4774;
61144
61145   ---------------------
61146   -- Initialize_4775 --
61147   ---------------------
61148
61149   procedure Initialize_4775 is
61150   begin
61151      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
61152       (Base + 4775,
61153        AMF.Internals.Tables.UML_String_Data_0C.MS_0C5B'Access);
61154      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4775, (Is_Empty => True));
61155   end Initialize_4775;
61156
61157   ---------------------
61158   -- Initialize_4776 --
61159   ---------------------
61160
61161   procedure Initialize_4776 is
61162   begin
61163      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
61164       (Base + 4776,
61165        AMF.Internals.Tables.UML_String_Data_0B.MS_0B4E'Access);
61166   end Initialize_4776;
61167
61168   ---------------------
61169   -- Initialize_4777 --
61170   ---------------------
61171
61172   procedure Initialize_4777 is
61173   begin
61174      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
61175       (Base + 4777,
61176        AMF.Internals.Tables.UML_String_Data_05.MS_05DF'Access);
61177      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4777, (Is_Empty => True));
61178   end Initialize_4777;
61179
61180   ---------------------
61181   -- Initialize_4778 --
61182   ---------------------
61183
61184   procedure Initialize_4778 is
61185   begin
61186      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
61187       (Base + 4778,
61188        AMF.Internals.Tables.UML_String_Data_03.MS_030B'Access);
61189   end Initialize_4778;
61190
61191   ---------------------
61192   -- Initialize_4779 --
61193   ---------------------
61194
61195   procedure Initialize_4779 is
61196   begin
61197      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
61198       (Base + 4779,
61199        AMF.Internals.Tables.UML_String_Data_09.MS_09B9'Access);
61200      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4779, (Is_Empty => True));
61201   end Initialize_4779;
61202
61203   ---------------------
61204   -- Initialize_4780 --
61205   ---------------------
61206
61207   procedure Initialize_4780 is
61208   begin
61209      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
61210       (Base + 4780,
61211        AMF.Internals.Tables.UML_String_Data_0A.MS_0AB0'Access);
61212   end Initialize_4780;
61213
61214   ---------------------
61215   -- Initialize_4781 --
61216   ---------------------
61217
61218   procedure Initialize_4781 is
61219   begin
61220      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
61221       (Base + 4781,
61222        AMF.Internals.Tables.UML_String_Data_01.MS_010F'Access);
61223      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4781, (Is_Empty => True));
61224   end Initialize_4781;
61225
61226   ---------------------
61227   -- Initialize_4782 --
61228   ---------------------
61229
61230   procedure Initialize_4782 is
61231   begin
61232      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
61233       (Base + 4782,
61234        AMF.Internals.Tables.UML_String_Data_03.MS_0327'Access);
61235   end Initialize_4782;
61236
61237   ---------------------
61238   -- Initialize_4783 --
61239   ---------------------
61240
61241   procedure Initialize_4783 is
61242   begin
61243      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
61244       (Base + 4783,
61245        AMF.Internals.Tables.UML_String_Data_08.MS_08DF'Access);
61246      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4783, (Is_Empty => True));
61247   end Initialize_4783;
61248
61249   ---------------------
61250   -- Initialize_4784 --
61251   ---------------------
61252
61253   procedure Initialize_4784 is
61254   begin
61255      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
61256       (Base + 4784,
61257        AMF.Internals.Tables.UML_String_Data_06.MS_069D'Access);
61258   end Initialize_4784;
61259
61260   ---------------------
61261   -- Initialize_4785 --
61262   ---------------------
61263
61264   procedure Initialize_4785 is
61265   begin
61266      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
61267       (Base + 4785,
61268        AMF.Internals.Tables.UML_String_Data_07.MS_07CD'Access);
61269      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4785, (Is_Empty => True));
61270   end Initialize_4785;
61271
61272   ---------------------
61273   -- Initialize_4786 --
61274   ---------------------
61275
61276   procedure Initialize_4786 is
61277   begin
61278      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
61279       (Base + 4786,
61280        AMF.Internals.Tables.UML_String_Data_02.MS_023A'Access);
61281   end Initialize_4786;
61282
61283   ---------------------
61284   -- Initialize_4787 --
61285   ---------------------
61286
61287   procedure Initialize_4787 is
61288   begin
61289      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
61290       (Base + 4787,
61291        AMF.Internals.Tables.UML_String_Data_02.MS_02F6'Access);
61292      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4787, (Is_Empty => True));
61293   end Initialize_4787;
61294
61295   ---------------------
61296   -- Initialize_4788 --
61297   ---------------------
61298
61299   procedure Initialize_4788 is
61300   begin
61301      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
61302       (Base + 4788,
61303        AMF.Internals.Tables.UML_String_Data_03.MS_03EB'Access);
61304   end Initialize_4788;
61305
61306   ---------------------
61307   -- Initialize_4789 --
61308   ---------------------
61309
61310   procedure Initialize_4789 is
61311   begin
61312      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
61313       (Base + 4789,
61314        AMF.Internals.Tables.UML_String_Data_08.MS_08FD'Access);
61315      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4789, (Is_Empty => True));
61316   end Initialize_4789;
61317
61318   ---------------------
61319   -- Initialize_4790 --
61320   ---------------------
61321
61322   procedure Initialize_4790 is
61323   begin
61324      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
61325       (Base + 4790,
61326        AMF.Internals.Tables.UML_String_Data_02.MS_0285'Access);
61327   end Initialize_4790;
61328
61329   ---------------------
61330   -- Initialize_4791 --
61331   ---------------------
61332
61333   procedure Initialize_4791 is
61334   begin
61335      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
61336       (Base + 4791,
61337        AMF.Internals.Tables.UML_String_Data_09.MS_090C'Access);
61338      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4791, (Is_Empty => True));
61339   end Initialize_4791;
61340
61341   ---------------------
61342   -- Initialize_4792 --
61343   ---------------------
61344
61345   procedure Initialize_4792 is
61346   begin
61347      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
61348       (Base + 4792,
61349        AMF.Internals.Tables.UML_String_Data_00.MS_00AD'Access);
61350   end Initialize_4792;
61351
61352   ---------------------
61353   -- Initialize_4793 --
61354   ---------------------
61355
61356   procedure Initialize_4793 is
61357   begin
61358      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
61359       (Base + 4793,
61360        AMF.Internals.Tables.UML_String_Data_06.MS_06F6'Access);
61361      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4793, (Is_Empty => True));
61362   end Initialize_4793;
61363
61364   ---------------------
61365   -- Initialize_4794 --
61366   ---------------------
61367
61368   procedure Initialize_4794 is
61369   begin
61370      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
61371       (Base + 4794,
61372        AMF.Internals.Tables.UML_String_Data_08.MS_0842'Access);
61373   end Initialize_4794;
61374
61375   ---------------------
61376   -- Initialize_4795 --
61377   ---------------------
61378
61379   procedure Initialize_4795 is
61380   begin
61381      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
61382       (Base + 4795,
61383        AMF.Internals.Tables.UML_String_Data_0B.MS_0B12'Access);
61384      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4795, (Is_Empty => True));
61385   end Initialize_4795;
61386
61387   ---------------------
61388   -- Initialize_4796 --
61389   ---------------------
61390
61391   procedure Initialize_4796 is
61392   begin
61393      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
61394       (Base + 4796,
61395        AMF.Internals.Tables.UML_String_Data_0A.MS_0A17'Access);
61396   end Initialize_4796;
61397
61398   ---------------------
61399   -- Initialize_4797 --
61400   ---------------------
61401
61402   procedure Initialize_4797 is
61403   begin
61404      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
61405       (Base + 4797,
61406        AMF.Internals.Tables.UML_String_Data_09.MS_091F'Access);
61407      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4797, (Is_Empty => True));
61408   end Initialize_4797;
61409
61410   ---------------------
61411   -- Initialize_4798 --
61412   ---------------------
61413
61414   procedure Initialize_4798 is
61415   begin
61416      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
61417       (Base + 4798,
61418        AMF.Internals.Tables.UML_String_Data_05.MS_05AF'Access);
61419   end Initialize_4798;
61420
61421   ---------------------
61422   -- Initialize_4799 --
61423   ---------------------
61424
61425   procedure Initialize_4799 is
61426   begin
61427      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
61428       (Base + 4799,
61429        AMF.Internals.Tables.UML_String_Data_07.MS_075E'Access);
61430      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4799, (Is_Empty => True));
61431   end Initialize_4799;
61432
61433   ---------------------
61434   -- Initialize_4800 --
61435   ---------------------
61436
61437   procedure Initialize_4800 is
61438   begin
61439      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
61440       (Base + 4800,
61441        AMF.Internals.Tables.UML_String_Data_03.MS_0331'Access);
61442   end Initialize_4800;
61443
61444   ---------------------
61445   -- Initialize_4801 --
61446   ---------------------
61447
61448   procedure Initialize_4801 is
61449   begin
61450      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
61451       (Base + 4801,
61452        AMF.Internals.Tables.UML_String_Data_08.MS_089D'Access);
61453      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4801, (Is_Empty => True));
61454   end Initialize_4801;
61455
61456   ---------------------
61457   -- Initialize_4802 --
61458   ---------------------
61459
61460   procedure Initialize_4802 is
61461   begin
61462      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
61463       (Base + 4802,
61464        AMF.Internals.Tables.UML_String_Data_09.MS_092B'Access);
61465   end Initialize_4802;
61466
61467   ---------------------
61468   -- Initialize_4803 --
61469   ---------------------
61470
61471   procedure Initialize_4803 is
61472   begin
61473      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
61474       (Base + 4803,
61475        AMF.Internals.Tables.UML_String_Data_04.MS_0447'Access);
61476      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4803, (Is_Empty => True));
61477   end Initialize_4803;
61478
61479   ---------------------
61480   -- Initialize_4804 --
61481   ---------------------
61482
61483   procedure Initialize_4804 is
61484   begin
61485      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
61486       (Base + 4804,
61487        AMF.Internals.Tables.UML_String_Data_09.MS_097B'Access);
61488   end Initialize_4804;
61489
61490   ---------------------
61491   -- Initialize_4805 --
61492   ---------------------
61493
61494   procedure Initialize_4805 is
61495   begin
61496      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
61497       (Base + 4805,
61498        AMF.Internals.Tables.UML_String_Data_05.MS_05E5'Access);
61499      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4805, (Is_Empty => True));
61500   end Initialize_4805;
61501
61502   ---------------------
61503   -- Initialize_4806 --
61504   ---------------------
61505
61506   procedure Initialize_4806 is
61507   begin
61508      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
61509       (Base + 4806,
61510        AMF.Internals.Tables.UML_String_Data_00.MS_00AF'Access);
61511   end Initialize_4806;
61512
61513   ---------------------
61514   -- Initialize_4807 --
61515   ---------------------
61516
61517   procedure Initialize_4807 is
61518   begin
61519      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
61520       (Base + 4807,
61521        AMF.Internals.Tables.UML_String_Data_00.MS_0087'Access);
61522      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4807, (Is_Empty => True));
61523   end Initialize_4807;
61524
61525   ---------------------
61526   -- Initialize_4808 --
61527   ---------------------
61528
61529   procedure Initialize_4808 is
61530   begin
61531      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
61532       (Base + 4808,
61533        AMF.Internals.Tables.UML_String_Data_09.MS_094F'Access);
61534   end Initialize_4808;
61535
61536   ---------------------
61537   -- Initialize_4809 --
61538   ---------------------
61539
61540   procedure Initialize_4809 is
61541   begin
61542      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
61543       (Base + 4809,
61544        AMF.Internals.Tables.UML_String_Data_05.MS_05F2'Access);
61545      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4809, (Is_Empty => True));
61546   end Initialize_4809;
61547
61548   ---------------------
61549   -- Initialize_4810 --
61550   ---------------------
61551
61552   procedure Initialize_4810 is
61553   begin
61554      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
61555       (Base + 4810,
61556        AMF.Internals.Tables.UML_String_Data_06.MS_065C'Access);
61557   end Initialize_4810;
61558
61559   ---------------------
61560   -- Initialize_4811 --
61561   ---------------------
61562
61563   procedure Initialize_4811 is
61564   begin
61565      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
61566       (Base + 4811,
61567        AMF.Internals.Tables.UML_String_Data_04.MS_0448'Access);
61568      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4811, (Is_Empty => True));
61569   end Initialize_4811;
61570
61571   ---------------------
61572   -- Initialize_4812 --
61573   ---------------------
61574
61575   procedure Initialize_4812 is
61576   begin
61577      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
61578       (Base + 4812,
61579        AMF.Internals.Tables.UML_String_Data_00.MS_0085'Access);
61580   end Initialize_4812;
61581
61582   ---------------------
61583   -- Initialize_4813 --
61584   ---------------------
61585
61586   procedure Initialize_4813 is
61587   begin
61588      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
61589       (Base + 4813,
61590        AMF.Internals.Tables.UML_String_Data_0A.MS_0AE2'Access);
61591      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4813, (Is_Empty => True));
61592   end Initialize_4813;
61593
61594   ---------------------
61595   -- Initialize_4814 --
61596   ---------------------
61597
61598   procedure Initialize_4814 is
61599   begin
61600      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
61601       (Base + 4814,
61602        AMF.Internals.Tables.UML_String_Data_05.MS_0533'Access);
61603   end Initialize_4814;
61604
61605   ---------------------
61606   -- Initialize_4815 --
61607   ---------------------
61608
61609   procedure Initialize_4815 is
61610   begin
61611      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
61612       (Base + 4815,
61613        AMF.Internals.Tables.UML_String_Data_03.MS_033F'Access);
61614      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4815, (Is_Empty => True));
61615   end Initialize_4815;
61616
61617   ---------------------
61618   -- Initialize_4816 --
61619   ---------------------
61620
61621   procedure Initialize_4816 is
61622   begin
61623      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
61624       (Base + 4816,
61625        AMF.Internals.Tables.UML_String_Data_07.MS_07AD'Access);
61626   end Initialize_4816;
61627
61628   ---------------------
61629   -- Initialize_4817 --
61630   ---------------------
61631
61632   procedure Initialize_4817 is
61633   begin
61634      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
61635       (Base + 4817,
61636        AMF.Internals.Tables.UML_String_Data_0C.MS_0C79'Access);
61637      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4817, (Is_Empty => True));
61638   end Initialize_4817;
61639
61640   ---------------------
61641   -- Initialize_4818 --
61642   ---------------------
61643
61644   procedure Initialize_4818 is
61645   begin
61646      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
61647       (Base + 4818,
61648        AMF.Internals.Tables.UML_String_Data_0A.MS_0A76'Access);
61649   end Initialize_4818;
61650
61651   ---------------------
61652   -- Initialize_4819 --
61653   ---------------------
61654
61655   procedure Initialize_4819 is
61656   begin
61657      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
61658       (Base + 4819,
61659        AMF.Internals.Tables.UML_String_Data_0B.MS_0B34'Access);
61660      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4819, (Is_Empty => True));
61661   end Initialize_4819;
61662
61663   ---------------------
61664   -- Initialize_4820 --
61665   ---------------------
61666
61667   procedure Initialize_4820 is
61668   begin
61669      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
61670       (Base + 4820,
61671        AMF.Internals.Tables.UML_String_Data_00.MS_00E9'Access);
61672   end Initialize_4820;
61673
61674   ---------------------
61675   -- Initialize_4821 --
61676   ---------------------
61677
61678   procedure Initialize_4821 is
61679   begin
61680      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
61681       (Base + 4821,
61682        AMF.Internals.Tables.UML_String_Data_05.MS_055A'Access);
61683      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4821, (Is_Empty => True));
61684   end Initialize_4821;
61685
61686   ---------------------
61687   -- Initialize_4822 --
61688   ---------------------
61689
61690   procedure Initialize_4822 is
61691   begin
61692      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
61693       (Base + 4822,
61694        AMF.Internals.Tables.UML_String_Data_06.MS_0605'Access);
61695   end Initialize_4822;
61696
61697   ---------------------
61698   -- Initialize_4823 --
61699   ---------------------
61700
61701   procedure Initialize_4823 is
61702   begin
61703      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
61704       (Base + 4823,
61705        AMF.Internals.Tables.UML_String_Data_05.MS_0547'Access);
61706      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4823, (Is_Empty => True));
61707   end Initialize_4823;
61708
61709   ---------------------
61710   -- Initialize_4824 --
61711   ---------------------
61712
61713   procedure Initialize_4824 is
61714   begin
61715      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
61716       (Base + 4824,
61717        AMF.Internals.Tables.UML_String_Data_0A.MS_0AAF'Access);
61718   end Initialize_4824;
61719
61720   ---------------------
61721   -- Initialize_4825 --
61722   ---------------------
61723
61724   procedure Initialize_4825 is
61725   begin
61726      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
61727       (Base + 4825,
61728        AMF.Internals.Tables.UML_String_Data_00.MS_0084'Access);
61729      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4825, (Is_Empty => True));
61730   end Initialize_4825;
61731
61732   ---------------------
61733   -- Initialize_4826 --
61734   ---------------------
61735
61736   procedure Initialize_4826 is
61737   begin
61738      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
61739       (Base + 4826,
61740        AMF.Internals.Tables.UML_String_Data_05.MS_058D'Access);
61741   end Initialize_4826;
61742
61743   ---------------------
61744   -- Initialize_4827 --
61745   ---------------------
61746
61747   procedure Initialize_4827 is
61748   begin
61749      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
61750       (Base + 4827,
61751        AMF.Internals.Tables.UML_String_Data_03.MS_03C0'Access);
61752      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Visibility (Base + 4827, (Is_Empty => True));
61753   end Initialize_4827;
61754
61755   ---------------------
61756   -- Initialize_4828 --
61757   ---------------------
61758
61759   procedure Initialize_4828 is
61760   begin
61761      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Body
61762       (Base + 4828,
61763        AMF.Internals.Tables.UML_String_Data_09.MS_09D4'Access);
61764   end Initialize_4828;
61765
61766   ---------------------
61767   -- Initialize_4829 --
61768   ---------------------
61769
61770   procedure Initialize_4829 is
61771   begin
61772      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Name
61773       (Base + 4829,
61774        AMF.Internals.Tables.UML_String_Data_07.MS_0750'Access);
61775      AMF.Internals.Tables.CMOF_Attributes.Internal_Set_Value
61776       (Base + 4829,
61777        AMF.Internals.Tables.UML_String_Data_04.MS_0427'Access);
61778   end Initialize_4829;
61779
61780end AMF.Internals.Tables.UML_Metamodel.Properties;
61781