05-21-2015, 07:14 AM
For integer input the programme BIGLOG returns the log base 10.
eg For input
60972196495985322369469798850801395302233069288389279166718517378288539199086752537728283958074869553280577116024079093544779755893987405091184995248604552648641110603776440546339839647264111552557603222875101873669396575421583919947812596964270533633515722663098931197911783761324710519769622826678690931698397717528770808943904809201523069336174422259494102545699707141452854771536951614279872959456937618851114056041769640689982233258357640946276893516864539997244407157297692816417139456756647645884487127633870919566186250410033473994566303930900748694810303248723705063260604351404340740328587657908374238115635589712203176718985343198274963140044996857687788606654510309416439143666614561626561903170292034515168450637351147189005554917928090509138364148203538729458116306434784561668463437648145255325638992807528445415350522817463853770772552985910869198336086346705793448944000623177821681114941654632182768056876632111049632391607775751376562788195752629084676115012532176672831536458918920389549244757682931704018959877582875378601750801456211249412028211746260061275763936562264154781686504614662077706856447851834600540973049448117232883761507878155323723967768151799413156968737635265440209414250942595024112911401104501906901321737665793600952875293931544216860453919263167381209577331874973676019328917767533110123932102390728773621925958301215568185790109493253437055430098236673171901316436654090815874414709858623020128844328172198171573831859353822145544709467861053167253147641559353356127933542788755274361792389821224133687682854127504386560001906595796414091539707070781357660847988377597942010101952300996117148758847901353605999982095353866224621522686344058343091513072703175200157752922856174815662295033980304125418288912564841618618783499313558442008516552101961069349877194185958958995787884480177063349806823690222564029124785529300534608293060323430508208475837344277395686432577551120330341994513746000838363840219610433344021155120705343745170392498048026889718726
BIGLOG returns
1999.78513184
BIGLOG
::
CK1&Dispatch
# FF
::
DUP
PTR 2F3A3
%1-
SWAP
FPTR2 ^Z>S
DUP
ONEONE
SUB$
CHR_.
>T$
SWAP
CDR$
&$
palparse
DROP
%LOG
%+
;
;
eg For input
60972196495985322369469798850801395302233069288389279166718517378288539199086752537728283958074869553280577116024079093544779755893987405091184995248604552648641110603776440546339839647264111552557603222875101873669396575421583919947812596964270533633515722663098931197911783761324710519769622826678690931698397717528770808943904809201523069336174422259494102545699707141452854771536951614279872959456937618851114056041769640689982233258357640946276893516864539997244407157297692816417139456756647645884487127633870919566186250410033473994566303930900748694810303248723705063260604351404340740328587657908374238115635589712203176718985343198274963140044996857687788606654510309416439143666614561626561903170292034515168450637351147189005554917928090509138364148203538729458116306434784561668463437648145255325638992807528445415350522817463853770772552985910869198336086346705793448944000623177821681114941654632182768056876632111049632391607775751376562788195752629084676115012532176672831536458918920389549244757682931704018959877582875378601750801456211249412028211746260061275763936562264154781686504614662077706856447851834600540973049448117232883761507878155323723967768151799413156968737635265440209414250942595024112911401104501906901321737665793600952875293931544216860453919263167381209577331874973676019328917767533110123932102390728773621925958301215568185790109493253437055430098236673171901316436654090815874414709858623020128844328172198171573831859353822145544709467861053167253147641559353356127933542788755274361792389821224133687682854127504386560001906595796414091539707070781357660847988377597942010101952300996117148758847901353605999982095353866224621522686344058343091513072703175200157752922856174815662295033980304125418288912564841618618783499313558442008516552101961069349877194185958958995787884480177063349806823690222564029124785529300534608293060323430508208475837344277395686432577551120330341994513746000838363840219610433344021155120705343745170392498048026889718726
BIGLOG returns
1999.78513184
BIGLOG
::
CK1&Dispatch
# FF
::
DUP
PTR 2F3A3
%1-
SWAP
FPTR2 ^Z>S
DUP
ONEONE
SUB$
CHR_.
>T$
SWAP
CDR$
&$
palparse
DROP
%LOG
%+
;
;