+ (not (eq j-chr c))
+ (not (or (eq (encode-char c '==ucs@jis)
+ (encode-char c '==ucs@JP/hanazono))
+ (eq (encode-char c '==ucs@unicode)
+ (encode-char c '==ucs@JP/hanazono))
+ (eq (encode-char c '==ucs@cns)
+ (encode-char c '==ucs@JP/hanazono))
+ )))