$set def b:[berry.ncbc1]
$r prg:totey
ncbc1.map