%reset all
open = true
auto-col=f
drecaps = f
hinc=0

func 1 <horse

all 4000

rload line.k

split
cut 10 %  needed because open not split right

cyl=.255

scale 1 4 1


trans 5 0 0
%swirl 5
save dum
about y 60
load comb dum
about y 60
load comb dum
about y 60
load comb dum
about y 60
load comb dum
about y 60
load comb dum


save dum
about y 30
load comb dum

save dum
about y 15
load comb dum
save dum




scale .7 1.2 .7
load comb dum

swirl 10

centre

scale 1 .5 1
