[求助]在lisp程序中应使用什么语句得到小数的位数？

lixiaochun

在lisp程序中应使用什么语句得到小数的位数？说得不明确，但要求如下：


如123.45的小数位数为2；123.450小数位数也为2。

meflying

(- (strlen (rtos 123.450)) (1+ (vl-string-position (ascii ".") (rtos 123.450))))