(49G) OEIS A034886: Number of Digits of N!

[Gerald H]

For natural number input N the programme returns the number of digits in N!.

For info see

https://oeis.org/A034886

Code:

::
  CK1&Dispatch
  BINT1
  ::
    DUP
    %2
    %<
    casedrop
    %1
    %>%%
    %% 1.83787706409345E0
    OVERDUP
    %%+
    DUPUNROT
    %%-
    ROT
    %%LN
    ROT
    %%1+_
    %%*
    %%+
    %% 4.60517018598809E0
    %%/
    %%INT
    %%1
    %%+
    %%>%
  ;
;