fix Richter Gutenberg eq