cpHXprobe('calc','C13','scarbonyl','',1,'rsnob',400.0)
