diff --git a/R/add.R b/R/add.R
index 68d6e50..0621046 100644
--- a/R/add.R
+++ b/R/add.R
@@ -15,3 +15,6 @@
 #' @export
 
 add <- function(x,y){x+y}
+multiply <- function(a, b) { 
+  return(a * b) 
+}