read a&&{
$[b=a/12346+a]
[[ $a = $b ]]||r=NG
. *
}||echo ${r-OK}