[.] = InOut ?(A : Artwork), ?(S : GeometricShape)
[.] = InOut ?(A : Artwork), ?(I : Integer), ?(S : GeometricShape)
[.] = InOut ?(A : Artwork), ?(I : Integer), '?(S : GeometricShape)'

_ : r ->
Arg A : Artwork

...

Return Length