Group different spellings/names of functionals
type functional_group character(len=:), allocatable :: names(:) end type functional_group