Solution

SAILBOAT.LGO

to initialise
clearscreen hideturtle
end

to sendhome
penup home
end

to hull
sendhome pendown
right 90 forward 100
right 125 forward 35
right 55 forward 160
right 80 forward 29
right 100 forward 85
end

to mainsail

to jib

to keel

to sailboat
initialise
hull mainsail jib keel
end