[Date Index] [Thread Index] [Author Index]
RationalQ[x_] := (Head[x] === Rational) FORWARDED MESSAGE: Hi there, Anyone know how (possibly with an add-in package?) to draw intrinsic coordinate graphs with Mathematica 3? Also, anyone know how to implement a RationalQ function that tells if the supplied parameter is rational or not, e.g. RationalQ[Sqrt] = False RationalQ[1/3] = True Thanks, cheers, Adrian Cable.