aspect(Traversal) MusicCollections {
    declare strategy: everyMusicalAlbum:
	"intersect(from AudioLib to CD, justMusic)";
    /* skip books on CD */
    declare strategy: justMusic:
	"from * via MusicColl to *";
    declare traversal: void listAlbums():
	everyMusicalAlbum (PrintCD);
}