One Hat Cyber Team
Your IP :
216.73.216.115
Server IP :
194.44.31.54
Server :
Linux zen.imath.kiev.ua 4.18.0-553.77.1.el8_10.x86_64 #1 SMP Fri Oct 3 14:30:23 UTC 2025 x86_64
Server Software :
Apache/2.4.37 (Rocky Linux) OpenSSL/1.1.1k
PHP Version :
5.6.40
Buat File
|
Buat Folder
Eksekusi
Dir :
~
/
usr
/
share
/
Macaulay2
/
OpenMath
/
cds
/
Edit File:
nums1.m2
-- done: rational, e, pi, infinity, i, gamma -- not done: based_integer, NaN, --- From OpenMath --- OMSEvaluators#"nums1" = new MutableHashTable; OMSEvaluators#"nums1"#"rational" = (args, attrs) -> ( a := apply(args, fromOpenMath); a#0/a#1 ) OMSEvaluators#"nums1"#"pi" = pi OMSEvaluators#"nums1"#"e" = exp(1) OMSEvaluators#"nums1"#"infinity" = infinity OMSEvaluators#"nums1"#"i" = ii OMSEvaluators#"nums1"#"gamma" = Gamma; --- To OpenMath --- toOpenMath QQ := x -> OMA("nums1", "rational", { OMI(numerator(x)), OMI(denominator(x))}) toOpenMath Constant := x -> ( if x === pi then OMS("nums1", "pi") else if x === ii then OMS("nums1", "pi") else (theOMerror = concatenate("Cannot handle constant ", toString(x)); error("whoops")) ) toOpenMath InfiniteNumber := x -> ( if x === infinity then OMS("nums1", "infinity") else OMA("arith1", "unary_minus", { OMS("nums1", "infinity") }) )
Simpan