Modelica class diagrams

I am looking for a tool that can (automatically) create class diagrams like this one from Modelica code: https://trac.modelica.org/Modelica/attachment/ticket/85/classDiagramModelicaMedia.png
I need to create a couple of such diagrams and an automated solution would help a lot!
So far, I found this article about Modelica CDV (class diagram viewer):
https://www.modelica.org/events/modelica2006/Proceedings/sessions/Session1c1.pdf
but not a ready to use tool. Any ideas?

This can be done with SystemModeler and Mathematica. The relevant function is a little bit hidden, but it's there. Here's an example:

WSMLink`Library`WSMDependencyGraph["Modelica.Mechanics.Rotational.Components.Spring"]

When hovering over the classes, the full name appears:

The object returned from the function includes a Graph, so you can operate on it with all the graph functionality in Mathematica. Also the function takes the same arguments as Graph, so you can get different graph layouts if needed.