1------------------------------------------------------------------------------ 2-- -- 3-- Matreshka Project -- 4-- -- 5-- Ada Modeling Framework -- 6-- -- 7-- Runtime Library Component -- 8-- -- 9------------------------------------------------------------------------------ 10-- -- 11-- Copyright © 2012-2013, 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: 3646 $ $Date: 2013-01-07 22:05:34 +0400 (Mon, 07 Jan 2013) $ 43------------------------------------------------------------------------------ 44-- This file is generated, don't edit it. 45------------------------------------------------------------------------------ 46with AMF.Internals.Extents; 47with AMF.Internals.Tables.CMOF_Constructors; 48with AMF.Internals.Tables.CMOF_Element_Table; 49with AMF.Internals.Tables.OCL_String_Data_00; 50 51package body AMF.Internals.Tables.OCL_Metamodel.Objects is 52 53 ---------------- 54 -- Initialize -- 55 ---------------- 56 57 procedure Initialize is 58 Extent : constant AMF.Internals.AMF_Extent 59 := AMF.Internals.Extents.Allocate_Extent 60 (AMF.Internals.Tables.OCL_String_Data_00.MS_0047'Access); 61 62 begin 63 Base := AMF.Internals.Tables.CMOF_Element_Table.Last; 64 Initialize_1 (Extent); 65 Initialize_2 (Extent); 66 Initialize_3 (Extent); 67 Initialize_4 (Extent); 68 Initialize_5 (Extent); 69 Initialize_6 (Extent); 70 Initialize_7 (Extent); 71 Initialize_8 (Extent); 72 Initialize_9 (Extent); 73 Initialize_10 (Extent); 74 Initialize_11 (Extent); 75 Initialize_12 (Extent); 76 Initialize_13 (Extent); 77 Initialize_14 (Extent); 78 Initialize_15 (Extent); 79 Initialize_16 (Extent); 80 Initialize_17 (Extent); 81 Initialize_18 (Extent); 82 Initialize_19 (Extent); 83 Initialize_20 (Extent); 84 Initialize_21 (Extent); 85 Initialize_22 (Extent); 86 Initialize_23 (Extent); 87 Initialize_24 (Extent); 88 Initialize_25 (Extent); 89 Initialize_26 (Extent); 90 Initialize_27 (Extent); 91 Initialize_28 (Extent); 92 Initialize_29 (Extent); 93 Initialize_30 (Extent); 94 Initialize_31 (Extent); 95 Initialize_32 (Extent); 96 Initialize_33 (Extent); 97 Initialize_34 (Extent); 98 Initialize_35 (Extent); 99 Initialize_36 (Extent); 100 Initialize_37 (Extent); 101 Initialize_38 (Extent); 102 Initialize_39 (Extent); 103 Initialize_40 (Extent); 104 Initialize_41 (Extent); 105 Initialize_42 (Extent); 106 Initialize_43 (Extent); 107 Initialize_44 (Extent); 108 Initialize_45 (Extent); 109 Initialize_46 (Extent); 110 Initialize_47 (Extent); 111 Initialize_48 (Extent); 112 Initialize_49 (Extent); 113 Initialize_50 (Extent); 114 Initialize_51 (Extent); 115 Initialize_52 (Extent); 116 Initialize_53 (Extent); 117 Initialize_54 (Extent); 118 Initialize_55 (Extent); 119 Initialize_56 (Extent); 120 Initialize_57 (Extent); 121 Initialize_58 (Extent); 122 Initialize_59 (Extent); 123 Initialize_60 (Extent); 124 Initialize_61 (Extent); 125 Initialize_62 (Extent); 126 Initialize_63 (Extent); 127 Initialize_64 (Extent); 128 Initialize_65 (Extent); 129 Initialize_66 (Extent); 130 Initialize_67 (Extent); 131 Initialize_68 (Extent); 132 Initialize_69 (Extent); 133 Initialize_70 (Extent); 134 Initialize_71 (Extent); 135 Initialize_72 (Extent); 136 Initialize_73 (Extent); 137 Initialize_74 (Extent); 138 Initialize_75 (Extent); 139 Initialize_76 (Extent); 140 Initialize_77 (Extent); 141 Initialize_78 (Extent); 142 Initialize_79 (Extent); 143 Initialize_80 (Extent); 144 Initialize_81 (Extent); 145 Initialize_82 (Extent); 146 Initialize_83 (Extent); 147 Initialize_84 (Extent); 148 Initialize_85 (Extent); 149 Initialize_86 (Extent); 150 Initialize_87 (Extent); 151 Initialize_88 (Extent); 152 Initialize_89 (Extent); 153 Initialize_90 (Extent); 154 Initialize_91 (Extent); 155 Initialize_92 (Extent); 156 Initialize_93 (Extent); 157 Initialize_94 (Extent); 158 Initialize_95 (Extent); 159 Initialize_96 (Extent); 160 Initialize_97 (Extent); 161 Initialize_98 (Extent); 162 Initialize_99 (Extent); 163 Initialize_100 (Extent); 164 Initialize_101 (Extent); 165 Initialize_102 (Extent); 166 Initialize_103 (Extent); 167 Initialize_104 (Extent); 168 Initialize_105 (Extent); 169 Initialize_106 (Extent); 170 Initialize_107 (Extent); 171 Initialize_108 (Extent); 172 Initialize_109 (Extent); 173 Initialize_110 (Extent); 174 Initialize_111 (Extent); 175 Initialize_112 (Extent); 176 Initialize_113 (Extent); 177 Initialize_114 (Extent); 178 Initialize_115 (Extent); 179 Initialize_116 (Extent); 180 Initialize_117 (Extent); 181 Initialize_118 (Extent); 182 Initialize_119 (Extent); 183 Initialize_120 (Extent); 184 Initialize_121 (Extent); 185 Initialize_122 (Extent); 186 Initialize_123 (Extent); 187 Initialize_124 (Extent); 188 Initialize_125 (Extent); 189 Initialize_126 (Extent); 190 Initialize_127 (Extent); 191 Initialize_128 (Extent); 192 Initialize_129 (Extent); 193 Initialize_130 (Extent); 194 Initialize_131 (Extent); 195 Initialize_132 (Extent); 196 Initialize_133 (Extent); 197 Initialize_134 (Extent); 198 Initialize_135 (Extent); 199 Initialize_136 (Extent); 200 Initialize_137 (Extent); 201 Initialize_138 (Extent); 202 Initialize_139 (Extent); 203 Initialize_140 (Extent); 204 Initialize_141 (Extent); 205 Initialize_142 (Extent); 206 Initialize_143 (Extent); 207 Initialize_144 (Extent); 208 Initialize_145 (Extent); 209 Initialize_146 (Extent); 210 Initialize_147 (Extent); 211 Initialize_148 (Extent); 212 Initialize_149 (Extent); 213 Initialize_150 (Extent); 214 Initialize_151 (Extent); 215 Initialize_152 (Extent); 216 Initialize_153 (Extent); 217 Initialize_154 (Extent); 218 Initialize_155 (Extent); 219 Initialize_156 (Extent); 220 Initialize_157 (Extent); 221 Initialize_158 (Extent); 222 Initialize_159 (Extent); 223 Initialize_160 (Extent); 224 Initialize_161 (Extent); 225 Initialize_162 (Extent); 226 Initialize_163 (Extent); 227 Initialize_164 (Extent); 228 Initialize_165 (Extent); 229 Initialize_166 (Extent); 230 Initialize_167 (Extent); 231 Initialize_168 (Extent); 232 Initialize_169 (Extent); 233 Initialize_170 (Extent); 234 Initialize_171 (Extent); 235 Initialize_172 (Extent); 236 Initialize_173 (Extent); 237 Initialize_174 (Extent); 238 Initialize_175 (Extent); 239 Initialize_176 (Extent); 240 Initialize_177 (Extent); 241 Initialize_178 (Extent); 242 end Initialize; 243 244 ------------------ 245 -- Initialize_1 -- 246 ------------------ 247 248 procedure Initialize_1 (Extent : AMF.Internals.AMF_Extent) is 249 Aux : AMF.Internals.CMOF_Element; 250 251 begin 252 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 253 AMF.Internals.Extents.Internal_Append (Extent, Aux); 254 end Initialize_1; 255 256 ------------------ 257 -- Initialize_2 -- 258 ------------------ 259 260 procedure Initialize_2 (Extent : AMF.Internals.AMF_Extent) is 261 Aux : AMF.Internals.CMOF_Element; 262 263 begin 264 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 265 AMF.Internals.Extents.Internal_Append (Extent, Aux); 266 end Initialize_2; 267 268 ------------------ 269 -- Initialize_3 -- 270 ------------------ 271 272 procedure Initialize_3 (Extent : AMF.Internals.AMF_Extent) is 273 Aux : AMF.Internals.CMOF_Element; 274 275 begin 276 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 277 AMF.Internals.Extents.Internal_Append (Extent, Aux); 278 end Initialize_3; 279 280 ------------------ 281 -- Initialize_4 -- 282 ------------------ 283 284 procedure Initialize_4 (Extent : AMF.Internals.AMF_Extent) is 285 Aux : AMF.Internals.CMOF_Element; 286 287 begin 288 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 289 AMF.Internals.Extents.Internal_Append (Extent, Aux); 290 end Initialize_4; 291 292 ------------------ 293 -- Initialize_5 -- 294 ------------------ 295 296 procedure Initialize_5 (Extent : AMF.Internals.AMF_Extent) is 297 Aux : AMF.Internals.CMOF_Element; 298 299 begin 300 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 301 AMF.Internals.Extents.Internal_Append (Extent, Aux); 302 end Initialize_5; 303 304 ------------------ 305 -- Initialize_6 -- 306 ------------------ 307 308 procedure Initialize_6 (Extent : AMF.Internals.AMF_Extent) is 309 Aux : AMF.Internals.CMOF_Element; 310 311 begin 312 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 313 AMF.Internals.Extents.Internal_Append (Extent, Aux); 314 end Initialize_6; 315 316 ------------------ 317 -- Initialize_7 -- 318 ------------------ 319 320 procedure Initialize_7 (Extent : AMF.Internals.AMF_Extent) is 321 Aux : AMF.Internals.CMOF_Element; 322 323 begin 324 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 325 AMF.Internals.Extents.Internal_Append (Extent, Aux); 326 end Initialize_7; 327 328 ------------------ 329 -- Initialize_8 -- 330 ------------------ 331 332 procedure Initialize_8 (Extent : AMF.Internals.AMF_Extent) is 333 Aux : AMF.Internals.CMOF_Element; 334 335 begin 336 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 337 AMF.Internals.Extents.Internal_Append (Extent, Aux); 338 end Initialize_8; 339 340 ------------------ 341 -- Initialize_9 -- 342 ------------------ 343 344 procedure Initialize_9 (Extent : AMF.Internals.AMF_Extent) is 345 Aux : AMF.Internals.CMOF_Element; 346 347 begin 348 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 349 AMF.Internals.Extents.Internal_Append (Extent, Aux); 350 end Initialize_9; 351 352 ------------------- 353 -- Initialize_10 -- 354 ------------------- 355 356 procedure Initialize_10 (Extent : AMF.Internals.AMF_Extent) is 357 Aux : AMF.Internals.CMOF_Element; 358 359 begin 360 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 361 AMF.Internals.Extents.Internal_Append (Extent, Aux); 362 end Initialize_10; 363 364 ------------------- 365 -- Initialize_11 -- 366 ------------------- 367 368 procedure Initialize_11 (Extent : AMF.Internals.AMF_Extent) is 369 Aux : AMF.Internals.CMOF_Element; 370 371 begin 372 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 373 AMF.Internals.Extents.Internal_Append (Extent, Aux); 374 end Initialize_11; 375 376 ------------------- 377 -- Initialize_12 -- 378 ------------------- 379 380 procedure Initialize_12 (Extent : AMF.Internals.AMF_Extent) is 381 Aux : AMF.Internals.CMOF_Element; 382 383 begin 384 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 385 AMF.Internals.Extents.Internal_Append (Extent, Aux); 386 end Initialize_12; 387 388 ------------------- 389 -- Initialize_13 -- 390 ------------------- 391 392 procedure Initialize_13 (Extent : AMF.Internals.AMF_Extent) is 393 Aux : AMF.Internals.CMOF_Element; 394 395 begin 396 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 397 AMF.Internals.Extents.Internal_Append (Extent, Aux); 398 end Initialize_13; 399 400 ------------------- 401 -- Initialize_14 -- 402 ------------------- 403 404 procedure Initialize_14 (Extent : AMF.Internals.AMF_Extent) is 405 Aux : AMF.Internals.CMOF_Element; 406 407 begin 408 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 409 AMF.Internals.Extents.Internal_Append (Extent, Aux); 410 end Initialize_14; 411 412 ------------------- 413 -- Initialize_15 -- 414 ------------------- 415 416 procedure Initialize_15 (Extent : AMF.Internals.AMF_Extent) is 417 Aux : AMF.Internals.CMOF_Element; 418 419 begin 420 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 421 AMF.Internals.Extents.Internal_Append (Extent, Aux); 422 end Initialize_15; 423 424 ------------------- 425 -- Initialize_16 -- 426 ------------------- 427 428 procedure Initialize_16 (Extent : AMF.Internals.AMF_Extent) is 429 Aux : AMF.Internals.CMOF_Element; 430 431 begin 432 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 433 AMF.Internals.Extents.Internal_Append (Extent, Aux); 434 end Initialize_16; 435 436 ------------------- 437 -- Initialize_17 -- 438 ------------------- 439 440 procedure Initialize_17 (Extent : AMF.Internals.AMF_Extent) is 441 Aux : AMF.Internals.CMOF_Element; 442 443 begin 444 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 445 AMF.Internals.Extents.Internal_Append (Extent, Aux); 446 end Initialize_17; 447 448 ------------------- 449 -- Initialize_18 -- 450 ------------------- 451 452 procedure Initialize_18 (Extent : AMF.Internals.AMF_Extent) is 453 Aux : AMF.Internals.CMOF_Element; 454 455 begin 456 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 457 AMF.Internals.Extents.Internal_Append (Extent, Aux); 458 end Initialize_18; 459 460 ------------------- 461 -- Initialize_19 -- 462 ------------------- 463 464 procedure Initialize_19 (Extent : AMF.Internals.AMF_Extent) is 465 Aux : AMF.Internals.CMOF_Element; 466 467 begin 468 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 469 AMF.Internals.Extents.Internal_Append (Extent, Aux); 470 end Initialize_19; 471 472 ------------------- 473 -- Initialize_20 -- 474 ------------------- 475 476 procedure Initialize_20 (Extent : AMF.Internals.AMF_Extent) is 477 Aux : AMF.Internals.CMOF_Element; 478 479 begin 480 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 481 AMF.Internals.Extents.Internal_Append (Extent, Aux); 482 end Initialize_20; 483 484 ------------------- 485 -- Initialize_21 -- 486 ------------------- 487 488 procedure Initialize_21 (Extent : AMF.Internals.AMF_Extent) is 489 Aux : AMF.Internals.CMOF_Element; 490 491 begin 492 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 493 AMF.Internals.Extents.Internal_Append (Extent, Aux); 494 end Initialize_21; 495 496 ------------------- 497 -- Initialize_22 -- 498 ------------------- 499 500 procedure Initialize_22 (Extent : AMF.Internals.AMF_Extent) is 501 Aux : AMF.Internals.CMOF_Element; 502 503 begin 504 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 505 AMF.Internals.Extents.Internal_Append (Extent, Aux); 506 end Initialize_22; 507 508 ------------------- 509 -- Initialize_23 -- 510 ------------------- 511 512 procedure Initialize_23 (Extent : AMF.Internals.AMF_Extent) is 513 Aux : AMF.Internals.CMOF_Element; 514 515 begin 516 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 517 AMF.Internals.Extents.Internal_Append (Extent, Aux); 518 end Initialize_23; 519 520 ------------------- 521 -- Initialize_24 -- 522 ------------------- 523 524 procedure Initialize_24 (Extent : AMF.Internals.AMF_Extent) is 525 Aux : AMF.Internals.CMOF_Element; 526 527 begin 528 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 529 AMF.Internals.Extents.Internal_Append (Extent, Aux); 530 end Initialize_24; 531 532 ------------------- 533 -- Initialize_25 -- 534 ------------------- 535 536 procedure Initialize_25 (Extent : AMF.Internals.AMF_Extent) is 537 Aux : AMF.Internals.CMOF_Element; 538 539 begin 540 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 541 AMF.Internals.Extents.Internal_Append (Extent, Aux); 542 end Initialize_25; 543 544 ------------------- 545 -- Initialize_26 -- 546 ------------------- 547 548 procedure Initialize_26 (Extent : AMF.Internals.AMF_Extent) is 549 Aux : AMF.Internals.CMOF_Element; 550 551 begin 552 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 553 AMF.Internals.Extents.Internal_Append (Extent, Aux); 554 end Initialize_26; 555 556 ------------------- 557 -- Initialize_27 -- 558 ------------------- 559 560 procedure Initialize_27 (Extent : AMF.Internals.AMF_Extent) is 561 Aux : AMF.Internals.CMOF_Element; 562 563 begin 564 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 565 AMF.Internals.Extents.Internal_Append (Extent, Aux); 566 end Initialize_27; 567 568 ------------------- 569 -- Initialize_28 -- 570 ------------------- 571 572 procedure Initialize_28 (Extent : AMF.Internals.AMF_Extent) is 573 Aux : AMF.Internals.CMOF_Element; 574 575 begin 576 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 577 AMF.Internals.Extents.Internal_Append (Extent, Aux); 578 end Initialize_28; 579 580 ------------------- 581 -- Initialize_29 -- 582 ------------------- 583 584 procedure Initialize_29 (Extent : AMF.Internals.AMF_Extent) is 585 Aux : AMF.Internals.CMOF_Element; 586 587 begin 588 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 589 AMF.Internals.Extents.Internal_Append (Extent, Aux); 590 end Initialize_29; 591 592 ------------------- 593 -- Initialize_30 -- 594 ------------------- 595 596 procedure Initialize_30 (Extent : AMF.Internals.AMF_Extent) is 597 Aux : AMF.Internals.CMOF_Element; 598 599 begin 600 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 601 AMF.Internals.Extents.Internal_Append (Extent, Aux); 602 end Initialize_30; 603 604 ------------------- 605 -- Initialize_31 -- 606 ------------------- 607 608 procedure Initialize_31 (Extent : AMF.Internals.AMF_Extent) is 609 Aux : AMF.Internals.CMOF_Element; 610 611 begin 612 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 613 AMF.Internals.Extents.Internal_Append (Extent, Aux); 614 end Initialize_31; 615 616 ------------------- 617 -- Initialize_32 -- 618 ------------------- 619 620 procedure Initialize_32 (Extent : AMF.Internals.AMF_Extent) is 621 Aux : AMF.Internals.CMOF_Element; 622 623 begin 624 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 625 AMF.Internals.Extents.Internal_Append (Extent, Aux); 626 end Initialize_32; 627 628 ------------------- 629 -- Initialize_33 -- 630 ------------------- 631 632 procedure Initialize_33 (Extent : AMF.Internals.AMF_Extent) is 633 Aux : AMF.Internals.CMOF_Element; 634 635 begin 636 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 637 AMF.Internals.Extents.Internal_Append (Extent, Aux); 638 end Initialize_33; 639 640 ------------------- 641 -- Initialize_34 -- 642 ------------------- 643 644 procedure Initialize_34 (Extent : AMF.Internals.AMF_Extent) is 645 Aux : AMF.Internals.CMOF_Element; 646 647 begin 648 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 649 AMF.Internals.Extents.Internal_Append (Extent, Aux); 650 end Initialize_34; 651 652 ------------------- 653 -- Initialize_35 -- 654 ------------------- 655 656 procedure Initialize_35 (Extent : AMF.Internals.AMF_Extent) is 657 Aux : AMF.Internals.CMOF_Element; 658 659 begin 660 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 661 AMF.Internals.Extents.Internal_Append (Extent, Aux); 662 end Initialize_35; 663 664 ------------------- 665 -- Initialize_36 -- 666 ------------------- 667 668 procedure Initialize_36 (Extent : AMF.Internals.AMF_Extent) is 669 Aux : AMF.Internals.CMOF_Element; 670 671 begin 672 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 673 AMF.Internals.Extents.Internal_Append (Extent, Aux); 674 end Initialize_36; 675 676 ------------------- 677 -- Initialize_37 -- 678 ------------------- 679 680 procedure Initialize_37 (Extent : AMF.Internals.AMF_Extent) is 681 Aux : AMF.Internals.CMOF_Element; 682 683 begin 684 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 685 AMF.Internals.Extents.Internal_Append (Extent, Aux); 686 end Initialize_37; 687 688 ------------------- 689 -- Initialize_38 -- 690 ------------------- 691 692 procedure Initialize_38 (Extent : AMF.Internals.AMF_Extent) is 693 Aux : AMF.Internals.CMOF_Element; 694 695 begin 696 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 697 AMF.Internals.Extents.Internal_Append (Extent, Aux); 698 end Initialize_38; 699 700 ------------------- 701 -- Initialize_39 -- 702 ------------------- 703 704 procedure Initialize_39 (Extent : AMF.Internals.AMF_Extent) is 705 Aux : AMF.Internals.CMOF_Element; 706 707 begin 708 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 709 AMF.Internals.Extents.Internal_Append (Extent, Aux); 710 end Initialize_39; 711 712 ------------------- 713 -- Initialize_40 -- 714 ------------------- 715 716 procedure Initialize_40 (Extent : AMF.Internals.AMF_Extent) is 717 Aux : AMF.Internals.CMOF_Element; 718 719 begin 720 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 721 AMF.Internals.Extents.Internal_Append (Extent, Aux); 722 end Initialize_40; 723 724 ------------------- 725 -- Initialize_41 -- 726 ------------------- 727 728 procedure Initialize_41 (Extent : AMF.Internals.AMF_Extent) is 729 Aux : AMF.Internals.CMOF_Element; 730 731 begin 732 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 733 AMF.Internals.Extents.Internal_Append (Extent, Aux); 734 end Initialize_41; 735 736 ------------------- 737 -- Initialize_42 -- 738 ------------------- 739 740 procedure Initialize_42 (Extent : AMF.Internals.AMF_Extent) is 741 Aux : AMF.Internals.CMOF_Element; 742 743 begin 744 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 745 AMF.Internals.Extents.Internal_Append (Extent, Aux); 746 end Initialize_42; 747 748 ------------------- 749 -- Initialize_43 -- 750 ------------------- 751 752 procedure Initialize_43 (Extent : AMF.Internals.AMF_Extent) is 753 Aux : AMF.Internals.CMOF_Element; 754 755 begin 756 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 757 AMF.Internals.Extents.Internal_Append (Extent, Aux); 758 end Initialize_43; 759 760 ------------------- 761 -- Initialize_44 -- 762 ------------------- 763 764 procedure Initialize_44 (Extent : AMF.Internals.AMF_Extent) is 765 Aux : AMF.Internals.CMOF_Element; 766 767 begin 768 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 769 AMF.Internals.Extents.Internal_Append (Extent, Aux); 770 end Initialize_44; 771 772 ------------------- 773 -- Initialize_45 -- 774 ------------------- 775 776 procedure Initialize_45 (Extent : AMF.Internals.AMF_Extent) is 777 Aux : AMF.Internals.CMOF_Element; 778 779 begin 780 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 781 AMF.Internals.Extents.Internal_Append (Extent, Aux); 782 end Initialize_45; 783 784 ------------------- 785 -- Initialize_46 -- 786 ------------------- 787 788 procedure Initialize_46 (Extent : AMF.Internals.AMF_Extent) is 789 Aux : AMF.Internals.CMOF_Element; 790 791 begin 792 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 793 AMF.Internals.Extents.Internal_Append (Extent, Aux); 794 end Initialize_46; 795 796 ------------------- 797 -- Initialize_47 -- 798 ------------------- 799 800 procedure Initialize_47 (Extent : AMF.Internals.AMF_Extent) is 801 Aux : AMF.Internals.CMOF_Element; 802 803 begin 804 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Class; 805 AMF.Internals.Extents.Internal_Append (Extent, Aux); 806 end Initialize_47; 807 808 ------------------- 809 -- Initialize_48 -- 810 ------------------- 811 812 procedure Initialize_48 (Extent : AMF.Internals.AMF_Extent) is 813 Aux : AMF.Internals.CMOF_Element; 814 815 begin 816 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 817 AMF.Internals.Extents.Internal_Append (Extent, Aux); 818 end Initialize_48; 819 820 ------------------- 821 -- Initialize_49 -- 822 ------------------- 823 824 procedure Initialize_49 (Extent : AMF.Internals.AMF_Extent) is 825 Aux : AMF.Internals.CMOF_Element; 826 827 begin 828 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 829 AMF.Internals.Extents.Internal_Append (Extent, Aux); 830 end Initialize_49; 831 832 ------------------- 833 -- Initialize_50 -- 834 ------------------- 835 836 procedure Initialize_50 (Extent : AMF.Internals.AMF_Extent) is 837 Aux : AMF.Internals.CMOF_Element; 838 839 begin 840 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 841 AMF.Internals.Extents.Internal_Append (Extent, Aux); 842 end Initialize_50; 843 844 ------------------- 845 -- Initialize_51 -- 846 ------------------- 847 848 procedure Initialize_51 (Extent : AMF.Internals.AMF_Extent) is 849 Aux : AMF.Internals.CMOF_Element; 850 851 begin 852 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 853 AMF.Internals.Extents.Internal_Append (Extent, Aux); 854 end Initialize_51; 855 856 ------------------- 857 -- Initialize_52 -- 858 ------------------- 859 860 procedure Initialize_52 (Extent : AMF.Internals.AMF_Extent) is 861 Aux : AMF.Internals.CMOF_Element; 862 863 begin 864 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 865 AMF.Internals.Extents.Internal_Append (Extent, Aux); 866 end Initialize_52; 867 868 ------------------- 869 -- Initialize_53 -- 870 ------------------- 871 872 procedure Initialize_53 (Extent : AMF.Internals.AMF_Extent) is 873 Aux : AMF.Internals.CMOF_Element; 874 875 begin 876 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 877 AMF.Internals.Extents.Internal_Append (Extent, Aux); 878 end Initialize_53; 879 880 ------------------- 881 -- Initialize_54 -- 882 ------------------- 883 884 procedure Initialize_54 (Extent : AMF.Internals.AMF_Extent) is 885 Aux : AMF.Internals.CMOF_Element; 886 887 begin 888 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 889 AMF.Internals.Extents.Internal_Append (Extent, Aux); 890 end Initialize_54; 891 892 ------------------- 893 -- Initialize_55 -- 894 ------------------- 895 896 procedure Initialize_55 (Extent : AMF.Internals.AMF_Extent) is 897 Aux : AMF.Internals.CMOF_Element; 898 899 begin 900 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 901 AMF.Internals.Extents.Internal_Append (Extent, Aux); 902 end Initialize_55; 903 904 ------------------- 905 -- Initialize_56 -- 906 ------------------- 907 908 procedure Initialize_56 (Extent : AMF.Internals.AMF_Extent) is 909 Aux : AMF.Internals.CMOF_Element; 910 911 begin 912 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 913 AMF.Internals.Extents.Internal_Append (Extent, Aux); 914 end Initialize_56; 915 916 ------------------- 917 -- Initialize_57 -- 918 ------------------- 919 920 procedure Initialize_57 (Extent : AMF.Internals.AMF_Extent) is 921 Aux : AMF.Internals.CMOF_Element; 922 923 begin 924 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 925 AMF.Internals.Extents.Internal_Append (Extent, Aux); 926 end Initialize_57; 927 928 ------------------- 929 -- Initialize_58 -- 930 ------------------- 931 932 procedure Initialize_58 (Extent : AMF.Internals.AMF_Extent) is 933 Aux : AMF.Internals.CMOF_Element; 934 935 begin 936 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 937 AMF.Internals.Extents.Internal_Append (Extent, Aux); 938 end Initialize_58; 939 940 ------------------- 941 -- Initialize_59 -- 942 ------------------- 943 944 procedure Initialize_59 (Extent : AMF.Internals.AMF_Extent) is 945 Aux : AMF.Internals.CMOF_Element; 946 947 begin 948 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 949 AMF.Internals.Extents.Internal_Append (Extent, Aux); 950 end Initialize_59; 951 952 ------------------- 953 -- Initialize_60 -- 954 ------------------- 955 956 procedure Initialize_60 (Extent : AMF.Internals.AMF_Extent) is 957 Aux : AMF.Internals.CMOF_Element; 958 959 begin 960 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 961 AMF.Internals.Extents.Internal_Append (Extent, Aux); 962 end Initialize_60; 963 964 ------------------- 965 -- Initialize_61 -- 966 ------------------- 967 968 procedure Initialize_61 (Extent : AMF.Internals.AMF_Extent) is 969 Aux : AMF.Internals.CMOF_Element; 970 971 begin 972 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 973 AMF.Internals.Extents.Internal_Append (Extent, Aux); 974 end Initialize_61; 975 976 ------------------- 977 -- Initialize_62 -- 978 ------------------- 979 980 procedure Initialize_62 (Extent : AMF.Internals.AMF_Extent) is 981 Aux : AMF.Internals.CMOF_Element; 982 983 begin 984 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 985 AMF.Internals.Extents.Internal_Append (Extent, Aux); 986 end Initialize_62; 987 988 ------------------- 989 -- Initialize_63 -- 990 ------------------- 991 992 procedure Initialize_63 (Extent : AMF.Internals.AMF_Extent) is 993 Aux : AMF.Internals.CMOF_Element; 994 995 begin 996 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 997 AMF.Internals.Extents.Internal_Append (Extent, Aux); 998 end Initialize_63; 999 1000 ------------------- 1001 -- Initialize_64 -- 1002 ------------------- 1003 1004 procedure Initialize_64 (Extent : AMF.Internals.AMF_Extent) is 1005 Aux : AMF.Internals.CMOF_Element; 1006 1007 begin 1008 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1009 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1010 end Initialize_64; 1011 1012 ------------------- 1013 -- Initialize_65 -- 1014 ------------------- 1015 1016 procedure Initialize_65 (Extent : AMF.Internals.AMF_Extent) is 1017 Aux : AMF.Internals.CMOF_Element; 1018 1019 begin 1020 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1021 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1022 end Initialize_65; 1023 1024 ------------------- 1025 -- Initialize_66 -- 1026 ------------------- 1027 1028 procedure Initialize_66 (Extent : AMF.Internals.AMF_Extent) is 1029 Aux : AMF.Internals.CMOF_Element; 1030 1031 begin 1032 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1033 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1034 end Initialize_66; 1035 1036 ------------------- 1037 -- Initialize_67 -- 1038 ------------------- 1039 1040 procedure Initialize_67 (Extent : AMF.Internals.AMF_Extent) is 1041 Aux : AMF.Internals.CMOF_Element; 1042 1043 begin 1044 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1045 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1046 end Initialize_67; 1047 1048 ------------------- 1049 -- Initialize_68 -- 1050 ------------------- 1051 1052 procedure Initialize_68 (Extent : AMF.Internals.AMF_Extent) is 1053 Aux : AMF.Internals.CMOF_Element; 1054 1055 begin 1056 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1057 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1058 end Initialize_68; 1059 1060 ------------------- 1061 -- Initialize_69 -- 1062 ------------------- 1063 1064 procedure Initialize_69 (Extent : AMF.Internals.AMF_Extent) is 1065 Aux : AMF.Internals.CMOF_Element; 1066 1067 begin 1068 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1069 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1070 end Initialize_69; 1071 1072 ------------------- 1073 -- Initialize_70 -- 1074 ------------------- 1075 1076 procedure Initialize_70 (Extent : AMF.Internals.AMF_Extent) is 1077 Aux : AMF.Internals.CMOF_Element; 1078 1079 begin 1080 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1081 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1082 end Initialize_70; 1083 1084 ------------------- 1085 -- Initialize_71 -- 1086 ------------------- 1087 1088 procedure Initialize_71 (Extent : AMF.Internals.AMF_Extent) is 1089 Aux : AMF.Internals.CMOF_Element; 1090 1091 begin 1092 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1093 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1094 end Initialize_71; 1095 1096 ------------------- 1097 -- Initialize_72 -- 1098 ------------------- 1099 1100 procedure Initialize_72 (Extent : AMF.Internals.AMF_Extent) is 1101 Aux : AMF.Internals.CMOF_Element; 1102 1103 begin 1104 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1105 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1106 end Initialize_72; 1107 1108 ------------------- 1109 -- Initialize_73 -- 1110 ------------------- 1111 1112 procedure Initialize_73 (Extent : AMF.Internals.AMF_Extent) is 1113 Aux : AMF.Internals.CMOF_Element; 1114 1115 begin 1116 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1117 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1118 end Initialize_73; 1119 1120 ------------------- 1121 -- Initialize_74 -- 1122 ------------------- 1123 1124 procedure Initialize_74 (Extent : AMF.Internals.AMF_Extent) is 1125 Aux : AMF.Internals.CMOF_Element; 1126 1127 begin 1128 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1129 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1130 end Initialize_74; 1131 1132 ------------------- 1133 -- Initialize_75 -- 1134 ------------------- 1135 1136 procedure Initialize_75 (Extent : AMF.Internals.AMF_Extent) is 1137 Aux : AMF.Internals.CMOF_Element; 1138 1139 begin 1140 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1141 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1142 end Initialize_75; 1143 1144 ------------------- 1145 -- Initialize_76 -- 1146 ------------------- 1147 1148 procedure Initialize_76 (Extent : AMF.Internals.AMF_Extent) is 1149 Aux : AMF.Internals.CMOF_Element; 1150 1151 begin 1152 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1153 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1154 end Initialize_76; 1155 1156 ------------------- 1157 -- Initialize_77 -- 1158 ------------------- 1159 1160 procedure Initialize_77 (Extent : AMF.Internals.AMF_Extent) is 1161 Aux : AMF.Internals.CMOF_Element; 1162 1163 begin 1164 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1165 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1166 end Initialize_77; 1167 1168 ------------------- 1169 -- Initialize_78 -- 1170 ------------------- 1171 1172 procedure Initialize_78 (Extent : AMF.Internals.AMF_Extent) is 1173 Aux : AMF.Internals.CMOF_Element; 1174 1175 begin 1176 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1177 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1178 end Initialize_78; 1179 1180 ------------------- 1181 -- Initialize_79 -- 1182 ------------------- 1183 1184 procedure Initialize_79 (Extent : AMF.Internals.AMF_Extent) is 1185 Aux : AMF.Internals.CMOF_Element; 1186 1187 begin 1188 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1189 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1190 end Initialize_79; 1191 1192 ------------------- 1193 -- Initialize_80 -- 1194 ------------------- 1195 1196 procedure Initialize_80 (Extent : AMF.Internals.AMF_Extent) is 1197 Aux : AMF.Internals.CMOF_Element; 1198 1199 begin 1200 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1201 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1202 end Initialize_80; 1203 1204 ------------------- 1205 -- Initialize_81 -- 1206 ------------------- 1207 1208 procedure Initialize_81 (Extent : AMF.Internals.AMF_Extent) is 1209 Aux : AMF.Internals.CMOF_Element; 1210 1211 begin 1212 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1213 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1214 end Initialize_81; 1215 1216 ------------------- 1217 -- Initialize_82 -- 1218 ------------------- 1219 1220 procedure Initialize_82 (Extent : AMF.Internals.AMF_Extent) is 1221 Aux : AMF.Internals.CMOF_Element; 1222 1223 begin 1224 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1225 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1226 end Initialize_82; 1227 1228 ------------------- 1229 -- Initialize_83 -- 1230 ------------------- 1231 1232 procedure Initialize_83 (Extent : AMF.Internals.AMF_Extent) is 1233 Aux : AMF.Internals.CMOF_Element; 1234 1235 begin 1236 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1237 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1238 end Initialize_83; 1239 1240 ------------------- 1241 -- Initialize_84 -- 1242 ------------------- 1243 1244 procedure Initialize_84 (Extent : AMF.Internals.AMF_Extent) is 1245 Aux : AMF.Internals.CMOF_Element; 1246 1247 begin 1248 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1249 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1250 end Initialize_84; 1251 1252 ------------------- 1253 -- Initialize_85 -- 1254 ------------------- 1255 1256 procedure Initialize_85 (Extent : AMF.Internals.AMF_Extent) is 1257 Aux : AMF.Internals.CMOF_Element; 1258 1259 begin 1260 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1261 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1262 end Initialize_85; 1263 1264 ------------------- 1265 -- Initialize_86 -- 1266 ------------------- 1267 1268 procedure Initialize_86 (Extent : AMF.Internals.AMF_Extent) is 1269 Aux : AMF.Internals.CMOF_Element; 1270 1271 begin 1272 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1273 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1274 end Initialize_86; 1275 1276 ------------------- 1277 -- Initialize_87 -- 1278 ------------------- 1279 1280 procedure Initialize_87 (Extent : AMF.Internals.AMF_Extent) is 1281 Aux : AMF.Internals.CMOF_Element; 1282 1283 begin 1284 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1285 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1286 end Initialize_87; 1287 1288 ------------------- 1289 -- Initialize_88 -- 1290 ------------------- 1291 1292 procedure Initialize_88 (Extent : AMF.Internals.AMF_Extent) is 1293 Aux : AMF.Internals.CMOF_Element; 1294 1295 begin 1296 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1297 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1298 end Initialize_88; 1299 1300 ------------------- 1301 -- Initialize_89 -- 1302 ------------------- 1303 1304 procedure Initialize_89 (Extent : AMF.Internals.AMF_Extent) is 1305 Aux : AMF.Internals.CMOF_Element; 1306 1307 begin 1308 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1309 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1310 end Initialize_89; 1311 1312 ------------------- 1313 -- Initialize_90 -- 1314 ------------------- 1315 1316 procedure Initialize_90 (Extent : AMF.Internals.AMF_Extent) is 1317 Aux : AMF.Internals.CMOF_Element; 1318 1319 begin 1320 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1321 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1322 end Initialize_90; 1323 1324 ------------------- 1325 -- Initialize_91 -- 1326 ------------------- 1327 1328 procedure Initialize_91 (Extent : AMF.Internals.AMF_Extent) is 1329 Aux : AMF.Internals.CMOF_Element; 1330 1331 begin 1332 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1333 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1334 end Initialize_91; 1335 1336 ------------------- 1337 -- Initialize_92 -- 1338 ------------------- 1339 1340 procedure Initialize_92 (Extent : AMF.Internals.AMF_Extent) is 1341 Aux : AMF.Internals.CMOF_Element; 1342 1343 begin 1344 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1345 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1346 end Initialize_92; 1347 1348 ------------------- 1349 -- Initialize_93 -- 1350 ------------------- 1351 1352 procedure Initialize_93 (Extent : AMF.Internals.AMF_Extent) is 1353 Aux : AMF.Internals.CMOF_Element; 1354 1355 begin 1356 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1357 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1358 end Initialize_93; 1359 1360 ------------------- 1361 -- Initialize_94 -- 1362 ------------------- 1363 1364 procedure Initialize_94 (Extent : AMF.Internals.AMF_Extent) is 1365 Aux : AMF.Internals.CMOF_Element; 1366 1367 begin 1368 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1369 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1370 end Initialize_94; 1371 1372 ------------------- 1373 -- Initialize_95 -- 1374 ------------------- 1375 1376 procedure Initialize_95 (Extent : AMF.Internals.AMF_Extent) is 1377 Aux : AMF.Internals.CMOF_Element; 1378 1379 begin 1380 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1381 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1382 end Initialize_95; 1383 1384 ------------------- 1385 -- Initialize_96 -- 1386 ------------------- 1387 1388 procedure Initialize_96 (Extent : AMF.Internals.AMF_Extent) is 1389 Aux : AMF.Internals.CMOF_Element; 1390 1391 begin 1392 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1393 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1394 end Initialize_96; 1395 1396 ------------------- 1397 -- Initialize_97 -- 1398 ------------------- 1399 1400 procedure Initialize_97 (Extent : AMF.Internals.AMF_Extent) is 1401 Aux : AMF.Internals.CMOF_Element; 1402 1403 begin 1404 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1405 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1406 end Initialize_97; 1407 1408 ------------------- 1409 -- Initialize_98 -- 1410 ------------------- 1411 1412 procedure Initialize_98 (Extent : AMF.Internals.AMF_Extent) is 1413 Aux : AMF.Internals.CMOF_Element; 1414 1415 begin 1416 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1417 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1418 end Initialize_98; 1419 1420 ------------------- 1421 -- Initialize_99 -- 1422 ------------------- 1423 1424 procedure Initialize_99 (Extent : AMF.Internals.AMF_Extent) is 1425 Aux : AMF.Internals.CMOF_Element; 1426 1427 begin 1428 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1429 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1430 end Initialize_99; 1431 1432 -------------------- 1433 -- Initialize_100 -- 1434 -------------------- 1435 1436 procedure Initialize_100 (Extent : AMF.Internals.AMF_Extent) is 1437 Aux : AMF.Internals.CMOF_Element; 1438 1439 begin 1440 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1441 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1442 end Initialize_100; 1443 1444 -------------------- 1445 -- Initialize_101 -- 1446 -------------------- 1447 1448 procedure Initialize_101 (Extent : AMF.Internals.AMF_Extent) is 1449 Aux : AMF.Internals.CMOF_Element; 1450 1451 begin 1452 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1453 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1454 end Initialize_101; 1455 1456 -------------------- 1457 -- Initialize_102 -- 1458 -------------------- 1459 1460 procedure Initialize_102 (Extent : AMF.Internals.AMF_Extent) is 1461 Aux : AMF.Internals.CMOF_Element; 1462 1463 begin 1464 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1465 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1466 end Initialize_102; 1467 1468 -------------------- 1469 -- Initialize_103 -- 1470 -------------------- 1471 1472 procedure Initialize_103 (Extent : AMF.Internals.AMF_Extent) is 1473 Aux : AMF.Internals.CMOF_Element; 1474 1475 begin 1476 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1477 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1478 end Initialize_103; 1479 1480 -------------------- 1481 -- Initialize_104 -- 1482 -------------------- 1483 1484 procedure Initialize_104 (Extent : AMF.Internals.AMF_Extent) is 1485 Aux : AMF.Internals.CMOF_Element; 1486 1487 begin 1488 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1489 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1490 end Initialize_104; 1491 1492 -------------------- 1493 -- Initialize_105 -- 1494 -------------------- 1495 1496 procedure Initialize_105 (Extent : AMF.Internals.AMF_Extent) is 1497 Aux : AMF.Internals.CMOF_Element; 1498 1499 begin 1500 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1501 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1502 end Initialize_105; 1503 1504 -------------------- 1505 -- Initialize_106 -- 1506 -------------------- 1507 1508 procedure Initialize_106 (Extent : AMF.Internals.AMF_Extent) is 1509 Aux : AMF.Internals.CMOF_Element; 1510 1511 begin 1512 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1513 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1514 end Initialize_106; 1515 1516 -------------------- 1517 -- Initialize_107 -- 1518 -------------------- 1519 1520 procedure Initialize_107 (Extent : AMF.Internals.AMF_Extent) is 1521 Aux : AMF.Internals.CMOF_Element; 1522 1523 begin 1524 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1525 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1526 end Initialize_107; 1527 1528 -------------------- 1529 -- Initialize_108 -- 1530 -------------------- 1531 1532 procedure Initialize_108 (Extent : AMF.Internals.AMF_Extent) is 1533 Aux : AMF.Internals.CMOF_Element; 1534 1535 begin 1536 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1537 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1538 end Initialize_108; 1539 1540 -------------------- 1541 -- Initialize_109 -- 1542 -------------------- 1543 1544 procedure Initialize_109 (Extent : AMF.Internals.AMF_Extent) is 1545 Aux : AMF.Internals.CMOF_Element; 1546 1547 begin 1548 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1549 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1550 end Initialize_109; 1551 1552 -------------------- 1553 -- Initialize_110 -- 1554 -------------------- 1555 1556 procedure Initialize_110 (Extent : AMF.Internals.AMF_Extent) is 1557 Aux : AMF.Internals.CMOF_Element; 1558 1559 begin 1560 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1561 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1562 end Initialize_110; 1563 1564 -------------------- 1565 -- Initialize_111 -- 1566 -------------------- 1567 1568 procedure Initialize_111 (Extent : AMF.Internals.AMF_Extent) is 1569 Aux : AMF.Internals.CMOF_Element; 1570 1571 begin 1572 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1573 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1574 end Initialize_111; 1575 1576 -------------------- 1577 -- Initialize_112 -- 1578 -------------------- 1579 1580 procedure Initialize_112 (Extent : AMF.Internals.AMF_Extent) is 1581 Aux : AMF.Internals.CMOF_Element; 1582 1583 begin 1584 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1585 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1586 end Initialize_112; 1587 1588 -------------------- 1589 -- Initialize_113 -- 1590 -------------------- 1591 1592 procedure Initialize_113 (Extent : AMF.Internals.AMF_Extent) is 1593 Aux : AMF.Internals.CMOF_Element; 1594 1595 begin 1596 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1597 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1598 end Initialize_113; 1599 1600 -------------------- 1601 -- Initialize_114 -- 1602 -------------------- 1603 1604 procedure Initialize_114 (Extent : AMF.Internals.AMF_Extent) is 1605 Aux : AMF.Internals.CMOF_Element; 1606 1607 begin 1608 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1609 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1610 end Initialize_114; 1611 1612 -------------------- 1613 -- Initialize_115 -- 1614 -------------------- 1615 1616 procedure Initialize_115 (Extent : AMF.Internals.AMF_Extent) is 1617 Aux : AMF.Internals.CMOF_Element; 1618 1619 begin 1620 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1621 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1622 end Initialize_115; 1623 1624 -------------------- 1625 -- Initialize_116 -- 1626 -------------------- 1627 1628 procedure Initialize_116 (Extent : AMF.Internals.AMF_Extent) is 1629 Aux : AMF.Internals.CMOF_Element; 1630 1631 begin 1632 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1633 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1634 end Initialize_116; 1635 1636 -------------------- 1637 -- Initialize_117 -- 1638 -------------------- 1639 1640 procedure Initialize_117 (Extent : AMF.Internals.AMF_Extent) is 1641 Aux : AMF.Internals.CMOF_Element; 1642 1643 begin 1644 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1645 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1646 end Initialize_117; 1647 1648 -------------------- 1649 -- Initialize_118 -- 1650 -------------------- 1651 1652 procedure Initialize_118 (Extent : AMF.Internals.AMF_Extent) is 1653 Aux : AMF.Internals.CMOF_Element; 1654 1655 begin 1656 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1657 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1658 end Initialize_118; 1659 1660 -------------------- 1661 -- Initialize_119 -- 1662 -------------------- 1663 1664 procedure Initialize_119 (Extent : AMF.Internals.AMF_Extent) is 1665 Aux : AMF.Internals.CMOF_Element; 1666 1667 begin 1668 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1669 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1670 end Initialize_119; 1671 1672 -------------------- 1673 -- Initialize_120 -- 1674 -------------------- 1675 1676 procedure Initialize_120 (Extent : AMF.Internals.AMF_Extent) is 1677 Aux : AMF.Internals.CMOF_Element; 1678 1679 begin 1680 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1681 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1682 end Initialize_120; 1683 1684 -------------------- 1685 -- Initialize_121 -- 1686 -------------------- 1687 1688 procedure Initialize_121 (Extent : AMF.Internals.AMF_Extent) is 1689 Aux : AMF.Internals.CMOF_Element; 1690 1691 begin 1692 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1693 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1694 end Initialize_121; 1695 1696 -------------------- 1697 -- Initialize_122 -- 1698 -------------------- 1699 1700 procedure Initialize_122 (Extent : AMF.Internals.AMF_Extent) is 1701 Aux : AMF.Internals.CMOF_Element; 1702 1703 begin 1704 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1705 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1706 end Initialize_122; 1707 1708 -------------------- 1709 -- Initialize_123 -- 1710 -------------------- 1711 1712 procedure Initialize_123 (Extent : AMF.Internals.AMF_Extent) is 1713 Aux : AMF.Internals.CMOF_Element; 1714 1715 begin 1716 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1717 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1718 end Initialize_123; 1719 1720 -------------------- 1721 -- Initialize_124 -- 1722 -------------------- 1723 1724 procedure Initialize_124 (Extent : AMF.Internals.AMF_Extent) is 1725 Aux : AMF.Internals.CMOF_Element; 1726 1727 begin 1728 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1729 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1730 end Initialize_124; 1731 1732 -------------------- 1733 -- Initialize_125 -- 1734 -------------------- 1735 1736 procedure Initialize_125 (Extent : AMF.Internals.AMF_Extent) is 1737 Aux : AMF.Internals.CMOF_Element; 1738 1739 begin 1740 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1741 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1742 end Initialize_125; 1743 1744 -------------------- 1745 -- Initialize_126 -- 1746 -------------------- 1747 1748 procedure Initialize_126 (Extent : AMF.Internals.AMF_Extent) is 1749 Aux : AMF.Internals.CMOF_Element; 1750 1751 begin 1752 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1753 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1754 end Initialize_126; 1755 1756 -------------------- 1757 -- Initialize_127 -- 1758 -------------------- 1759 1760 procedure Initialize_127 (Extent : AMF.Internals.AMF_Extent) is 1761 Aux : AMF.Internals.CMOF_Element; 1762 1763 begin 1764 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1765 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1766 end Initialize_127; 1767 1768 -------------------- 1769 -- Initialize_128 -- 1770 -------------------- 1771 1772 procedure Initialize_128 (Extent : AMF.Internals.AMF_Extent) is 1773 Aux : AMF.Internals.CMOF_Element; 1774 1775 begin 1776 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1777 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1778 end Initialize_128; 1779 1780 -------------------- 1781 -- Initialize_129 -- 1782 -------------------- 1783 1784 procedure Initialize_129 (Extent : AMF.Internals.AMF_Extent) is 1785 Aux : AMF.Internals.CMOF_Element; 1786 1787 begin 1788 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1789 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1790 end Initialize_129; 1791 1792 -------------------- 1793 -- Initialize_130 -- 1794 -------------------- 1795 1796 procedure Initialize_130 (Extent : AMF.Internals.AMF_Extent) is 1797 Aux : AMF.Internals.CMOF_Element; 1798 1799 begin 1800 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1801 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1802 end Initialize_130; 1803 1804 -------------------- 1805 -- Initialize_131 -- 1806 -------------------- 1807 1808 procedure Initialize_131 (Extent : AMF.Internals.AMF_Extent) is 1809 Aux : AMF.Internals.CMOF_Element; 1810 1811 begin 1812 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1813 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1814 end Initialize_131; 1815 1816 -------------------- 1817 -- Initialize_132 -- 1818 -------------------- 1819 1820 procedure Initialize_132 (Extent : AMF.Internals.AMF_Extent) is 1821 Aux : AMF.Internals.CMOF_Element; 1822 1823 begin 1824 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Association; 1825 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1826 end Initialize_132; 1827 1828 -------------------- 1829 -- Initialize_133 -- 1830 -------------------- 1831 1832 procedure Initialize_133 (Extent : AMF.Internals.AMF_Extent) is 1833 Aux : AMF.Internals.CMOF_Element; 1834 1835 begin 1836 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Package; 1837 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1838 end Initialize_133; 1839 1840 -------------------- 1841 -- Initialize_134 -- 1842 -------------------- 1843 1844 procedure Initialize_134 (Extent : AMF.Internals.AMF_Extent) is 1845 Aux : AMF.Internals.CMOF_Element; 1846 1847 begin 1848 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1849 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1850 end Initialize_134; 1851 1852 -------------------- 1853 -- Initialize_135 -- 1854 -------------------- 1855 1856 procedure Initialize_135 (Extent : AMF.Internals.AMF_Extent) is 1857 Aux : AMF.Internals.CMOF_Element; 1858 1859 begin 1860 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Enumeration; 1861 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1862 end Initialize_135; 1863 1864 -------------------- 1865 -- Initialize_136 -- 1866 -------------------- 1867 1868 procedure Initialize_136 (Extent : AMF.Internals.AMF_Extent) is 1869 Aux : AMF.Internals.CMOF_Element; 1870 1871 begin 1872 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Enumeration_Literal; 1873 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1874 end Initialize_136; 1875 1876 -------------------- 1877 -- Initialize_137 -- 1878 -------------------- 1879 1880 procedure Initialize_137 (Extent : AMF.Internals.AMF_Extent) is 1881 Aux : AMF.Internals.CMOF_Element; 1882 1883 begin 1884 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Enumeration_Literal; 1885 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1886 end Initialize_137; 1887 1888 -------------------- 1889 -- Initialize_138 -- 1890 -------------------- 1891 1892 procedure Initialize_138 (Extent : AMF.Internals.AMF_Extent) is 1893 Aux : AMF.Internals.CMOF_Element; 1894 1895 begin 1896 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Enumeration_Literal; 1897 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1898 end Initialize_138; 1899 1900 -------------------- 1901 -- Initialize_139 -- 1902 -------------------- 1903 1904 procedure Initialize_139 (Extent : AMF.Internals.AMF_Extent) is 1905 Aux : AMF.Internals.CMOF_Element; 1906 1907 begin 1908 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Enumeration_Literal; 1909 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1910 end Initialize_139; 1911 1912 -------------------- 1913 -- Initialize_140 -- 1914 -------------------- 1915 1916 procedure Initialize_140 (Extent : AMF.Internals.AMF_Extent) is 1917 Aux : AMF.Internals.CMOF_Element; 1918 1919 begin 1920 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Enumeration_Literal; 1921 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1922 end Initialize_140; 1923 1924 -------------------- 1925 -- Initialize_141 -- 1926 -------------------- 1927 1928 procedure Initialize_141 (Extent : AMF.Internals.AMF_Extent) is 1929 Aux : AMF.Internals.CMOF_Element; 1930 1931 begin 1932 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1933 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1934 end Initialize_141; 1935 1936 -------------------- 1937 -- Initialize_142 -- 1938 -------------------- 1939 1940 procedure Initialize_142 (Extent : AMF.Internals.AMF_Extent) is 1941 Aux : AMF.Internals.CMOF_Element; 1942 1943 begin 1944 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1945 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1946 end Initialize_142; 1947 1948 -------------------- 1949 -- Initialize_143 -- 1950 -------------------- 1951 1952 procedure Initialize_143 (Extent : AMF.Internals.AMF_Extent) is 1953 Aux : AMF.Internals.CMOF_Element; 1954 1955 begin 1956 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1957 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1958 end Initialize_143; 1959 1960 -------------------- 1961 -- Initialize_144 -- 1962 -------------------- 1963 1964 procedure Initialize_144 (Extent : AMF.Internals.AMF_Extent) is 1965 Aux : AMF.Internals.CMOF_Element; 1966 1967 begin 1968 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1969 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1970 end Initialize_144; 1971 1972 -------------------- 1973 -- Initialize_145 -- 1974 -------------------- 1975 1976 procedure Initialize_145 (Extent : AMF.Internals.AMF_Extent) is 1977 Aux : AMF.Internals.CMOF_Element; 1978 1979 begin 1980 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1981 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1982 end Initialize_145; 1983 1984 -------------------- 1985 -- Initialize_146 -- 1986 -------------------- 1987 1988 procedure Initialize_146 (Extent : AMF.Internals.AMF_Extent) is 1989 Aux : AMF.Internals.CMOF_Element; 1990 1991 begin 1992 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 1993 AMF.Internals.Extents.Internal_Append (Extent, Aux); 1994 end Initialize_146; 1995 1996 -------------------- 1997 -- Initialize_147 -- 1998 -------------------- 1999 2000 procedure Initialize_147 (Extent : AMF.Internals.AMF_Extent) is 2001 Aux : AMF.Internals.CMOF_Element; 2002 2003 begin 2004 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 2005 AMF.Internals.Extents.Internal_Append (Extent, Aux); 2006 end Initialize_147; 2007 2008 -------------------- 2009 -- Initialize_148 -- 2010 -------------------- 2011 2012 procedure Initialize_148 (Extent : AMF.Internals.AMF_Extent) is 2013 Aux : AMF.Internals.CMOF_Element; 2014 2015 begin 2016 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 2017 AMF.Internals.Extents.Internal_Append (Extent, Aux); 2018 end Initialize_148; 2019 2020 -------------------- 2021 -- Initialize_149 -- 2022 -------------------- 2023 2024 procedure Initialize_149 (Extent : AMF.Internals.AMF_Extent) is 2025 Aux : AMF.Internals.CMOF_Element; 2026 2027 begin 2028 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 2029 AMF.Internals.Extents.Internal_Append (Extent, Aux); 2030 end Initialize_149; 2031 2032 -------------------- 2033 -- Initialize_150 -- 2034 -------------------- 2035 2036 procedure Initialize_150 (Extent : AMF.Internals.AMF_Extent) is 2037 Aux : AMF.Internals.CMOF_Element; 2038 2039 begin 2040 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 2041 AMF.Internals.Extents.Internal_Append (Extent, Aux); 2042 end Initialize_150; 2043 2044 -------------------- 2045 -- Initialize_151 -- 2046 -------------------- 2047 2048 procedure Initialize_151 (Extent : AMF.Internals.AMF_Extent) is 2049 Aux : AMF.Internals.CMOF_Element; 2050 2051 begin 2052 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 2053 AMF.Internals.Extents.Internal_Append (Extent, Aux); 2054 end Initialize_151; 2055 2056 -------------------- 2057 -- Initialize_152 -- 2058 -------------------- 2059 2060 procedure Initialize_152 (Extent : AMF.Internals.AMF_Extent) is 2061 Aux : AMF.Internals.CMOF_Element; 2062 2063 begin 2064 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 2065 AMF.Internals.Extents.Internal_Append (Extent, Aux); 2066 end Initialize_152; 2067 2068 -------------------- 2069 -- Initialize_153 -- 2070 -------------------- 2071 2072 procedure Initialize_153 (Extent : AMF.Internals.AMF_Extent) is 2073 Aux : AMF.Internals.CMOF_Element; 2074 2075 begin 2076 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 2077 AMF.Internals.Extents.Internal_Append (Extent, Aux); 2078 end Initialize_153; 2079 2080 -------------------- 2081 -- Initialize_154 -- 2082 -------------------- 2083 2084 procedure Initialize_154 (Extent : AMF.Internals.AMF_Extent) is 2085 Aux : AMF.Internals.CMOF_Element; 2086 2087 begin 2088 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 2089 AMF.Internals.Extents.Internal_Append (Extent, Aux); 2090 end Initialize_154; 2091 2092 -------------------- 2093 -- Initialize_155 -- 2094 -------------------- 2095 2096 procedure Initialize_155 (Extent : AMF.Internals.AMF_Extent) is 2097 Aux : AMF.Internals.CMOF_Element; 2098 2099 begin 2100 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 2101 AMF.Internals.Extents.Internal_Append (Extent, Aux); 2102 end Initialize_155; 2103 2104 -------------------- 2105 -- Initialize_156 -- 2106 -------------------- 2107 2108 procedure Initialize_156 (Extent : AMF.Internals.AMF_Extent) is 2109 Aux : AMF.Internals.CMOF_Element; 2110 2111 begin 2112 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 2113 AMF.Internals.Extents.Internal_Append (Extent, Aux); 2114 end Initialize_156; 2115 2116 -------------------- 2117 -- Initialize_157 -- 2118 -------------------- 2119 2120 procedure Initialize_157 (Extent : AMF.Internals.AMF_Extent) is 2121 Aux : AMF.Internals.CMOF_Element; 2122 2123 begin 2124 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 2125 AMF.Internals.Extents.Internal_Append (Extent, Aux); 2126 end Initialize_157; 2127 2128 -------------------- 2129 -- Initialize_158 -- 2130 -------------------- 2131 2132 procedure Initialize_158 (Extent : AMF.Internals.AMF_Extent) is 2133 Aux : AMF.Internals.CMOF_Element; 2134 2135 begin 2136 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 2137 AMF.Internals.Extents.Internal_Append (Extent, Aux); 2138 end Initialize_158; 2139 2140 -------------------- 2141 -- Initialize_159 -- 2142 -------------------- 2143 2144 procedure Initialize_159 (Extent : AMF.Internals.AMF_Extent) is 2145 Aux : AMF.Internals.CMOF_Element; 2146 2147 begin 2148 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 2149 AMF.Internals.Extents.Internal_Append (Extent, Aux); 2150 end Initialize_159; 2151 2152 -------------------- 2153 -- Initialize_160 -- 2154 -------------------- 2155 2156 procedure Initialize_160 (Extent : AMF.Internals.AMF_Extent) is 2157 Aux : AMF.Internals.CMOF_Element; 2158 2159 begin 2160 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 2161 AMF.Internals.Extents.Internal_Append (Extent, Aux); 2162 end Initialize_160; 2163 2164 -------------------- 2165 -- Initialize_161 -- 2166 -------------------- 2167 2168 procedure Initialize_161 (Extent : AMF.Internals.AMF_Extent) is 2169 Aux : AMF.Internals.CMOF_Element; 2170 2171 begin 2172 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 2173 AMF.Internals.Extents.Internal_Append (Extent, Aux); 2174 end Initialize_161; 2175 2176 -------------------- 2177 -- Initialize_162 -- 2178 -------------------- 2179 2180 procedure Initialize_162 (Extent : AMF.Internals.AMF_Extent) is 2181 Aux : AMF.Internals.CMOF_Element; 2182 2183 begin 2184 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 2185 AMF.Internals.Extents.Internal_Append (Extent, Aux); 2186 end Initialize_162; 2187 2188 -------------------- 2189 -- Initialize_163 -- 2190 -------------------- 2191 2192 procedure Initialize_163 (Extent : AMF.Internals.AMF_Extent) is 2193 Aux : AMF.Internals.CMOF_Element; 2194 2195 begin 2196 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 2197 AMF.Internals.Extents.Internal_Append (Extent, Aux); 2198 end Initialize_163; 2199 2200 -------------------- 2201 -- Initialize_164 -- 2202 -------------------- 2203 2204 procedure Initialize_164 (Extent : AMF.Internals.AMF_Extent) is 2205 Aux : AMF.Internals.CMOF_Element; 2206 2207 begin 2208 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 2209 AMF.Internals.Extents.Internal_Append (Extent, Aux); 2210 end Initialize_164; 2211 2212 -------------------- 2213 -- Initialize_165 -- 2214 -------------------- 2215 2216 procedure Initialize_165 (Extent : AMF.Internals.AMF_Extent) is 2217 Aux : AMF.Internals.CMOF_Element; 2218 2219 begin 2220 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 2221 AMF.Internals.Extents.Internal_Append (Extent, Aux); 2222 end Initialize_165; 2223 2224 -------------------- 2225 -- Initialize_166 -- 2226 -------------------- 2227 2228 procedure Initialize_166 (Extent : AMF.Internals.AMF_Extent) is 2229 Aux : AMF.Internals.CMOF_Element; 2230 2231 begin 2232 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 2233 AMF.Internals.Extents.Internal_Append (Extent, Aux); 2234 end Initialize_166; 2235 2236 -------------------- 2237 -- Initialize_167 -- 2238 -------------------- 2239 2240 procedure Initialize_167 (Extent : AMF.Internals.AMF_Extent) is 2241 Aux : AMF.Internals.CMOF_Element; 2242 2243 begin 2244 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 2245 AMF.Internals.Extents.Internal_Append (Extent, Aux); 2246 end Initialize_167; 2247 2248 -------------------- 2249 -- Initialize_168 -- 2250 -------------------- 2251 2252 procedure Initialize_168 (Extent : AMF.Internals.AMF_Extent) is 2253 Aux : AMF.Internals.CMOF_Element; 2254 2255 begin 2256 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 2257 AMF.Internals.Extents.Internal_Append (Extent, Aux); 2258 end Initialize_168; 2259 2260 -------------------- 2261 -- Initialize_169 -- 2262 -------------------- 2263 2264 procedure Initialize_169 (Extent : AMF.Internals.AMF_Extent) is 2265 Aux : AMF.Internals.CMOF_Element; 2266 2267 begin 2268 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 2269 AMF.Internals.Extents.Internal_Append (Extent, Aux); 2270 end Initialize_169; 2271 2272 -------------------- 2273 -- Initialize_170 -- 2274 -------------------- 2275 2276 procedure Initialize_170 (Extent : AMF.Internals.AMF_Extent) is 2277 Aux : AMF.Internals.CMOF_Element; 2278 2279 begin 2280 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 2281 AMF.Internals.Extents.Internal_Append (Extent, Aux); 2282 end Initialize_170; 2283 2284 -------------------- 2285 -- Initialize_171 -- 2286 -------------------- 2287 2288 procedure Initialize_171 (Extent : AMF.Internals.AMF_Extent) is 2289 Aux : AMF.Internals.CMOF_Element; 2290 2291 begin 2292 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 2293 AMF.Internals.Extents.Internal_Append (Extent, Aux); 2294 end Initialize_171; 2295 2296 -------------------- 2297 -- Initialize_172 -- 2298 -------------------- 2299 2300 procedure Initialize_172 (Extent : AMF.Internals.AMF_Extent) is 2301 Aux : AMF.Internals.CMOF_Element; 2302 2303 begin 2304 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 2305 AMF.Internals.Extents.Internal_Append (Extent, Aux); 2306 end Initialize_172; 2307 2308 -------------------- 2309 -- Initialize_173 -- 2310 -------------------- 2311 2312 procedure Initialize_173 (Extent : AMF.Internals.AMF_Extent) is 2313 Aux : AMF.Internals.CMOF_Element; 2314 2315 begin 2316 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 2317 AMF.Internals.Extents.Internal_Append (Extent, Aux); 2318 end Initialize_173; 2319 2320 -------------------- 2321 -- Initialize_174 -- 2322 -------------------- 2323 2324 procedure Initialize_174 (Extent : AMF.Internals.AMF_Extent) is 2325 Aux : AMF.Internals.CMOF_Element; 2326 2327 begin 2328 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 2329 AMF.Internals.Extents.Internal_Append (Extent, Aux); 2330 end Initialize_174; 2331 2332 -------------------- 2333 -- Initialize_175 -- 2334 -------------------- 2335 2336 procedure Initialize_175 (Extent : AMF.Internals.AMF_Extent) is 2337 Aux : AMF.Internals.CMOF_Element; 2338 2339 begin 2340 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 2341 AMF.Internals.Extents.Internal_Append (Extent, Aux); 2342 end Initialize_175; 2343 2344 -------------------- 2345 -- Initialize_176 -- 2346 -------------------- 2347 2348 procedure Initialize_176 (Extent : AMF.Internals.AMF_Extent) is 2349 Aux : AMF.Internals.CMOF_Element; 2350 2351 begin 2352 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 2353 AMF.Internals.Extents.Internal_Append (Extent, Aux); 2354 end Initialize_176; 2355 2356 -------------------- 2357 -- Initialize_177 -- 2358 -------------------- 2359 2360 procedure Initialize_177 (Extent : AMF.Internals.AMF_Extent) is 2361 Aux : AMF.Internals.CMOF_Element; 2362 2363 begin 2364 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 2365 AMF.Internals.Extents.Internal_Append (Extent, Aux); 2366 end Initialize_177; 2367 2368 -------------------- 2369 -- Initialize_178 -- 2370 -------------------- 2371 2372 procedure Initialize_178 (Extent : AMF.Internals.AMF_Extent) is 2373 Aux : AMF.Internals.CMOF_Element; 2374 2375 begin 2376 Aux := AMF.Internals.Tables.CMOF_Constructors.Create_CMOF_Property; 2377 AMF.Internals.Extents.Internal_Append (Extent, Aux); 2378 end Initialize_178; 2379 2380end AMF.Internals.Tables.OCL_Metamodel.Objects; 2381