awk '{ 
if($1=="SP"){
size=$2
coef=$3
dosp=1
}
else
{
if(dosp==0) print $0
if(dosp==1){
i=i+1
exponent[i]=$1
scoef[i]=$2
pcoef[i]=$3
if(i==size){dosp=2}
}
if(dosp==2){
dosp=0
i=0
l=1
printf " %2s%3i%6.2f\n","S ",size,coef
while(l<=size){
printf "%17.8f%16.8f\n",exponent[l],scoef[l]
l+=1
}
l=1
printf " %2s%3i%6.2f\n","P ",size,coef
while(l<=size){
printf "%17.8f%16.8f\n",exponent[l],pcoef[l]
l+=1
}
}
}
}' $1
