Tidying and removing calling code

Author: shano

cachematrix.R

@@ -38,10 +38,4 @@ cacheSolve <- function(x, ...) {
         # And sets the inverse on the makeCacheMatrix container
         x$setinverse(inverse)
         inverse
-}
-mat = matrix(c(4,3,3,2), 2)
-print(mat)
-cacheMat = makeCacheMatrix(mat)
-inverseMat = cacheSolve(cacheMat)
-inverseMat = cacheSolve(cacheMat)
-print(inverseMat)
+}