proc cellChange {ind {n1 {}} {n2 {}} {op {}}} {

	global Procs 
	global CellFormulae CellValues

	set plist ""

	catch {set plist [set Procs($ind)]}

	if {$plist == ""} {return}

	foreach p $plist {
		eval $p
	}

}
