Horizontal scroll not working?

[tinchodias]

largeElement := BlElement new
	size: 1000 asPoint;
	background: (BlRadialGradientPaint new
		stops: { 0 -> Color green . 1 -> Color red};
		center: 500 asPoint;
		radius: 500;
		yourself);
	yourself.
largeElement := largeElement asScrollableElement.

hBar :=
	BlHorizontalScrollbarElement new
		constraintsDo: [ :c |
			c ignoreByLayout.
			c ignored vertical alignBottom ];
		attachTo: largeElement;
		yourself.

scrollPane :=
	BlElement new
		addChild: largeElement;
		addChild: hBar;
		constraintsDo: [ :c |
			c horizontal matchParent.
			c vertical matchParent ];
		yourself.

space := BlSpace new.
space root
	layout: BlLinearLayout new;
	padding: (BlInsets all: 10);
	background: Color blue muchDarker;
	addChild: scrollPane.
space
	extent: 500@500;
	show.

[tinchodias]

Screen.Recording.2023-05-12.at.16.06.14.mov