NOTE MLwiN macro code generated by MLPowSim
PICK b22 c701 b21
PICK b22 c702 b24
CALC b23 = b24*b30
ERASE c2
ERASE c705
LOOP b51 1 b21 1
    CALC b34 = b34 + 1
    PICK b34 c703 b52
    PUT b52 b51 c704
    JOIN c705 c704 c705
ENDL
LOOP b51 1 b30 1
    JOIN c2 c705 c2
    CALC c705 = c705 + b21
ENDL
OBEY setup.txt