set j_std_count 0
#set j_std_count2 0
set j_mem_count 0
#set j_mem_count2 0
set j_fill_count 0
set j_fill_area 0
set j_std_area 0
set j_mem_area 0
set j_current_inst_area 0
set j_std_count [llength [dbGet top.insts.cell.baseClass core -p ] ]
set j_mem_count [llength [dbGet top.insts.cell.baseClass block -p ] ]
set j_fill_count [llength [dbGet top.insts.name FILL* ] ]
foreach j_obj [dbGet [dbGet top.insts.cell.baseClass block -p2].area ] {
set j_mem_area [expr $j_mem_area + $j_obj ]
# incr j_mem_count2
}
foreach j_obj [dbGet [dbGet top.insts.cell.baseClass core -p2].area ] {
set j_std_area [expr $j_std_area + $j_obj ]
# incr j_std_count2
}
foreach j_obj [dbGet [dbGet top.insts.name FILL* -p].area ] {
set j_fill_area [expr $j_fill_area + $j_obj ]
}
set j_std_count [expr $j_std_count - $j_fill_count ]
set j_std_area [expr $j_std_area - $j_fill_area ]
puts "STD count : $j_std_count"
puts "STD area : $j_std_area"
puts "MEM count : $j_mem_count"
puts "MEM area : $j_mem_area"