REALPART

real part of a complex number 
Major Section:  PROGRAMMING

Completion Axiom: 

(equal (realpart x)
       (if (acl2-numberp x)
           (realpart x)
         0))

Guard for (realpart x): 

(acl2-numberp x)