SV *
at_c(x,position)
        pdl*    x
        SV*     position
    PREINIT:
        PDL_Long * pos;
    CODE:
        ...
    OUTPUT:
        RETVAL