@main[]
$a[^a::create[]]

1. ^print[$a]
^reflection:delete[$a;b]
2. ^print[$a]

3. ^print[$a.CLASS]
^reflection:delete[$a.CLASS;c]
4. ^print[$a.CLASS]

5. $a.x
^reflection:delete[$a.CLASS;x]
6. $a.x

@print[x][h;k;v]
$h[^hash::create[$x]]
$result[^h.foreach[k;v]{$k='$v'}[, ]]


@CLASS
a

@create[]
$a[1]
$b[2]

@auto[]
$c[3]
$d[4]

@GET_x[]
x property