MonoTouch loop through fonts

gistfile1.cs

String fonts = "--------------------------------------\n";
  		List<String> fontFamilies = new List<String> (UIFont.FamilyNames);
			fontFamilies.Sort ();
			foreach (String familyName in fontFamilies) {
				foreach (String fontName in UIFont.FontNamesForFamilyName (familyName)) {
					fonts += familyName;
					fonts += "\t";
					fonts += fontName;
					fonts += "\n";
				}
				fonts += "--------------------------------------\n";
			}
			Console.WriteLine (fonts);