read SMCper: L:=5: for k1 from 2 to L do for k2 from k1+1 to L do print(`The list of Asymtotic Correlations of patterns of size`): print(k1, ` and `, k2, `are`): lprint(AllACorrDiffSize(k1,k2)); od: od: print(``): print(`The whole thing took`, time(), `of CPU time `): quit: