Issues with S.lazy for Recursive Types and S.optionFromNullable

typescript   interface Bed {
    name: string
    room: O.Option<Room>
  }

  const Bed: S.Schema<Bed> = S.lazy(() =>
    S.struct({
      name: S.string,
      room: S.optionFromNullable(Room)
    })
  )
  // type Bed = S.To<typeof Bed>
  interface Room {
    name: string
    beds: readonly Bed[]
  }

  const Room: S.Schema<Room> = S.lazy(() =>
    S.struct({
      name: S.string,
      beds: S.array(Bed)
    })
  )
  // type Room = S.To<typeof Room>