src/Quantity/Quantity.cdl

   1 -- Created on: 1994-02-08
   2 -- Created by: Gilles DEBARBOUILLE
   3 -- Copyright (c) 1994-1999 Matra Datavision
   4 -- Copyright (c) 1999-2014 OPEN CASCADE SAS
   5 --
   6 -- This file is part of Open CASCADE Technology software library.
   7 --
   8 -- This library is free software; you can redistribute it and/or modify it under
   9 -- the terms of the GNU Lesser General Public License version 2.1 as published
  10 -- by the Free Software Foundation, with special exception defined in the file
  11 -- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
  12 -- distribution for complete text of the license and disclaimer of any warranty.
  13 --
  14 -- Alternatively, this file may be used under the terms of Open CASCADE
  15 -- commercial license or contractual agreement.
  16
  17 package Quantity
  18
  19         ---Purpose: The Quantities component deals with
  20         -- mathematical and physical quantities.
  21         -- A mathematical quantity is characterized by its value. It is a real value.
  22         -- A physical quantity is characterized by:
  23         -- -   its value, which is also a real value, and
  24         -- -   the unit in which it is expressed. This unit may
  25         --   be either an international unit complying with
  26         --   the International Unit System (SI) or a user
  27         --   defined unit. The unit is managed by the
  28         --   physical quantity user.
  29         --  Each mathematical or physical quantity is
  30         -- described by its name. This ensures distinction
  31         -- between two different quantities.
  32         -- Moreover, both physical and mathematical
  33         -- quantities are also manipulated as real values:
  34         -- -   They are defined as aliases of reals, so all
  35         --   functions provided by the Standard_Real
  36         --   class are available on each quantity.
  37         -- -   You may also mix several physical quantities
  38         --   in a mathematical or physical formula involving real values.
  39         -- Associated with the physical quantities, a range
  40         -- of functions provides tools to manage unit conversions.
  41         -- The physical quantities described in this chapter
  42         -- are commonly used basic physical quantities.
  43         -- Nevertheless, the Quantity package includes all
  44         -- physical quantities you may require.
  45         -- The Quantities component also provides
  46         -- resources to manage time information (dates and
  47         -- periods) and color definition.
  48
  49   uses Standard,
  50        TCollection
  51
  52 is
  53          -------------------------------
  54          -------------------------------
  55
  56          alias Scalaire is Real;
  57                ---Purpose:          Mathematical quantities.
  58
  59          alias Parameter is Real;
  60                ---Purpose:
  61          ---Category:  Mathematical quantities.
  62
  63          alias Quotient is Real;
  64                ---Purpose:
  65          ---Category:  Mathematical quantities.
  66
  67          alias Ratio is Real;
  68                ---Purpose:
  69          ---Category:  Mathematical quantities.
  70
  71          alias Coefficient is Real;
  72                ---Purpose:
  73          ---Category:  Mathematical quantities.
  74
  75          alias Factor is Real;
  76                ---Purpose:
  77          ---Category:  Mathematical quantities.
  78
  79          alias Index is Real;
  80                ---Purpose:
  81          ---Category:  Mathematical quantities.
  82
  83          alias Constant is Real;
  84                ---Purpose:
  85          ---Category:  Mathematical quantities.
  86
  87          alias Content is Real;
  88                ---Purpose:
  89          ---Category:  Mathematical quantities.
  90
  91          alias Rate is Real;
  92                ---Purpose:
  93          ---Category:  Mathematical quantities.
  94
  95          alias Normality is Real;
  96          ---Category:  Mathematical quantities.
  97                ---Purpose:
  98
  99
 100
 101          alias Mass is Real;
 102                ---Purpose:
 103                -- Defined as a quantity of matter. Gives rise to the
 104                -- inertial and gravitational properties of a body.
 105                -- It is measured in kilograms.
 106          ---Category:  Physical quantities.
 107
 108          alias PlaneAngle is Real;
 109                ---Purpose:
 110                -- Defined as a difference in direction.
 111                -- It is measured in radians.
 112          ---Category:  Physical quantities.
 113
 114          alias SolidAngle is Real;
 115                ---Purpose:
 116                -- Defined as an angle formed by three or more planes.
 117                -- It is measured in steradians.
 118          ---Category:  Physical quantities.
 119
 120          alias Length is Real;
 121                ---Purpose:
 122                -- Defined as spatial extension.
 123                -- It is measured in metres.
 124          ---Category:  Physical quantities.
 125
 126          alias Area is Real;
 127                ---Purpose:
 128                -- Defined as superficial extension.
 129                -- It is measured in square metres.
 130          ---Category:  Physical quantities.
 131
 132          alias Volume is Real;
 133                ---Purpose:
 134                -- Defined as an extension in three dimensions.
 135                -- It is measured in cubic metres.
 136          ---Category:  Physical quantities.
 137
 138          alias Speed is Real;
 139                ---Purpose:
 140                -- Defined as distance covered per unit time.
 141                -- It is measured in metres per second.
 142          ---Category:  Physical quantities.
 143
 144          alias Velocity is Real;
 145                ---Purpose:
 146                -- Defined as distance covered per unit time in a
 147                -- given direction. It is a vector quantity.
 148                -- It is measured in metres per second.
 149          ---Category:  Physical quantities.
 150
 151          alias Acceleration is Real;
 152                ---Purpose:
 153                -- Defined as the change of velocity per unit time.
 154                -- It is a vector quantity.
 155                -- It is measured in metres per second per second.
 156          ---Category:  Physical quantities.
 157
 158          alias AngularVelocity is Real;
 159                ---Purpose:
 160                -- Defined as the rate at which a body moves around an axis.
 161                -- It is quantified as change in direction per unit time.
 162                -- It is measured in radians per second.
 163          ---Category:  Physical quantities.
 164
 165          alias Frequency is Real;
 166                ---Purpose:
 167                -- Defined as the number of oscillations per unit time.
 168                -- It is measured in cycles per second.
 169          ---Category:  Physical quantities.
 170
 171          alias Temperature is Real;
 172                ---Purpose:
 173                -- Defined as a measure of the average kinetic energy
 174                -- of the molecules in a body.
 175                -- It is measured in degrees kelvin.
 176          ---Category:  Physical quantities.
 177
 178          alias AmountOfSubstance is Real;
 179                ---Purpose:
 180                -- Defined as a dimensionless quantity proportional to
 181                -- the number of specified particles of a substance.
 182                -- Amount of substance is measured in moles.
 183                -- For all substances the number of molecules in a mole
 184                -- is given by Avogadro's Constant.
 185          ---Category:  Physical quantities.
 186
 187          alias Density is Real;
 188                ---Purpose:
 189                -- Defined as mass per unit volume.
 190                -- It is measured in kilograms per cubic metre.
 191          ---Category:  Physical quantities.
 192
 193          alias MassFlow is Real;
 194                ---Purpose:
 195                -- Defined as mass per unit time.
 196                -- It is measured in kilograms per second.
 197          ---Category:  Physical quantities.
 198
 199          alias VolumeFlow is Real;
 200                ---Purpose:
 201                -- Defined as volume per unit time.
 202                -- It is measured in cubic metres per second.
 203          ---Category:  Physical quantities.
 204
 205          alias Consumption is Real;
 206                ---Purpose:
 207                -- Defined as a measure of fuel used per unit distance
 208                -- travelled, or distance travelled per unit of fuel.
 209                -- It is measured in litres per 100 kilometres or in
 210                -- miles per gallon (UK or US).
 211          ---Category:  Physical quantities.
 212
 213          alias Momentum is Real;
 214                ---Purpose:
 215                -- Defined as the product of mass and velocity.
 216                -- It is a vector quantity.
 217                -- It is measured in kilogram-metres per second.
 218          ---Category:  Physical quantities.
 219
 220          alias KineticMoment is Real;
 221                ---Purpose:
 222                -- Defined as the product of momentum of a body
 223                -- and the distance of its centre of gravity from an axis.
 224                -- It is measured in kilogram-square-metres per second.
 225          ---Category:  Physical quantities.
 226
 227          alias MomentOfInertia is Real;
 228                ---Purpose:
 229                -- Defined as the product of the mass of a body
 230                -- and the square of the distance of its centre of gravity
 231                -- from an axis.
 232                -- It is measured in kilogram-square-metres.
 233          ---Category:  Physical quantities.
 234
 235          alias Force is Real;
 236                ---Purpose:
 237                -- Defined as the product of the mass of a body
 238                -- and the acceleration that the force produces.
 239                -- It is a vector quantity.
 240                -- It is measured in newtons.
 241          ---Category:  Physical quantities.
 242
 243          alias MomentOfAForce is Real;
 244                ---Purpose:
 245                -- Defined as the product of a force and the
 246                -- perpendicular distance to an axis.
 247                -- It is measured in newtons x metres.
 248          ---Category:  Physical quantities.
 249
 250          alias Torque is Real;
 251                ---Purpose:
 252                -- Defined as the product of a force and the
 253                -- perpendicular distance to an axis or as the
 254                -- the product of a force couple.
 255                -- It is measured in newtons x metres.
 256          ---Category:  Physical quantities.
 257
 258          alias Weight is Real;
 259                ---Purpose:
 260                -- Defined as the force of gravitation acting on a body
 261                -- near to the surface of the Earth or other planet.
 262                -- It is quantified as the product of the mass of the body
 263                -- and the local value of the acceleration of free fall.
 264                -- It is measured in newtons.
 265          ---Category:  Physical quantities.
 266
 267          alias Pressure is Real;
 268                ---Purpose:
 269                -- Defined as the force perpendicular to a
 270                -- unit area. In a fluid it is defined as the product
 271                -- of the depth, density, and free fall acceleration.
 272                -- It is measured in pascals (newtons per square metre).
 273          ---Category:  Physical quantities.
 274
 275          alias Viscosity is Real;
 276                ---Purpose:
 277                -- Defined as the resistance to flow in a fluid.
 278                -- It is quantified as the product of pressure
 279                -- and time. For a liquid it generally decreases with
 280                -- temperature; for a gas it increases.
 281                -- It is measured in pascal-seconds.
 282          ---Category:  Physical quantities.
 283
 284          alias KinematicViscosity is Real;
 285                ---Purpose:
 286                -- Defined as the ratio of the dynamic viscosity
 287                -- to the fluid density. Used in modifying the motion of a
 288                -- perfect fluid to include terms due to a real fluid.
 289                -- It is quantified as area per unit time.
 290                -- It is measured in square metres per second.
 291          ---Category:  Physical quantities.
 292
 293          alias Energy is Real;
 294                ---Purpose:
 295                -- Defined as the capacity of a system to do work.
 296                -- In mechanical terms this can be quantified as the
 297                -- product of a force and a distance moved by its point of
 298                -- application.
 299                -- In kinetic terms it is the product of half the mass
 300                -- and the square of the speed .
 301                -- In a rotating system it is the product of half the
 302                -- moment of inertia and the square of the angular velocity.
 303                -- In potential terms it is the product of a mass,
 304                -- a height, and the free fall acceleration.
 305                -- In molecular terms it is the sum of the kinetic and
 306                -- potential energies of the molecules.
 307                -- In electric terms it is the product of charge and
 308                -- the electric potential traversed.
 309                -- In relativistic terms it is the difference between
 310                -- the observed mass and the rest mass of a body multiplied
 311                -- by the square of the speed of light.
 312                -- It is measured in joules (newton-metres).
 313          ---Category:  Physical quantities.
 314
 315          alias Work is Real;
 316                ---Purpose:
 317                -- In mechanics, the product of a force and the distance
 318                -- moved. In a rotating system, the product of the torque
 319                -- and the angular displacement. In a pressure system,
 320                -- the product of the pressure and the change in volume.
 321                -- In electrical terms, the product of a charge and the
 322                -- potential difference it traverses.
 323                -- It is measured in joules (newton-metres).
 324          ---Category:  Physical quantities.
 325
 326          alias Power is Real;
 327                ---Purpose:
 328                -- Defined as the rate of expending energy or doing work.
 329                -- In mechanical terms it is the product of a force and
 330                -- the distance it moves per unit time.
 331                -- In electrical terms it is the product of the voltage
 332                -- and the current. For AC the root-mean-square values
 333                -- are multiplied by the cosine of the phase angle.
 334                -- It is measured in watts (joules per second).
 335          ---Category:  Physical quantities.
 336
 337          alias SurfaceTension is Real;
 338                ---Purpose:
 339                -- Defined as the force required to hold unit length
 340                -- of a plane liquid surface.
 341                -- It is measured in newtons per metre.
 342          ---Category:  Physical quantities.
 343
 344          alias CoefficientOfExpansion is Real;
 345                ---Purpose:
 346                -- Defined as the proportional change in the length,
 347                -- area, or volume of a solid per degree of temperature.
 348                -- For a liquid the expansion of the container must be
 349                -- taken into account.
 350                -- For a gas there are coefficients for constant pressure
 351                -- and constant volume changes.
 352                -- It is measured in units of reciprocal degree kelvin.
 353          ---Category:  Physical quantities.
 354
 355          alias ThermalConductivity is Real;
 356                ---Purpose:
 357                -- Defined as the rate at which heat passes through an
 358                -- area inside a body. Quantified as work per unit time
 359                -- per unit length per unit of temperature.
 360                -- It is measured in watts per metre per degee kelvin.
 361          ---Category:  Physical quantities.
 362
 363          alias SpecificHeatCapacity is Real;
 364                ---Purpose:
 365                -- Defined as the quantity of heat required to raise
 366                -- unit mass by one degree temperature. For a gas
 367                -- there are two values: one at constant pressure, the
 368                -- other at constant volume. Their ratio is linked to the
 369                -- speed of sound in the gas and to the number of
 370                -- degrees of freedom of the molecules.
 371                -- It is quantified as energy per unit mass per
 372                -- degree of temperature.
 373                -- It is measured in joules per kilogram per degree
 374                -- kelvin.
 375          ---Category:  Physical quantities.
 376
 377          alias Entropy is Real;
 378                ---Purpose:
 379                -- Defined as a property which changes as a system undergoes
 380                -- reversible change. The change in entropy is quantified as
 381                -- the change in energy per degree of temperature. All real
 382                -- changes are at least partially irreversible so entropy
 383                -- is increased by change. Entropy can be viewed as a
 384                -- measure of the molecular disorder of a system, or as the
 385                -- unavailability of its internal energy to do work in a
 386                -- cyclical process.
 387                -- A change in entropy is measured in joules per degree kelvin.
 388          ---Category:  Physical quantities.
 389
 390          alias Enthalpy is Real;
 391                ---Purpose:
 392                -- Defined as the sum of the internal energy of a system plus
 393                -- the product of its pressure and volume. For a reversible
 394                -- process at constant pressure the change in enthalpy is
 395                -- equal to the quantity of heat absorbed (or lost).
 396                -- It is measured in joules.
 397          ---Category:  Physical quantities.
 398
 399          alias LuminousIntensity is Real;
 400                ---Purpose:
 401                -- Defined as the luminous flux emitted per unit solid
 402                -- angle in a given direction by a point source.
 403                -- It is measured in candelas.
 404          ---Category:  Physical quantities.
 405
 406          alias LuminousFlux is Real;
 407                ---Purpose:
 408                -- Defined as the rate of flow of radiant energy as evaluated
 409                -- by the luminous sensation it produces. This means it
 410                -- depends on the sensitivity of the receptor or observer. It
 411                -- is related to the radiant flux of the source by the
 412                -- spectral luminous efficiency.
 413                -- It is measured in lumens.
 414          ---Category:  Physical quantities.
 415
 416          alias Luminance is Real;
 417                ---Purpose:
 418                -- It is defined the luminous flux per unit area per unit
 419                -- solid angle.
 420                -- It is measured in candelas per square metre.
 421          ---Category:  Physical quantities.
 422
 423          alias Illuminance is Real;
 424                ---Purpose:
 425                -- Defined as the incident luminous flux per unit area.
 426                -- It is measured in lux (lumen per square metre).
 427          ---Category:  Physical quantities.
 428
 429          alias LuminousExposition is Real;
 430                ---Purpose:
 431                -- Defined as the quantity of illuminance with time.
 432                -- It is measured in lux-seconds.
 433          ---Category:  Physical quantities.
 434
 435          alias LuminousEfficacity is Real;
 436                ---Purpose:
 437                -- Defined as the ratio of luminous flux emitted by a
 438                -- source to the power it consumes.
 439                -- It is measured in lumens per watt.
 440          ---Category:  Physical quantities.
 441
 442          alias ElectricCharge is Real;
 443                ---Purpose:
 444                -- Defined as a property of elementary particles. It is
 445                -- more commonly viewed as the product of electric current
 446                -- and time.
 447                -- It is measured in coulombs (ampere-second).
 448          ---Category:  Physical quantities.
 449
 450          alias ElectricCurrent is Real;
 451                ---Purpose:
 452                -- Defined as the amount of charge flowing per unit time.
 453                -- It is measured in amperes (coulombs per second).
 454          ---Category:  Physical quantities.
 455
 456          alias ElectricFieldStrength is Real;
 457                ---Purpose:
 458                -- Defined as the force exerted on a unit charge at a
 459                -- given point in space.
 460                -- It is measured in volts per metre.
 461          ---Category:  Physical quantities.
 462
 463          alias ElectricPotential is Real;
 464                ---Purpose:
 465                -- Defined as the work done in bringing unit positive
 466                -- charge from infinity to the point.
 467                -- It is measured in volts.
 468                -- Volts are in practice used to measure differences
 469                -- in potential e.g. the electromotive force generated when
 470                -- a conductor cuts a magnetic field.
 471          ---Category:  Physical quantities.
 472
 473          alias ElectricCapacitance is Real;
 474                ---Purpose:
 475                -- Defined for a capacitor as the ratio of the charge on
 476                -- either conductor to the potential between them.
 477                -- It is measured in farads (coulomb per volt).
 478          ---Category:  Physical quantities.
 479
 480          alias MagneticFlux is Real;
 481                ---Purpose:
 482                -- Defined as the product of a given area and the
 483                -- average magnetic flux density normal to it.
 484                -- It is measured in webers (tesla-square-metre).
 485          ---Category:  Physical quantities.
 486
 487          alias MagneticFluxDensity is Real;
 488                ---Purpose:
 489                -- Defined as the magnetic flux passing through unit area
 490                -- of a magnetic field normal to the magnetic force.
 491                -- It is a vector quantity, the product of the permeability
 492                -- and the magnetic field strength and with a direction at any
 493                -- given point the same as that of the magnetic field.
 494                -- It is measured in teslas (webers per square metre).
 495          ---Category:  Physical quantities.
 496
 497          alias MagneticFieldStrength is Real;
 498                ---Purpose:
 499                -- Described as a vector quantity, it is the ratio of the
 500                -- magnetic flux density to the permeability of the medium.
 501                -- Its integral along a closed line is equal to the
 502                -- magnetomotive force.
 503                -- It is measured in amperes per metre.
 504          ---Category:  Physical quantities.
 505
 506          alias Reluctance is Real;
 507                ---Purpose:
 508                -- Defined as the ratio of the magnetomotive force applied
 509                -- to a magnetic circuit to the magnetic flux in the circuit.
 510                -- It is measured in reciprocal henrys.
 511                -- Its reciprocal is permanence.
 512          ---Category:  Physical quantities.
 513
 514          alias Resistance is Real;
 515                ---Purpose:
 516                -- Defined as the ratio of the potential difference
 517                -- across a conductor to the current flowing through it.
 518                -- It is measured in ohms.
 519          ---Category:  Physical quantities.
 520
 521          alias Inductance is Real;
 522                ---Purpose:
 523                -- Defined as numerically equal to the electromotive force
 524                -- induced when the current in a circuit changes at
 525                -- unit rate.
 526                -- It is measured in henrys (webers per ampere).
 527          ---Category:  Physical quantities.
 528
 529          alias Capacitance is Real;
 530                ---Purpose:
 531                -- Defined as a measure of the increase in voltage on
 532                -- an isolated conductor by the addition of a charge.
 533                -- for two isolated conductors, it is the ratio of the charge
 534                -- on either conductor to the potential difference between
 535                -- them.
 536                -- It is measured in farads (coulomb per volt).
 537                -- In practice micro-, nano-, and pico-farads are used.
 538          ---Category:  Physical quantities.
 539
 540          alias Impedance is Real;
 541                ---Purpose:
 542                -- Defined as the total opposition to the flow of current
 543                -- in a circuit. Includes the contributions of resistance,
 544                -- inductance, and capacitance.
 545                -- It is measured in Ohms.
 546          ---Category:  Physical quantities.
 547
 548          alias Admittance is Real;
 549                ---Purpose:
 550                -- Defined as the reciprocal of impedance.
 551                -- It is measured in Siemens (reciprocal Ohms).
 552                -- The square of the admittance is equal to the sum of the
 553                -- squares of the conductance and the susceptance.
 554          ---Category:  Physical quantities.
 555
 556          alias Resistivity is Real;
 557                ---Purpose:
 558                -- Defined as the resistance of a conductor of unit
 559                -- cross-section per unit length.
 560                -- It is measured in Ohm-metres.
 561                -- It is the reciprocal of the conductivity.
 562          ---Category:  Physical quantities.
 563
 564          alias Conductivity is Real;
 565                ---Purpose:
 566                -- Defined as the current density divided by the electrical
 567                -- field strength. It is also the reciprocal of resistivity.
 568                -- It is measured in Siemens per metre.
 569          ---Category:  Physical quantities.
 570
 571          alias MolarMass is Real;
 572                ---Purpose:
 573                -- Defined as the mass of a given substance contained in one
 574                -- mole. One mole of any substance contains Avogadro's
 575                -- Constant of molecules.
 576                -- It is measured in kilograms per mole.
 577          ---Category:  Physical quantities.
 578
 579          alias MolarVolume is Real;
 580                ---Purpose:
 581                -- Defined as the volume occupied by one mole of substance.
 582                -- One mole of any substance contains Avogadro's
 583                -- Constant of molecules.
 584                -- It is measured in cubic metres per mole.
 585          ---Category:  Physical quantities.
 586
 587          alias Concentration is Real;
 588                ---Purpose:
 589                -- Defined as the strength of a mixture or solution. It can
 590                -- be measured as kilograms per litre of solvent or of
 591                -- solution. For certain purposes percentage by weight or
 592                -- volume can be used, and parts per million (ppm) is used
 593                -- for trace elements.
 594          ---Category:  Physical quantities.
 595
 596          alias MolarConcentration is Real;
 597                ---Purpose:
 598                -- Defined as the concentration in moles per litre of
 599                -- solution. It is also called molarity.
 600          ---Category:  Physical quantities.
 601
 602          alias Molarity is Real;
 603                ---Purpose:
 604                -- Defined as the concentration in moles per kilogram of
 605                -- solvent.
 606          ---Category:  Physical quantities.
 607
 608          alias SoundIntensity is Real;
 609                ---Purpose:
 610                -- Defined as the rate of flow of sound energy through
 611                -- a unit area normal to the flow. It is quantified as the
 612                -- square of the root-mean-square sound pressure, divided by
 613                -- the density of the medium and by the speed of sound.
 614                -- It is measured in watts per square metre.
 615          ---Category:  Physical quantities.
 616
 617          alias AcousticIntensity is Real;
 618                ---Purpose:
 619                -- Defined as a dimensionless comparison of sound pressure
 620                -- levels. The conventional unit, the bel, is the base ten
 621                -- logarithm of the ratio of the two pressures. In practice
 622                -- the decibel (one tenth of a bel) is used.
 623          ---Category:  Physical quantities.
 624
 625          alias Activity is Real;
 626                ---Purpose:
 627                -- Defined as the number of atoms of a radioactive
 628                -- substance which disintegrate per unit time. It is
 629                -- measured in becquerels (one disintegration per second).
 630          ---Category:  Physical quantities.
 631
 632          alias AbsorbedDose is Real;
 633                ---Purpose:
 634                -- Defined as the energy absorbed per unit mass in an
 635                -- irradiated medium.
 636                -- It is measured in grays.
 637          ---Category:  Physical quantities.
 638
 639          alias DoseEquivalent is Real;
 640                ---Purpose:
 641                -- Defined as the product of the absorbed dose and a
 642                -- quality factor related to the effect of a particular
 643                -- type of radiation on biological tissue.
 644                -- It is measured in sieverts.
 645          ---Category:  Physical quantities.
 646
 647 --       alias OpticalPower
 648                ---Purpose:
 649                -- Defined as the power of a lens. It is quantified
 650                -- as the reciprocal of the focal length.
 651                -- It is measured in dioptres (reciprocal metres).
 652          ---Category:  Physical quantities.
 653
 654
 655
 656          exception DateDefinitionError    inherits DomainError;
 657          exception PeriodDefinitionError  inherits DomainError;
 658          exception ColorDefinitionError   inherits DomainError;
 659
 660
 661          class Date;
 662
 663          class Period;
 664
 665          class Color;
 666
 667          class Convert;
 668
 669
 670         imported Array1OfCoefficient;
 671         ---Category: Instantiated classes
 672
 673         imported Array2OfColor;
 674         ---Category: Instantiated classes
 675
 676         imported Array1OfColor;
 677         ---Category: Instantiated classes
 678
 679         imported transient class HArray1OfColor;
 680         ---Category: Instantiated classes
 681
 682
 683
 684         enumeration PhysicalQuantity is MASS,
 685                                         PLANEANGLE,
 686                                         SOLIDANGLE,
 687                                         LENGTH,
 688                                         AREA,
 689                                         VOLUME,
 690                                         SPEED,
 691                                         VELOCITY,
 692                                         ACCELERATION,
 693                                         ANGULARVELOCITY,
 694                                         FREQUENCY,
 695                                         TEMPERATURE,
 696                                         AMOUNTOFSUBSTANCE,
 697                                         DENSITY,
 698                                         MASSFLOW,
 699                                         VOLUMEFLOW,
 700                                         CONSUMPTION,
 701                                         MOMENTUM,
 702                                         KINETICMOMENT,
 703                                         MOMENTOFINERTIA,
 704                                         FORCE,
 705                                         MOMENTOFAFORCE,
 706                                         TORQUE,
 707                                         WEIGHT,
 708                                         PRESSURE,
 709                                         VISCOSITY,
 710                                         KINEMATICVISCOSITY,
 711                                         ENERGY,
 712                                         WORK,
 713                                         POWER,
 714                                         SURFACETENSION,
 715                                         COEFFICIENTOFEXPANSION,
 716                                         THERMALCONDUCTIVITY,
 717                                         SPECIFICHEATCAPACITY,
 718                                         ENTROPY,
 719                                         ENTHALPY,
 720                                         LUMINOUSINTENSITY,
 721                                         LUMINOUSFLUX,
 722                                         LUMINANCE,
 723                                         ILLUMINANCE,
 724                                         LUMINOUSEXPOSITION,
 725                                         LUMINOUSEFFICACITY,
 726                                         ELECTRICCHARGE,
 727                                         ELECTRICCURRENT,
 728                                         ELECTRICFIELDSTRENGTH,
 729                                         ELECTRICPOTENTIAL,
 730                                         ELECTRICCAPACITANCE,
 731                                         MAGNETICFLUX,
 732                                         MAGNETICFLUXDENSITY,
 733                                         MAGNETICFIELDSTRENGTH,
 734                                         RELUCTANCE,
 735                                         RESISTANCE,
 736                                         INDUCTANCE,
 737                                         CAPACITANCE,
 738                                         IMPEDANCE,
 739                                         ADMITTANCE,
 740                                         RESISTIVITY,
 741                                         CONDUCTIVITY,
 742                                         MOLARMASS,
 743                                         MOLARVOLUME,
 744                                         CONCENTRATION,
 745                                         MOLARCONCENTRATION,
 746                                         MOLARITY,
 747                                         SOUNDINTENSITY,
 748                                         ACOUSTICINTENSITY,
 749                                         ACTIVITY,
 750                                         ABSORBEDDOSE,
 751                                         DOSEEQUIVALENT
 752 --                                      OPTICALPOWER
 753         end PhysicalQuantity;
 754         ---Purpose: List of all physical quantities(Afnor)
 755
 756
 757
 758         enumeration TypeOfColor is      TOC_RGB,
 759                                         TOC_HLS
 760         end TypeOfColor;
 761
 762         ---Purpose:  Identifies color definition systems
 763         -- -   Quantity_TOC_RGB: with this system a
 764         --   color is defined by its quantities of red, green and blue (R-G-B values).
 765         -- -   Quantity_TOC_HLS: with this system a
 766         --   color is defined by its hue angle and its
 767         --   lightness and saturation values (H-L-S values).
 768         --   A Quantity_Color object may define a color
 769         -- from three values R-G-B or H-L-S according
 770         -- to a given color definition system.
 771
 772         enumeration NameOfColor is      NOC_BLACK,
 773                                         NOC_MATRABLUE,
 774                                         NOC_MATRAGRAY,
 775                                         NOC_ALICEBLUE,
 776                                         NOC_ANTIQUEWHITE,
 777                                         NOC_ANTIQUEWHITE1,
 778                                         NOC_ANTIQUEWHITE2,
 779                                         NOC_ANTIQUEWHITE3,
 780                                         NOC_ANTIQUEWHITE4,
 781                                         NOC_AQUAMARINE1,
 782                                         NOC_AQUAMARINE2,
 783                                         NOC_AQUAMARINE4,
 784                                         NOC_AZURE,
 785                                         NOC_AZURE2,
 786                                         NOC_AZURE3,
 787                                         NOC_AZURE4,
 788                                         NOC_BEIGE,
 789                                         NOC_BISQUE,
 790                                         NOC_BISQUE2,
 791                                         NOC_BISQUE3,
 792                                         NOC_BISQUE4,
 793                                         NOC_BLANCHEDALMOND,
 794                                         NOC_BLUE1,
 795                                         NOC_BLUE2,
 796                                         NOC_BLUE3,
 797                                         NOC_BLUE4,
 798                                         NOC_BLUEVIOLET,
 799                                         NOC_BROWN,
 800                                         NOC_BROWN1,
 801                                         NOC_BROWN2,
 802                                         NOC_BROWN3,
 803                                         NOC_BROWN4,
 804                                         NOC_BURLYWOOD,
 805                                         NOC_BURLYWOOD1,
 806                                         NOC_BURLYWOOD2,
 807                                         NOC_BURLYWOOD3,
 808                                         NOC_BURLYWOOD4,
 809                                         NOC_CADETBLUE,
 810                                         NOC_CADETBLUE1,
 811                                         NOC_CADETBLUE2,
 812                                         NOC_CADETBLUE3,
 813                                         NOC_CADETBLUE4,
 814                                         NOC_CHARTREUSE,
 815                                         NOC_CHARTREUSE1,
 816                                         NOC_CHARTREUSE2,
 817                                         NOC_CHARTREUSE3,
 818                                         NOC_CHARTREUSE4,
 819                                         NOC_CHOCOLATE,
 820                                         NOC_CHOCOLATE1,
 821                                         NOC_CHOCOLATE2,
 822                                         NOC_CHOCOLATE3,
 823                                         NOC_CHOCOLATE4,
 824                                         NOC_CORAL,
 825                                         NOC_CORAL1,
 826                                         NOC_CORAL2,
 827                                         NOC_CORAL3,
 828                                         NOC_CORAL4,
 829                                         NOC_CORNFLOWERBLUE,
 830                                         NOC_CORNSILK1,
 831                                         NOC_CORNSILK2,
 832                                         NOC_CORNSILK3,
 833                                         NOC_CORNSILK4,
 834                                         NOC_CYAN1,
 835                                         NOC_CYAN2,
 836                                         NOC_CYAN3,
 837                                         NOC_CYAN4,
 838                                         NOC_DARKGOLDENROD,
 839                                         NOC_DARKGOLDENROD1,
 840                                         NOC_DARKGOLDENROD2,
 841                                         NOC_DARKGOLDENROD3,
 842                                         NOC_DARKGOLDENROD4,
 843                                         NOC_DARKGREEN,
 844                                         NOC_DARKKHAKI,
 845                                         NOC_DARKOLIVEGREEN,
 846                                         NOC_DARKOLIVEGREEN1,
 847                                         NOC_DARKOLIVEGREEN2,
 848                                         NOC_DARKOLIVEGREEN3,
 849                                         NOC_DARKOLIVEGREEN4,
 850                                         NOC_DARKORANGE,
 851                                         NOC_DARKORANGE1,
 852                                         NOC_DARKORANGE2,
 853                                         NOC_DARKORANGE3,
 854                                         NOC_DARKORANGE4,
 855                                         NOC_DARKORCHID,
 856                                         NOC_DARKORCHID1,
 857                                         NOC_DARKORCHID2,
 858                                         NOC_DARKORCHID3,
 859                                         NOC_DARKORCHID4,
 860                                         NOC_DARKSALMON,
 861                                         NOC_DARKSEAGREEN,
 862                                         NOC_DARKSEAGREEN1,
 863                                         NOC_DARKSEAGREEN2,
 864                                         NOC_DARKSEAGREEN3,
 865                                         NOC_DARKSEAGREEN4,
 866                                         NOC_DARKSLATEBLUE,
 867                                         NOC_DARKSLATEGRAY1,
 868                                         NOC_DARKSLATEGRAY2,
 869                                         NOC_DARKSLATEGRAY3,
 870                                         NOC_DARKSLATEGRAY4,
 871                                         NOC_DARKSLATEGRAY,
 872                                         NOC_DARKTURQUOISE,
 873                                         NOC_DARKVIOLET,
 874                                         NOC_DEEPPINK,
 875                                         NOC_DEEPPINK2,
 876                                         NOC_DEEPPINK3,
 877                                         NOC_DEEPPINK4,
 878                                         NOC_DEEPSKYBLUE1,
 879                                         NOC_DEEPSKYBLUE2,
 880                                         NOC_DEEPSKYBLUE3,
 881                                         NOC_DEEPSKYBLUE4,
 882                                         NOC_DODGERBLUE1,
 883                                         NOC_DODGERBLUE2,
 884                                         NOC_DODGERBLUE3,
 885                                         NOC_DODGERBLUE4,
 886                                         NOC_FIREBRICK,
 887                                         NOC_FIREBRICK1,
 888                                         NOC_FIREBRICK2,
 889                                         NOC_FIREBRICK3,
 890                                         NOC_FIREBRICK4,
 891                                         NOC_FLORALWHITE,
 892                                         NOC_FORESTGREEN,
 893                                         NOC_GAINSBORO,
 894                                         NOC_GHOSTWHITE,
 895                                         NOC_GOLD,
 896                                         NOC_GOLD1,
 897                                         NOC_GOLD2,
 898                                         NOC_GOLD3,
 899                                         NOC_GOLD4,
 900                                         NOC_GOLDENROD,
 901                                         NOC_GOLDENROD1,
 902                                         NOC_GOLDENROD2,
 903                                         NOC_GOLDENROD3,
 904                                         NOC_GOLDENROD4,
 905                                         NOC_GRAY,
 906                                         NOC_GRAY0,
 907                                         NOC_GRAY1,
 908                                         NOC_GRAY10,
 909                                         NOC_GRAY11,
 910                                         NOC_GRAY12,
 911                                         NOC_GRAY13,
 912                                         NOC_GRAY14,
 913                                         NOC_GRAY15,
 914                                         NOC_GRAY16,
 915                                         NOC_GRAY17,
 916                                         NOC_GRAY18,
 917                                         NOC_GRAY19,
 918                                         NOC_GRAY2,
 919                                         NOC_GRAY20,
 920                                         NOC_GRAY21,
 921                                         NOC_GRAY22,
 922                                         NOC_GRAY23,
 923                                         NOC_GRAY24,
 924                                         NOC_GRAY25,
 925                                         NOC_GRAY26,
 926                                         NOC_GRAY27,
 927                                         NOC_GRAY28,
 928                                         NOC_GRAY29,
 929                                         NOC_GRAY3,
 930                                         NOC_GRAY30,
 931                                         NOC_GRAY31,
 932                                         NOC_GRAY32,
 933                                         NOC_GRAY33,
 934                                         NOC_GRAY34,
 935                                         NOC_GRAY35,
 936                                         NOC_GRAY36,
 937                                         NOC_GRAY37,
 938                                         NOC_GRAY38,
 939                                         NOC_GRAY39,
 940                                         NOC_GRAY4,
 941                                         NOC_GRAY40,
 942                                         NOC_GRAY41,
 943                                         NOC_GRAY42,
 944                                         NOC_GRAY43,
 945                                         NOC_GRAY44,
 946                                         NOC_GRAY45,
 947                                         NOC_GRAY46,
 948                                         NOC_GRAY47,
 949                                         NOC_GRAY48,
 950                                         NOC_GRAY49,
 951                                         NOC_GRAY5,
 952                                         NOC_GRAY50,
 953                                         NOC_GRAY51,
 954                                         NOC_GRAY52,
 955                                         NOC_GRAY53,
 956                                         NOC_GRAY54,
 957                                         NOC_GRAY55,
 958                                         NOC_GRAY56,
 959                                         NOC_GRAY57,
 960                                         NOC_GRAY58,
 961                                         NOC_GRAY59,
 962                                         NOC_GRAY6,
 963                                         NOC_GRAY60,
 964                                         NOC_GRAY61,
 965                                         NOC_GRAY62,
 966                                         NOC_GRAY63,
 967                                         NOC_GRAY64,
 968                                         NOC_GRAY65,
 969                                         NOC_GRAY66,
 970                                         NOC_GRAY67,
 971                                         NOC_GRAY68,
 972                                         NOC_GRAY69,
 973                                         NOC_GRAY7,
 974                                         NOC_GRAY70,
 975                                         NOC_GRAY71,
 976                                         NOC_GRAY72,
 977                                         NOC_GRAY73,
 978                                         NOC_GRAY74,
 979                                         NOC_GRAY75,
 980                                         NOC_GRAY76,
 981                                         NOC_GRAY77,
 982                                         NOC_GRAY78,
 983                                         NOC_GRAY79,
 984                                         NOC_GRAY8,
 985                                         NOC_GRAY80,
 986                                         NOC_GRAY81,
 987                                         NOC_GRAY82,
 988                                         NOC_GRAY83,
 989                                         NOC_GRAY85,
 990                                         NOC_GRAY86,
 991                                         NOC_GRAY87,
 992                                         NOC_GRAY88,
 993                                         NOC_GRAY89,
 994                                         NOC_GRAY9,
 995                                         NOC_GRAY90,
 996                                         NOC_GRAY91,
 997                                         NOC_GRAY92,
 998                                         NOC_GRAY93,
 999                                         NOC_GRAY94,
