OCaml Forge
SCM

Detail: [#230] "curl" direction does not do anything and bugs if used at the left of a knot

Bugs: Browse | Download .csv | Monitor

[#230] "curl" direction does not do anything and bugs if used at the left of a knot

Date:
2009-06-22 11:11
Priority:
2
State:
Open
Submitted by:
Romain Bardou (doomeer)
Assigned to:
Nobody (None)
Resolution:
Accepted As Bug
Severity:
normal
Version:
v0.7
Operating System:
Linux
URL:
 
Summary:
"curl" direction does not do anything and bugs if used at the left of a knot

Detailed description
Example :

If we do not use ~l, then the program compiles but we get a rectangle instead of a curve. If we do use ~l, then Metapost complains about a syntax error.

let patatoid width height =
let wmin,wmax = -0.5 *./ width, 0.5 *./ width in
let hmin,hmax = -0.5 *./ height, 0.5 *./ height in
let ll = pt (wmin,hmin) in
let lr = pt (wmax,hmin) in
let ur = pt (wmax,hmax) in
let ul = pt (wmin, hmax) in
let f p =
let r = curl (Random.float 10.) in
let l = curl (Random.float 10.) in
knotp ~r ~l p
in
pathk ~cycle: jCurve (List.map f [ ul; ur; lr; ll ])

This is MetaPost, Version 0.993 (Web2C 7.5.6)
(patate.mp (/usr/share/texmf/metapost/context/base/mp-tool.mp)
(/usr/share/texmf/metapost/context/base/mp-spec.mp)
! An expression can't begin with `{'.
<inserted text>
0
<to be read again>
{
l.38 draw {
curl 0.0799198}(-42.5197,14.1732){curl 0.00127961} ..
>> 0
! Improper `addto'.
...

Followup

No Followups Have Been Posted

Attached Files:

Changes:

Field Old Value Date By
summary"curl" direction does not do anything and bugs if used at the left of a knot2009-06-22 11:12doomeer
ResolutionNone2009-06-22 11:12doomeer