!set exolist  =!char 1 to -2 of pyramid1,tie,cross,pyramid1b,V,pyramid2,stool,triangle,twosqr,asterisk,IXI,cube,H,pizza3,pyramid1c,grill,house,bigsquare,threesqr,foursqr,M,pizza4,pyramid1d,pyramid2b,diag,W,pentagon,pentagram,pyramid3,
!set titlelist=!char 1 to -2 of 3: Pyramid I,5: Bow tie,5: Cross,5: Pyramid Ib,5: V,6: Pyramid II,6: Stool,6: Triangle,6: Two squares,7: Asterisk,7: Bow tie,7: Cube,7: H,7: Pizza 3,7: Pyramid Ic,8: Grill,8: House,8: Square,8: Three squares,9: Four squares,9: M,9: Pizza 4,9: Pyramid Id,9: Pyramid IIb,9: Square + diagonals,9: W,~10: Pentagon,~10: Pentagram,~10: Pyramid III,
!set exototal =!itemcnt $exolist

