<div dir="ltr"><div class="gmail_default" style="font-family:monospace,monospace">Hi, </div><div class="gmail_default" style="font-family:monospace,monospace"><br></div><div class="gmail_default" style="font-family:monospace,monospace">I'm quite vexed trying to do the following. Suppose I have a file:</div><div class="gmail_default" style="font-family:monospace,monospace"><br></div><div class="gmail_default" style="font-family:monospace,monospace">```</div><div class="gmail_default" style="font-family:monospace,monospace">module Foo </div><div class="gmail_default" style="font-family:monospace,monospace"><br></div><div class="gmail_default" style="font-family:monospace,monospace">import qualified Data.Set as S</div><div class="gmail_default" style="font-family:monospace,monospace"><br></div><div class="gmail_default" style="font-family:monospace,monospace">baz :: S.Set Int </div><div class="gmail_default" style="font-family:monospace,monospace">baz = S.empty</div><div class="gmail_default" style="font-family:monospace,monospace">```</div><div class="gmail_default" style="font-family:monospace,monospace"><br></div><div class="gmail_default" style="font-family:monospace,monospace">My goal is to write a function</div><div class="gmail_default" style="font-family:monospace,monospace"><br></div><div class="gmail_default" style="font-family:monospace,monospace">   tyconString :: TyCon -> String </div><div class="gmail_default" style="font-family:monospace,monospace"><br></div><div class="gmail_default" style="font-family:monospace,monospace">(perhaps with extra parameters) such that given the </div><div class="gmail_default" style="font-family:monospace,monospace">`TyCon` corresponding to `Set`, I get back the "original" </div><div class="gmail_default" style="font-family:monospace,monospace">name `S.Set`, or even `Data.Set.Set`. </div><div class="gmail_default" style="font-family:monospace,monospace"><br></div><div class="gmail_default" style="font-family:monospace,monospace">Everything I've tried, which is fiddling with different variants of `PprStyle`, end up giving me `Data.Set.Base.Set`</div><div class="gmail_default" style="font-family:monospace,monospace"><br></div><div class="gmail_default" style="font-family:monospace,monospace">Does anyone have a suggestion for how to proceed?</div><div class="gmail_default" style="font-family:monospace,monospace"><br></div><div class="gmail_default" style="font-family:monospace,monospace">Thanks!</div><div class="gmail_default" style="font-family:monospace,monospace"><br></div><div class="gmail_default" style="font-family:monospace,monospace">- Ranjit.</div><div class="gmail_default" style="font-family:monospace,monospace"><br></div><div class="gmail_default" style="font-family:monospace,monospace"><br></div></div>