-- generic case
genLoad atomic e ty
    = getTBAAMeta topN >>= genLoad_slow atomic e ty
genLoad atomic e ty
    = getTBAAMeta topN >>= genLoad_slow atomic e ty
genLoad atomic e ty
    = getTBAAMeta topN >>= genLoad_slow atomic e ty