awk '
BEGIN {
intermed="false"
}
 { 
if ( $1 == "PROFILE" ) fault=$2
else {
line=$5
x=$1
y=$2
twt=$4
segment=$3
if ( segment == oldsegment && line == oldline ) {
     if ( intermed == "true" ) printf"%-25s%11.2f%11.2f%11.2f%-18s122\n",oldline,oldx,oldy,oldtwt,oldfault
      else {
 printf"%-25s%11.2f%11.2f%11.2f%-18s112\n",oldline,oldx,oldy,oldtwt,oldfault
 intermed="true"
  }
   }
else if ( intermed == "true" ) {
     intermed="false"
     printf"%-25s%11.2f%11.2f%11.2f%-18s132\n",oldline,oldx,oldy,oldtwt,oldfault
     }
   else printf"%-25s%11.2f%11.2f%11.2f%-18s141\n",oldline,oldx,oldy,oldtwt,oldfault
oldline=line
oldx=x
oldy=y
oldtwt=twt
oldfault=fault
oldsegment=segment
}
}
END {
printf"%-25s%11.2f%11.2f%11.2f%-18s132\n",oldline,oldx,oldy,oldtwt,oldfault
} ' $1 | dd of=$1.fix conv=ucase