fix for multiple pfts with same name #177

This uses the model$type to distinguish between different pfts with the
same name. For this to work the get.trait.data function now takes an
extra parameter, the model$type.