diff --git a/chunkie/@chunkgraph/chunkgraph.m b/chunkie/@chunkgraph/chunkgraph.m index 0fdc6d1..a1ea9d4 100644 --- a/chunkie/@chunkgraph/chunkgraph.m +++ b/chunkie/@chunkgraph/chunkgraph.m @@ -118,6 +118,14 @@ fchnks = []; end + if isa(fchnks,"function_handle") + fchnks0 = fchnks; + fchnks = cell(nedge,1); + for j = 1:nedge + fchnks{j} = fchnks0; + end + end + if (nargin < 4) cparams = []; end diff --git a/devtools/test/chunkgraph_basicTest.m b/devtools/test/chunkgraph_basicTest.m index df2b673..3fa0f58 100644 --- a/devtools/test/chunkgraph_basicTest.m +++ b/devtools/test/chunkgraph_basicTest.m @@ -132,6 +132,19 @@ assert(all(2*nchs1 == nchs2)) +%% + +verts = exp(1i*2*pi*(0:4)/5); +verts = [real(verts);imag(verts)]; + +endverts = [1:5; [2:5 1]]; + +amp = 0.5; +frq = 6; +fchnks = @(t) sinearc(t,amp,frq); +% simpler calling sequence if all edges same function +cgrph = chunkgraph(verts,endverts,fchnks); + function idstrue = polygonids(cg,xx,yy) verts = cg.verts;