Definition componentSemanticDescriptor (t : componentSemanticT) : string :=
  match t with
  | POSITION           => "com.io7m.zeniro.position"
  | NORMAL             => "com.io7m.zeniro.normal"
  | TEXTURE_COORDINATE => "com.io7m.zeniro.texture_coordinate"
  | TANGENT            => "com.io7m.zeniro.tangent"
  | BITANGENT          => "com.io7m.zeniro.bitangent"
  | COLOR              => "com.io7m.zeniro.color"
  | CUSTOM d           => d
  end.
