"horizontal" list in SwiftUI

HList.swift

import SwiftUI

extension Int: Identifiable {
    public var id: Self {
        self
    }
}

struct HList<C: RandomAccessCollection, V: View>: View where C.Element: Identifiable {
    var data: C
    var content: (C.Element) -> V
    
    var body: some View {
        GeometryReader { geo in
            List(self.data) { i in
                HStack {
                    Spacer()
                    self.content(i)
                        .rotationEffect(.degrees(90))
                    Spacer()
                }
            }
            .frame(width: geo.frame(in: .local).height,
                   height: geo.frame(in: .local).width)
            .rotationEffect(.degrees(-90))
        }
    }
}

struct ContentView: View {
    var body: some View {
        HList(data: 0...1000) { i in
            VStack {
                Image(systemName: "gear")
                    .imageScale(.large)
                Text("niiiice \(i)")
            }
            // needs to be hard coded, or the sizes will be incorrect.
            .frame(height: 150)
        }
    }
}