#!/usr/bin/gawk -f

# lotto.gawk - tulosta lottorivi; 2012-11, LTu
# https://jautero.github.io/sao-faq/saoa-faq.html

BEGIN{

    koko   = 39
    lukuja =  7

    srand(systime() + PROCINFO["pid"]);  # ei posix awk:lla

    for (i=0; i<koko;   )                # luo pallot taulukkoon    
        tau[i] = ++i;

    for (i=0; i<lukuja; ++i) {
        n = int(rand() * koko + 1)
        print tau[n]
        koko--
        tau[n] = tau[koko]               # poista luku taulukosta
    }
    exit
}