# We thank Cadence for granting permission to share our research to help promote and foster the next generation of innovators.puts"VERSION 1.0"set mem_hier ""foreach a [dbget [dbget top.insts.cell.name fakeram45_* -p2 ].name ]{ regexp {(.*)(/)([^/]*)}$a c b lappend mem_hier $b}set unique_mem_hier [lsort -unique $mem_hier]puts"BEGIN SEED"foreach a $unique_mem_hier {