типы и подтипы

[fogmart]

Здравствуйте!
Возник такой вопрос:
есть тип, в котором стабильно есть 6 подтипов. можно ли как нибудь сделать так, чтобы при создании данного типа автоматичести создавались подтипы, входящие в него?