class MemoryConsumer "interface"
    fields
        bool active
        int bytes
        float secToCreate
        float usage


class Texture
    fields
        int width, height
        GLenum internalFormat

class FullTexture
    inherit Texture
    inherit MemoryConsumer

class MosaicTexture
    inherit Texture

class MosaicTile
    inherit MemoryConsumer
    assoc role(content) multi(*) - multi(0..1) role(storage) MosaicTexture
    fields
        int width, height