+ (generator (graph-class symbol) size minimum-degree)
+ (generate-simple-preferential-attachment-graph
+ generator (make-instance graph-class) size minimum-degree))
+
+;;; ---------------------------------------------------------------------------
+
+(defmethod generate-simple-preferential-attachment-graph