%
% init subject summary of xacts for each product gal
%
*slidrpre
_Arching.Prods countup
{
 ^"gallery" second exch !
} for
!gallery