$ awk 'function pow(x,n){r=1;for(i=0;i