Function Realpart_Cdfa

Part of:

package lisplab
( realpart_cdfa < a > < out > )