1000                                         NOC_GRAY95,
1001                                         NOC_GREEN,
1002                                         NOC_GREEN1,
1003                                         NOC_GREEN2,
1004                                         NOC_GREEN3,
1005                                         NOC_GREEN4,
1006                                         NOC_GREENYELLOW,
1007                                         NOC_GRAY97,
1008                                         NOC_GRAY98,
1009                                         NOC_GRAY99,
1010                                         NOC_HONEYDEW,
1011                                         NOC_HONEYDEW2,
1012                                         NOC_HONEYDEW3,
1013                                         NOC_HONEYDEW4,
1014                                         NOC_HOTPINK,
1015                                         NOC_HOTPINK1,
1016                                         NOC_HOTPINK2,
1017                                         NOC_HOTPINK3,
1018                                         NOC_HOTPINK4,
1019                                         NOC_INDIANRED,
1020                                         NOC_INDIANRED1,
1021                                         NOC_INDIANRED2,
1022                                         NOC_INDIANRED3,
1023                                         NOC_INDIANRED4,
1024                                         NOC_IVORY,
1025                                         NOC_IVORY2,
1026                                         NOC_IVORY3,
1027                                         NOC_IVORY4,
1028                                         NOC_KHAKI,
1029                                         NOC_KHAKI1,
1030                                         NOC_KHAKI2,
1031                                         NOC_KHAKI3,
1032                                         NOC_KHAKI4,
1033                                         NOC_LAVENDER,
1034                                         NOC_LAVENDERBLUSH1,
1035                                         NOC_LAVENDERBLUSH2,
1036                                         NOC_LAVENDERBLUSH3,
1037                                         NOC_LAVENDERBLUSH4,
1038                                         NOC_LAWNGREEN,
1039                                         NOC_LEMONCHIFFON1,
1040                                         NOC_LEMONCHIFFON2,
1041                                         NOC_LEMONCHIFFON3,
1042                                         NOC_LEMONCHIFFON4,
1043                                         NOC_LIGHTBLUE,
1044                                         NOC_LIGHTBLUE1,
1045                                         NOC_LIGHTBLUE2,
1046                                         NOC_LIGHTBLUE3,
1047                                         NOC_LIGHTBLUE4,
1048                                         NOC_LIGHTCORAL,
1049                                         NOC_LIGHTCYAN1,
1050                                         NOC_LIGHTCYAN2,
1051                                         NOC_LIGHTCYAN3,
1052                                         NOC_LIGHTCYAN4,
1053                                         NOC_LIGHTGOLDENROD,
1054                                         NOC_LIGHTGOLDENROD1,
1055                                         NOC_LIGHTGOLDENROD2,
1056                                         NOC_LIGHTGOLDENROD3,
1057                                         NOC_LIGHTGOLDENROD4,
1058                                         NOC_LIGHTGOLDENRODYELLOW,
1059                                         NOC_LIGHTGRAY,
1060                                         NOC_LIGHTPINK,
1061                                         NOC_LIGHTPINK1,
1062                                         NOC_LIGHTPINK2,
1063                                         NOC_LIGHTPINK3,
1064                                         NOC_LIGHTPINK4,
1065                                         NOC_LIGHTSALMON1,
1066                                         NOC_LIGHTSALMON2,
1067                                         NOC_LIGHTSALMON3,
1068                                         NOC_LIGHTSALMON4,
1069                                         NOC_LIGHTSEAGREEN,
1070                                         NOC_LIGHTSKYBLUE,
1071                                         NOC_LIGHTSKYBLUE1,
1072                                         NOC_LIGHTSKYBLUE2,
1073                                         NOC_LIGHTSKYBLUE3,
1074                                         NOC_LIGHTSKYBLUE4,
1075                                         NOC_LIGHTSLATEBLUE,
1076                                         NOC_LIGHTSLATEGRAY,
1077                                         NOC_LIGHTSTEELBLUE,
1078                                         NOC_LIGHTSTEELBLUE1,
1079                                         NOC_LIGHTSTEELBLUE2,
1080                                         NOC_LIGHTSTEELBLUE3,
1081                                         NOC_LIGHTSTEELBLUE4,
1082                                         NOC_LIGHTYELLOW,
1083                                         NOC_LIGHTYELLOW2,
1084                                         NOC_LIGHTYELLOW3,
1085                                         NOC_LIGHTYELLOW4,
1086                                         NOC_LIMEGREEN,
1087                                         NOC_LINEN,
1088                                         NOC_MAGENTA1,
1089                                         NOC_MAGENTA2,
1090                                         NOC_MAGENTA3,
1091                                         NOC_MAGENTA4,
1092                                         NOC_MAROON,
1093                                         NOC_MAROON1,
1094                                         NOC_MAROON2,
1095                                         NOC_MAROON3,
1096                                         NOC_MAROON4,
1097                                         NOC_MEDIUMAQUAMARINE,
1098                                         NOC_MEDIUMORCHID,
1099                                         NOC_MEDIUMORCHID1,
1100                                         NOC_MEDIUMORCHID2,
1101                                         NOC_MEDIUMORCHID3,
1102                                         NOC_MEDIUMORCHID4,
1103                                         NOC_MEDIUMPURPLE,
1104                                         NOC_MEDIUMPURPLE1,
1105                                         NOC_MEDIUMPURPLE2,
1106                                         NOC_MEDIUMPURPLE3,
1107                                         NOC_MEDIUMPURPLE4,
1108                                         NOC_MEDIUMSEAGREEN,
1109                                         NOC_MEDIUMSLATEBLUE,
1110                                         NOC_MEDIUMSPRINGGREEN,
1111                                         NOC_MEDIUMTURQUOISE,
1112                                         NOC_MEDIUMVIOLETRED,
1113                                         NOC_MIDNIGHTBLUE,
1114                                         NOC_MINTCREAM,
1115                                         NOC_MISTYROSE,
1116                                         NOC_MISTYROSE2,
1117                                         NOC_MISTYROSE3,
1118                                         NOC_MISTYROSE4,
1119                                         NOC_MOCCASIN,
1120                                         NOC_NAVAJOWHITE1,
1121                                         NOC_NAVAJOWHITE2,
1122                                         NOC_NAVAJOWHITE3,
1123                                         NOC_NAVAJOWHITE4,
1124                                         NOC_NAVYBLUE,
1125                                         NOC_OLDLACE,
1126                                         NOC_OLIVEDRAB,
1127                                         NOC_OLIVEDRAB1,
1128                                         NOC_OLIVEDRAB2,
1129                                         NOC_OLIVEDRAB3,
1130                                         NOC_OLIVEDRAB4,
1131                                         NOC_ORANGE,
1132                                         NOC_ORANGE1,
1133                                         NOC_ORANGE2,
1134                                         NOC_ORANGE3,
1135                                         NOC_ORANGE4,
1136                                         NOC_ORANGERED,
1137                                         NOC_ORANGERED1,
1138                                         NOC_ORANGERED2,
1139                                         NOC_ORANGERED3,
1140                                         NOC_ORANGERED4,
1141                                         NOC_ORCHID,
1142                                         NOC_ORCHID1,
1143                                         NOC_ORCHID2,
1144                                         NOC_ORCHID3,
1145                                         NOC_ORCHID4,
1146                                         NOC_PALEGOLDENROD,
1147                                         NOC_PALEGREEN,
1148                                         NOC_PALEGREEN1,
1149                                         NOC_PALEGREEN2,
1150                                         NOC_PALEGREEN3,
1151                                         NOC_PALEGREEN4,
1152                                         NOC_PALETURQUOISE,
1153                                         NOC_PALETURQUOISE1,
1154                                         NOC_PALETURQUOISE2,
1155                                         NOC_PALETURQUOISE3,
1156                                         NOC_PALETURQUOISE4,
1157                                         NOC_PALEVIOLETRED,
1158                                         NOC_PALEVIOLETRED1,
1159                                         NOC_PALEVIOLETRED2,
1160                                         NOC_PALEVIOLETRED3,
1161                                         NOC_PALEVIOLETRED4,
1162                                         NOC_PAPAYAWHIP,
1163                                         NOC_PEACHPUFF,
1164                                         NOC_PEACHPUFF2,
1165                                         NOC_PEACHPUFF3,
1166                                         NOC_PEACHPUFF4,
1167                                         NOC_PERU,
1168                                         NOC_PINK,
1169                                         NOC_PINK1,
1170                                         NOC_PINK2,
1171                                         NOC_PINK3,
1172                                         NOC_PINK4,
1173                                         NOC_PLUM,
1174                                         NOC_PLUM1,
1175                                         NOC_PLUM2,
1176                                         NOC_PLUM3,
1177                                         NOC_PLUM4,
1178                                         NOC_POWDERBLUE,
1179                                         NOC_PURPLE,
1180                                         NOC_PURPLE1,
1181                                         NOC_PURPLE2,
1182                                         NOC_PURPLE3,
1183                                         NOC_PURPLE4,
1184                                         NOC_RED,
1185                                         NOC_RED1,
1186                                         NOC_RED2,
1187                                         NOC_RED3,
1188                                         NOC_RED4,
1189                                         NOC_ROSYBROWN,
1190                                         NOC_ROSYBROWN1,
1191                                         NOC_ROSYBROWN2,
1192                                         NOC_ROSYBROWN3,
1193                                         NOC_ROSYBROWN4,
1194                                         NOC_ROYALBLUE,
1195                                         NOC_ROYALBLUE1,
1196                                         NOC_ROYALBLUE2,
1197                                         NOC_ROYALBLUE3,
1198                                         NOC_ROYALBLUE4,
1199                                         NOC_SADDLEBROWN,
1200                                         NOC_SALMON,
1201                                         NOC_SALMON1,
1202                                         NOC_SALMON2,
1203                                         NOC_SALMON3,
1204                                         NOC_SALMON4,
1205                                         NOC_SANDYBROWN,
1206                                         NOC_SEAGREEN,
1207                                         NOC_SEAGREEN1,
1208                                         NOC_SEAGREEN2,
1209                                         NOC_SEAGREEN3,
1210                                         NOC_SEAGREEN4,
1211                                         NOC_SEASHELL,
1212                                         NOC_SEASHELL2,
1213                                         NOC_SEASHELL3,
1214                                         NOC_SEASHELL4,
1215                                         NOC_BEET,
1216                                         NOC_TEAL,
1217                                         NOC_SIENNA,
1218                                         NOC_SIENNA1,
1219                                         NOC_SIENNA2,
1220                                         NOC_SIENNA3,
1221                                         NOC_SIENNA4,
1222                                         NOC_SKYBLUE,
1223                                         NOC_SKYBLUE1,
1224                                         NOC_SKYBLUE2,
1225                                         NOC_SKYBLUE3,
1226                                         NOC_SKYBLUE4,
1227                                         NOC_SLATEBLUE,
1228                                         NOC_SLATEBLUE1,
1229                                         NOC_SLATEBLUE2,
1230                                         NOC_SLATEBLUE3,
1231                                         NOC_SLATEBLUE4,
1232                                         NOC_SLATEGRAY1,
1233                                         NOC_SLATEGRAY2,
1234                                         NOC_SLATEGRAY3,
1235                                         NOC_SLATEGRAY4,
1236                                         NOC_SLATEGRAY,
1237                                         NOC_SNOW,
1238                                         NOC_SNOW2,
1239                                         NOC_SNOW3,
1240                                         NOC_SNOW4,
1241                                         NOC_SPRINGGREEN,
1242                                         NOC_SPRINGGREEN2,
1243                                         NOC_SPRINGGREEN3,
1244                                         NOC_SPRINGGREEN4,
1245                                         NOC_STEELBLUE,
1246                                         NOC_STEELBLUE1,
1247                                         NOC_STEELBLUE2,
1248                                         NOC_STEELBLUE3,
1249                                         NOC_STEELBLUE4,
1250                                         NOC_TAN,
1251                                         NOC_TAN1,
1252                                         NOC_TAN2,
1253                                         NOC_TAN3,
1254                                         NOC_TAN4,
1255                                         NOC_THISTLE,
1256                                         NOC_THISTLE1,
1257                                         NOC_THISTLE2,
1258                                         NOC_THISTLE3,
1259                                         NOC_THISTLE4,
1260                                         NOC_TOMATO,
1261                                         NOC_TOMATO1,
1262                                         NOC_TOMATO2,
1263                                         NOC_TOMATO3,
1264                                         NOC_TOMATO4,
1265                                         NOC_TURQUOISE,
1266                                         NOC_TURQUOISE1,
1267                                         NOC_TURQUOISE2,
1268                                         NOC_TURQUOISE3,
1269                                         NOC_TURQUOISE4,
1270                                         NOC_VIOLET,
1271                                         NOC_VIOLETRED,
1272                                         NOC_VIOLETRED1,
1273                                         NOC_VIOLETRED2,
1274                                         NOC_VIOLETRED3,
1275                                         NOC_VIOLETRED4,
1276                                         NOC_WHEAT,
1277                                         NOC_WHEAT1,
1278                                         NOC_WHEAT2,
1279                                         NOC_WHEAT3,
1280                                         NOC_WHEAT4,
1281                                         NOC_WHITESMOKE,
1282                                         NOC_YELLOW,
1283                                         NOC_YELLOW1,
1284                                         NOC_YELLOW2,
1285                                         NOC_YELLOW3,
1286                                         NOC_YELLOW4,
1287                                         NOC_YELLOWGREEN,
1288                                         NOC_WHITE
1289         end NameOfColor;
1290         ---Purpose: Definition of names of known colours.
1291
1292
1293
1294 end Quantity;
1295