function getMainImage(appropriate){
//alert("Hello world2. Appropriate is " + appropriate);
  var mainImages = new Array();
  var mainAlt    = new Array();
  var mainLinks  = new Array();
  var mainOK     = new Array();
 
  mainImages[mainImages.length] = "oldwell_blue_trans.png";
  mainAlt[mainAlt.length]       = "Old Well";
  mainLinks[mainLinks.length]   = "";
  mainOK[mainOK.length]   = 1;

  mainImages[mainImages.length] = "107-0753_IMG_small.JPG";
  mainAlt[mainAlt.length]       = "Carleton College";
  mainLinks[mainLinks.length]   = "friends.html";
  mainOK[mainOK.length]   = 0;
  
  mainImages[mainImages.length] = "107-0754_IMG_small.JPG";
  mainAlt[mainAlt.length]       = "Carleton College";
  mainLinks[mainLinks.length]   = "friends.html";
  mainOK[mainOK.length]   = 0;

  mainImages[mainImages.length] = "http://cs.wlu.edu/~stough/MIDAG/OtherDirections/2Dmedmatchsmall.JPG";
  mainAlt[mainAlt.length]       = "Medial model";
  mainLinks[mainLinks.length]   = "http://cs.wlu.edu/~stough/research.html";
  mainOK[mainOK.length]   = 5;

  mainImages[mainImages.length] = "pictures/VikramWedd/120-2021_IMG-small.JPG";
  mainAlt[mainAlt.length]       = "Gloucester Wedding";
  mainLinks[mainLinks.length]   = "pictures/VikramWedd/VikramWedd.html";
  mainOK[mainOK.length]   = 0;

  mainImages[mainImages.length] = "torchier5.jpg";
  mainAlt[mainAlt.length]       = "Parametric Surface Grapher";
  mainLinks[mainLinks.length]   = "college.html";
  mainOK[mainOK.length]   = 1;

  mainImages[mainImages.length] = "comp236_assn3_12.jpg";
  mainAlt[mainAlt.length]       = "Rasterizing Triangles";
  mainLinks[mainLinks.length]   = "COMP236-Prog2.html";
  mainOK[mainOK.length]   = 1;

  mainImages[mainImages.length] = "112-1243_IMG_small.jpg";
  mainAlt[mainAlt.length]       = "Palace of Fine Arts";
  mainLinks[mainLinks.length]   = "friends.html";
  mainOK[mainOK.length]   = 0;


  mainImages[mainImages.length] = "COMP290-89/Prog2/comp290-89-assn2-orig-corr.jpg";
  mainAlt[mainAlt.length]       = "Point Correspondences";
  mainLinks[mainLinks.length]   = "COMP290-89-Prog2.html";
  mainOK[mainOK.length]   = 1;

  mainImages[mainImages.length] = "1104-1103N-cor.jpg";
  mainAlt[mainAlt.length]       = "Homography Panoramas";
  mainLinks[mainLinks.length]   = "COMP290-89-Prog1.html";
  mainOK[mainOK.length]   = 1;

  mainImages[mainImages.length] = "pictures/europe06/Switzerland/126-2687_IMG_small.JPG";
  mainAlt[mainAlt.length]       = "Villars-Sur-Ollon, Switzerland";
  mainLinks[mainLinks.length]   = "pictures/europe06/Europe06.html"; 
  mainOK[mainOK.length]   = 0;

  mainImages[mainImages.length] = "pictures/europe06/Switzerland/127-2736_IMG_small.JPG";
  mainAlt[mainAlt.length]       = "Swiss Alps Town";
  mainLinks[mainLinks.length]   = "pictures/europe06/Europe06.html";
  mainOK[mainOK.length]   = 0;

  mainImages[mainImages.length] = "http://cs.wlu.edu/~stough/MIDAG/OtherDirections/trajectories_lr.PNG";
  mainAlt[mainAlt.length]       = "Diffusion Trajectories";
  mainLinks[mainLinks.length]   = "http://cs.wlu.edu/~stough/research.html";
  mainOK[mainOK.length]   = 5;

  mainImages[mainImages.length] = "pictures/europe06/Switzerland/127-2714_IMG_small.JPG";
  mainAlt[mainAlt.length]       = "Furkapass, Switzerland";
  mainLinks[mainLinks.length]   = "pictures/europe06/Europe06.html";
  mainOK[mainOK.length]   = 0;

  mainImages[mainImages.length] = "http://cs.wlu.edu/~stough/MIDAG/2856_2876_Corresponding.PNG";
  mainAlt[mainAlt.length]       = "Dark Tissue Highlighted Within Kidney";
  mainLinks[mainLinks.length]   = "http://cs.wlu.edu/~stough/research.html";
  mainOK[mainOK.length]   = 5;

  mainImages[mainImages.length] = "http://cs.wlu.edu/~stough/MIDAG/mixtureExamplesmall.PNG";
  mainAlt[mainAlt.length]       = "Finite Mixture Models";
  mainLinks[mainLinks.length]   = "http://cs.wlu.edu/~stough/research.html";
  mainOK[mainOK.length]   = 5;

  mainImages[mainImages.length] = "http://cs.wlu.edu/~stough/MIDAG/bilateral_blur_detail.PNG";
  mainAlt[mainAlt.length]       = "Bilaterial Filtering on Medical Images";
  mainLinks[mainLinks.length]   = "http://cs.wlu.edu/~stough/COMP238.html";
  mainOK[mainOK.length]   = 5;

  mainImages[mainImages.length] = "pictures/europe06/Brussels/132-3205_IMG.JPG";
  mainAlt[mainAlt.length]       = "La Grand Place, Brussels";
  mainLinks[mainLinks.length]   = "pictures/europe06/Europe06.html";
  mainOK[mainOK.length]   = 0;

  mainImages[mainImages.length] = "quilt3.jpg";
  mainAlt[mainAlt.length]       = "Parametric Surface Grapher";
  mainLinks[mainLinks.length]   = "college.html";
  mainOK[mainOK.length]   = 0;

  mainImages[mainImages.length] = "http://cs.wlu.edu/~stough/MIDAG/ISBI_folder/in_situ.JPG";
  mainAlt[mainAlt.length]       = "Clustering on Image Boundary Regions, ISBI '04";
  mainLinks[mainLinks.length]   = "http://cs.wlu.edu/~stough/MIDAG/ISBI_folder/ISBI04.html";
  mainOK[mainOK.length]   = 5;

  mainImages[mainImages.length] = "http://cs.wlu.edu/~stough/MIDAG/DQFs/prostateRelativeToBone.PNG";
  mainAlt[mainAlt.length]       = "Prostate with Bone in 3D";
  mainLinks[mainLinks.length]   = "http://cs.wlu.edu/~stough/research.html";
  mainOK[mainOK.length]   = 5;

  mainImages[mainImages.length] = "http://cs.wlu.edu/~stough/MIDAG/DQFs/boneDistanceImage.PNG";
  mainAlt[mainAlt.length]       = "Prostate slice viewed axially in an image of distance to bone.";
  mainLinks[mainLinks.length]   = "http://cs.wlu.edu/~stough/research.html";
  mainOK[mainOK.length]   = 5;

  mainImages[mainImages.length] = "http://cs.wlu.edu/~stough/MIDAG/LocalRIQFs/regionsInSitu2.PNG";
  mainAlt[mainAlt.length]       = "Clustering on Local Appearance, ISBI '07.";
  mainLinks[mainLinks.length]   = "http://cs.wlu.edu/~stough/MIDAG/ISBI07/ISBI07.html";
  mainOK[mainOK.length]   = 5;

  mainImages[mainImages.length] = "http://cs.wlu.edu/~stough/MIDAG/LocalRIQFs/fromProstateToBowelsmall.JPG";
  mainAlt[mainAlt.length]       = "A walk in the projected space of local intensity distributions, ISBI '07";
  mainLinks[mainLinks.length]   = "http://cs.wlu.edu/~stough/MIDAG/ISBI07/ISBI07.html";
  mainOK[mainOK.length]   = 5;

  mainImages[mainImages.length] = "Comp255/fast_reconstruct.PNG";
  mainAlt[mainAlt.length]       = "Trace Transform";
  mainLinks[mainLinks.length]   = "COMP255-index.html";
  mainOK[mainOK.length]   = 1;

  mainImages[mainImages.length] = "COMP254-all/Prog2/tiffany.jpg";
  mainAlt[mainAlt.length]       = "Hough Transform for Circles";
  mainLinks[mainLinks.length]   = "COMP254-all/Prog2/hough_transform.doc";
  mainOK[mainOK.length]   = 1;

  mainImages[mainImages.length] = "Comp255/reconstruct_part.PNG";
  mainAlt[mainAlt.length]       = "Partial Inverse Trace Transform";
  mainLinks[mainLinks.length]   = "COMP255-index.html";
  mainOK[mainOK.length]   = 1;

  mainImages[mainImages.length] = "pictures/europe06/Paris/130-3055_IMG_small.JPG";
  mainAlt[mainAlt.length]       = "Paris";
  mainLinks[mainLinks.length]   = "pictures/europe06/Europe06.html";
  mainOK[mainOK.length]   = 0;

  mainImages[mainImages.length] = "pictures/europe06/Brussels/131-3179_IMG.JPG";
  mainAlt[mainAlt.length]       = "Amsterdam";
  mainLinks[mainLinks.length]   = "pictures/europe06/Europe06.html";
  mainOK[mainOK.length]   = 0;

  mainImages[mainImages.length] = "comp290-069/lightdarkscore.jpg";
  mainAlt[mainAlt.length]       = "Visualizing Image Metrics on the Surface";
  mainLinks[mainLinks.length]   = "";
  mainOK[mainOK.length]   = 1;

  mainImages[mainImages.length] = "Statistics-of-Geometry-meanimage.bmp";
  mainAlt[mainAlt.length]       = "Kidney Image Simulation through Large-Scale Diffeomorphisms";
  mainLinks[mainLinks.length]   = "Statistics-of-Geometry-Chenz.ppt";
  mainOK[mainOK.length]   = 1;

  mainImages[mainImages.length] = "ugly.jpg";
  mainAlt[mainAlt.length]       = "Goonies";
  mainLinks[mainLinks.length]   = "3D%20Modeling%20Repair.html";
  mainOK[mainOK.length]   = 1;

  mainImages[mainImages.length] = "comp238_assn1_test6.jpg";
  mainAlt[mainAlt.length]       = "Ray Tracing";
  mainLinks[mainLinks.length]   = "COMP238-Prog1.html";
  mainOK[mainOK.length]   = 1;

  mainImages[mainImages.length] = "comp238_assn2_7.jpg";
  mainAlt[mainAlt.length]       = "Teapot Ray Trace";
  mainLinks[mainLinks.length]   = "COMP238-Prog2.html";
  mainOK[mainOK.length]   = 1;

  mainImages[mainImages.length] = "MATH%20210/rhamphoid.bmp";
  mainAlt[mainAlt.length]       = "Ramphoid Singularity";
  mainLinks[mainLinks.length]   = "MATH210.html";
  mainOK[mainOK.length]   = 1;

  mainImages[mainImages.length] = "comp238_assn4_4.jpg";
  mainAlt[mainAlt.length]       = "Procedural Shaders";
  mainLinks[mainLinks.length]   = "COMP238-Prog4.html";
  mainOK[mainOK.length]   = 1;

  mainImages[mainImages.length] = "http://cs.wlu.edu/~stough/MIDAG/IPMI07/bladScatter.JPG";
  mainAlt[mainAlt.length]       = "Clustered intensity distributions versus those for a single position, IPMI '07.";
  mainLinks[mainLinks.length]   = "http://cs.wlu.edu/~stough/MIDAG/IPMI07/IPMI07.html";
  mainOK[mainOK.length]   = 5;

  mainImages[mainImages.length] = "http://cs.wlu.edu/~stough/MIDAG/IPMI07/bladder_patchIDs.PNG";
  mainAlt[mainAlt.length]       = "Regional Appearance in Deformable Model Segmentation, IPMI '07";
  mainLinks[mainLinks.length]   = "http://cs.wlu.edu/~stough/MIDAG/IPMI07/IPMI07.html";
  mainOK[mainOK.length]   = 5;
  
  mainImages[mainImages.length] = "comp238_assn2_9.jpg";
  mainAlt[mainAlt.length]       = "Diffuse Light Sources";
  mainLinks[mainLinks.length]   = "COMP238-Prog2.html";
  mainOK[mainOK.length]   = 1;

  mainImages[mainImages.length] = "comp238-proj-clahe-example2.jpg";
  mainAlt[mainAlt.length]       = "Contrast Limited Adaptive Histogram Equalization";
  mainLinks[mainLinks.length]   = "COMP238.html";
  mainOK[mainOK.length]   = 1;

  mainImages[mainImages.length] = "Prog3-2.bmp";
  mainAlt[mainAlt.length]       = "Teapot Bezier Patches";
  mainLinks[mainLinks.length]   = "COMP236-Prog3.html";
  mainOK[mainOK.length]   = 1;

  mainImages[mainImages.length] = "http://cs.wlu.edu/~stough/MIDAG/IPMI07/bladVolOverlap.PNG";
  mainAlt[mainAlt.length]       = "Regional appearance models lead to improved segmentations, IPMI '07.";
  mainLinks[mainLinks.length]   = "http://cs.wlu.edu/~stough/MIDAG/IPMI07/IPMI07.html";
  mainOK[mainOK.length]   = 5;

  mainImages[mainImages.length] = "rayt16.JPG";
  mainAlt[mainAlt.length]       = "Ray Tracing of Spheres";
  mainLinks[mainLinks.length]   = "COMP236-Prog4.html";
  mainOK[mainOK.length]   = 1;
  /*
  mainImages[mainImages.length] = "";
  mainAlt[mainAlt.length]       = "";
  mainLinks[mainLinks.length]   = "";
  */
  
  var r = Math.floor((Math.random() * mainImages.length));
  if(r >= mainImages.length) 
    r = 0;

//find the first one that's okay with the second parameter.  That
//way, people don't have to see me on vacation if they're looking 
//at my coursework, for example.
//alert("mainOK of r is " + mainOK[r] + " while appropriate is " + appropriate + ". r + 1 mod length is " +  (r + 1) % mainLinks.length);

//I may want to eventually get an appropriate image without excessively using random.

  while (mainOK[r] < appropriate)
{ 
 r = Math.floor((Math.random() * mainImages.length));
  if(r >= mainImages.length) 
    r = 0;
}

  //r=9;
//alert("Hello world3.");
  var imageTag = '<img SRC="' + mainImages[r] + '" ' + ' alt="' + mainAlt[r] + '" title="' + mainAlt[r] + '" border="0" height="150">';

  //if(1)
	//alert("1 works." + mainLinks[r]);
  if(mainLinks[r])
    imageTag = '<a href="' + mainLinks[r] + '">' + imageTag + '</a>';

  //var returnVal = '<img src="MiaAndMe.PNG" alt="Mia and me." align="right" height="100">';

//alert("Hello world4." + imageTag);
  //alert(returnVal);
  return imageTag;

}