(module test_22b1_orphan_class
  (class TShow
    (param a)
    (method tshow
      (type (fn-type (params (own a)) (ret (own (con Str)))))))
  (instance
    (class TShow)
    (type (con Int))
    (method tshow
      (body "<int>"))))