rtName         :: Instrument -> Maybe String
shortName = Data._shortName . fetchInstrumentDef

-
shortName         :: Instrument -> Maybe String
shortName = Data._shortName . fetchInstrumentDef
shortName = Data._shortName . fetchInstrumentDef