Can someone help me with .tcl to invert all the graphs in a session to convert displacement to stiffness