Fix after change to all doubles.

Also started modifications to plot tangential velocity, but it's not
working yet.