(declare (block) (standard-bindings) (extended-bindings))
(begin
  (define std/misc/rtd#checked-object-type
    (lambda (_obj582_)
      (if (object? _obj582_)
          (object-type _obj582_)
          (error '"Not an object" _obj582_))))
  (define std/misc/rtd#type?
    (lambda (_obj580_) (let () (declare (not safe)) (##type? _obj580_))))
  (define std/misc/rtd#type-id
    (lambda (_obj577_)
      (if (let () (declare (not safe)) (##type? _obj577_))
          (let () (declare (not safe)) (##type-id _obj577_))
          (error '"Bad argument; expected type object" _obj577_))))
  (define std/misc/rtd#type-name
    (lambda (_obj574_)
      (if (let () (declare (not safe)) (##type? _obj574_))
          (let () (declare (not safe)) (##type-name _obj574_))
          (error '"Bad argument; expected type object" _obj574_))))
  (define std/misc/rtd#type-super
    (lambda (_obj571_)
      (if (let () (declare (not safe)) (##type? _obj571_))
          (let () (declare (not safe)) (##type-super _obj571_))
          (error '"Bad argument; expected type object" _obj571_))))
  (define std/misc/rtd#checked-type-descriptor-mixin
    (lambda (_obj568_)
      (if (type-descriptor? _obj568_)
          (type-descriptor-mixin _obj568_)
          (error '"Bad argument; expected type descriptor" _obj568_))))
  (define std/misc/rtd#checked-type-descriptor-fields
    (lambda (_obj565_)
      (if (type-descriptor? _obj565_)
          (type-descriptor-fields _obj565_)
          (error '"Bad argument; expected type descriptor" _obj565_))))
  (define std/misc/rtd#checked-type-descriptor-plist
    (lambda (_obj562_)
      (if (type-descriptor? _obj562_)
          (type-descriptor-plist _obj562_)
          (error '"Bad argument; expected type descriptor" _obj562_))))
  (define std/misc/rtd#checked-type-descriptor-ctor
    (lambda (_obj559_)
      (if (type-descriptor? _obj559_)
          (type-descriptor-ctor _obj559_)
          (error '"Bad argument; expected type descriptor" _obj559_))))
  (define std/misc/rtd#checked-type-descriptor-slots
    (lambda (_obj556_)
      (if (type-descriptor? _obj556_)
          (type-descriptor-slots _obj556_)
          (error '"Bad argument; expected type descriptor" _obj556_))))
  (define std/misc/rtd#checked-type-descriptor-methods
    (lambda (_obj553_)
      (if (type-descriptor? _obj553_)
          (type-descriptor-methods _obj553_)
          (error '"Bad argument; expected type descriptor" _obj553_)))))
