INTERFACE AnimationSet;

IMPORT Body, Texture;

TYPE
  T <: Public;
  Public = OBJECT METHODS
      init(name: TEXT);
      addBody(b: Body.T);
      addTexture(READONLY tx: Texture.T): CARDINAL;
      numTextures(): CARDINAL;
      readBody(name: TEXT): Body.T;
      write();
    END;

END AnimationSet.