/* Procedures for preparing memes for form submission */
function submitPrepPart(memepart) {
if (cdr(memepart) == null)
return car(memepart) + ")";
else
return car(memepart) + ", " +
submitPrepPart(cdr(memepart));
}

function submitPrepMeme(meme) {
if (cdr(meme) == null)
return "list(" + submitPrepPart(car(meme)) + ")";
else
return "list(" + submitPrepPart(car(meme)) + ", " + submitPrepMeme(cdr(meme));
}


function submitPrepMemesHelper(memes) {
if (cdr(memes) == null)
return "list(" + submitPrepMeme(car(memes)) + ")";
else
return "list(" + submitPrepMeme(car(memes)) + ", " + submitPrepMemesHelper(cdr(memes));
}

function submitPrepMemes(memes) {
return "var memes = list(" + submitPrepMemesHelper(memes) + ";";
}