cleared_ = 0
proc clear() {
	if (cleared_ == 0) { cleared_ = 1  return }
	pc.gid_clear()
	pnm.nclist.remove_all
	cells.remove_all()
	objref cell
	objref postsyncell_
	par_ncell_ = 0
	par_local_ncell_ = 0
}