OpenXM/src/kan96xx/trans/polymake.sm1 - diff

Return to polymake.sm1 CVS log

Up to [local] / OpenXM / src / kan96xx / trans

version 1.4, 2013/09/20 04:43:29

version 1.6, 2013/09/21 04:48:36

Line 1

% $OpenXM: OpenXM/src/kan96xx/trans/polymake.sm1,v 1.3 2003/12/06 02:49:22 takayama Exp $

% $OpenXM: OpenXM/src/kan96xx/trans/polymake.sm1,v 1.5 2013/09/20 05:12:24 takayama Exp $

% It is a polymake interface

/polymake.start {

Line 14

k0connectr /@@@polymake.k0.ccc oxk0.ccc def /oxk0.ccc [ ] def

@@@polymake.k0.ccc oxsetmathcap @@@polymake.k0.ccc oxmathcap

} { } ifelse

[(parse) ( 1 )] extension pop % BUG, dummy to avoid bus error on mac.2013.09.21

[(which) (polymake)] oxshell tag 0 eq {

[(export) (PATH) (=) (/usr/local/polymake/bin:${PATH})] oxshell

[(which) (polymake)] oxshell tag 0 eq {

Line 37

Line 38

(The variable @@@doPolymake.vars keeps session logs with the polymake)

(Example:)

% ( [(export) (PATH) (=) (/usr/local/polymake/bin:${PATH})] oxshell )

$ [(FACETS) (polymake.data(polymake.POINTS([[1,0,0],[1,1,0],[1,0,1],[1,1,1]])))]$

$ [(FACETS) (polymake.data(polymake.POINTS([[1,0,0],[1,1,0],[1,0,1],[1,1,1/2]])))]$

( doPolymake /rr set )

( Keys---properties are FACETS, CONE_DIM, LINEARITY_DIM, FEASIBLE, AFFINE_FULL, ... )

]] putUsages

/doPolymake {

/arg1 set

Line 58

Line 60

@@@polymake.k0.ccc oxpopcmo /ptree set

@@@polymake.k0.ccc ( QuoteMode(0); ) oxexecutestring

[(treeToPolymake) ptree] extension /pNative set

[pNative pAction] /@@@doPolymake.vars set %for debug

[ptree pNative pAction] /@@@doPolymake.vars set %for debug

%% step 2: calling the polymake

[(polymake) (stringInOut://pNative) pAction] addStdoutStderr

oxshell pop