Gitiles
Code Review
Sign In
gerrit-public.fairphone.software
/
platform
/
external
/
one-true-awk
/
refs/heads/rel/11/fp3/8901.4.A.0017
/
.
/
testdir
/
t.randk
blob: 419f3f2f2bf0fe142e7209b412ddda16f614c199 [
file
] [
log
] [
blame
]
{
k
=
2
n
=
NF
i
=
1
while
(
i
<=
n
)
{
if
(
rand
()
<
k
/
n
)
{
print
i
k
--
}
n
--
i
++
}
}