# shared properties
class Foo

	pro foo1 as int
		is shared
		get
			return 1


	pro foo2 as int is shared
		get
			return .foo1 + 1

	shared
		get foo3 as int
			return 3

		pro foo4 as int
			get
				return .foo3
			set
				pass

		var _foo5 as int

		pro foo5 from var

		get foo6 as int
			return .foo5

		def main
			assert .foo1==1
			assert .foo2==2
			assert .foo3==3