Select Code to Download

pp_def('sms_WxH_pdlpp_4loops',
    Pars      => 'a(m,n); [o]b(p,q);',
...
        }
    ',
);

pp_def('sms_WxH_pdlpp_4loops',
    Pars      => 'a(m,n); [o]b(p,q);',
...
                     $SIZE(q) = $SIZE(n) - $SIZE(h) + 1;',
    Code => 'loop(q,p,w,h) %{ $b() += $a(m=>p+w, n=>q+h); %}',
);