#!/bin/bash
grep 'PARAMETER *BM' sgte_freee.tdb | sed 's/.*(\([^,]*\),ELEM_\([A-Z]*\);.*/\1 \2/g' | awk '{
  lat[$1] = lat[$1] ";" $1 ",ELEM_" $2;
}
END {
  for (i in lat) {
    print "TYPE_DEFINITION " substr(i,1,1) " GES A_P_D " i " MAGNETIC  " (i=="BCC_A2" ? "-1.0 0.4" : "-3.0 0.28") " ! " lat[i];
  }
}'
