Added S field to geometry structure in Private/geometry.rkt

S added to geometry. get-S checks if S has been calculated. If so,
it returns the vector, if not, it calculates, stores, and returns
the vector