<expand>
((loopalpha firstname " " lastname (tp)
  (talk firstname " " lastname (tp))
  "Lab: " lab (tp)
  (cond group "Group: " group (tp))
  "Login: " login (tp)
  "Webpage: " webpage (tp)
  (apply checkaltweb)
  (cond webtilde "Webpage tilde: " webtilde (tp))
  (cond weblab "Webpage lab: " weblab (tp))
   (tp)))