write(){
    echo $@ >>a.lazy
}

putc(){
    write '``(S`SSKS(S`KK(S`KS(S`K`SIK)))`KK)'
    for((i=$1;i--;)){
        write '`(SISSKSK)'
    }
    write '`KI'
}

write K

for x in 1 3 5 6 7
{
    putc $[x+48]
    putc 10
}

write K

/golf/local/lazyk2 a.lazy