File: cCode.m2

package info (click to toggle)
macaulay2 1.21%2Bds-3
  • links: PTS, VCS
  • area: main
  • in suites: bookworm
  • size: 133,096 kB
  • sloc: cpp: 110,377; ansic: 16,306; javascript: 4,193; makefile: 3,821; sh: 3,580; lisp: 764; yacc: 590; xml: 177; python: 140; perl: 114; lex: 65; awk: 3
file content (18 lines) | stat: -rw-r--r-- 389 bytes parent folder | download | duplicates (4) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
restart
debug needsPackage "NumericalAlgebraicGeometry"
NumericalAlgebraicGeometry#"exported symbols"
R = CC[x,y,z]
F = for i to 2 list random(2,R)-1 
(G,solsG) = totalDegreeStartSystem F
H = segmentHomotopy(F,G)
keys H

inputs = H#"X" | matrix{{H#"T"}}
numColumns inputs
printAsSLP H#"H"

cCode (H#"H", inputs)
cCode (H#"Ht", inputs)
cCode (H#"Hx", inputs)
cCode (H#"Hx"|H#"Ht", inputs)