FCOMPLEX
typeinfo("float _Complex", FCOMPLEX, FCOMPLEX,
t = FCOMPLEX;
t = FCOMPLEX;
t = imaginary ? FCOMPLEX : FLOAT;
if (lt == FCOMPLEX || rt == FCOMPLEX)
return FCOMPLEX;
case FCOMPLEX:
case FCOMPLEX:
if (nt == FLOAT || nt == FCOMPLEX)
return s == 's' ? FCOMPLEX
t = FCOMPLEX;