You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@systemml.apache.org by du...@apache.org on 2016/01/22 17:33:50 UTC

[14/51] [partial] incubator-systemml git commit: [SYSTEMML-482] [SYSTEMML-480] Adding a Git attributes file to enfore Unix-styled line endings, and normalizing all of the line endings.

http://git-wip-us.apache.org/repos/asf/incubator-systemml/blob/05d2c0a8/src/test/scripts/functions/binary/matrix/BinUaggChain_Col.R
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/binary/matrix/BinUaggChain_Col.R b/src/test/scripts/functions/binary/matrix/BinUaggChain_Col.R
index 674ee3a..31e2d26 100644
--- a/src/test/scripts/functions/binary/matrix/BinUaggChain_Col.R
+++ b/src/test/scripts/functions/binary/matrix/BinUaggChain_Col.R
@@ -1,32 +1,32 @@
-#-------------------------------------------------------------
-#
-# Licensed to the Apache Software Foundation (ASF) under one
-# or more contributor license agreements.  See the NOTICE file
-# distributed with this work for additional information
-# regarding copyright ownership.  The ASF licenses this file
-# to you under the Apache License, Version 2.0 (the
-# "License"); you may not use this file except in compliance
-# with the License.  You may obtain a copy of the License at
-# 
-#   http://www.apache.org/licenses/LICENSE-2.0
-# 
-# Unless required by applicable law or agreed to in writing,
-# software distributed under the License is distributed on an
-# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
-# KIND, either express or implied.  See the License for the
-# specific language governing permissions and limitations
-# under the License.
-#
-#-------------------------------------------------------------
-
-args <- commandArgs(TRUE)
-options(digits=22)
-
-library("Matrix")
-
-A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
-B <- A / rowSums(A);
-
-writeMM(as(B, "CsparseMatrix"), paste(args[2], "B", sep="")); 
-
-
+#-------------------------------------------------------------
+#
+# Licensed to the Apache Software Foundation (ASF) under one
+# or more contributor license agreements.  See the NOTICE file
+# distributed with this work for additional information
+# regarding copyright ownership.  The ASF licenses this file
+# to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance
+# with the License.  You may obtain a copy of the License at
+# 
+#   http://www.apache.org/licenses/LICENSE-2.0
+# 
+# Unless required by applicable law or agreed to in writing,
+# software distributed under the License is distributed on an
+# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+# KIND, either express or implied.  See the License for the
+# specific language governing permissions and limitations
+# under the License.
+#
+#-------------------------------------------------------------
+
+args <- commandArgs(TRUE)
+options(digits=22)
+
+library("Matrix")
+
+A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
+B <- A / rowSums(A);
+
+writeMM(as(B, "CsparseMatrix"), paste(args[2], "B", sep="")); 
+
+

http://git-wip-us.apache.org/repos/asf/incubator-systemml/blob/05d2c0a8/src/test/scripts/functions/binary/matrix/CentralMoment.R
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/binary/matrix/CentralMoment.R b/src/test/scripts/functions/binary/matrix/CentralMoment.R
index fa33986..34ee2dd 100644
--- a/src/test/scripts/functions/binary/matrix/CentralMoment.R
+++ b/src/test/scripts/functions/binary/matrix/CentralMoment.R
@@ -1,36 +1,36 @@
-#-------------------------------------------------------------
-#
-# Licensed to the Apache Software Foundation (ASF) under one
-# or more contributor license agreements.  See the NOTICE file
-# distributed with this work for additional information
-# regarding copyright ownership.  The ASF licenses this file
-# to you under the Apache License, Version 2.0 (the
-# "License"); you may not use this file except in compliance
-# with the License.  You may obtain a copy of the License at
-# 
-#   http://www.apache.org/licenses/LICENSE-2.0
-# 
-# Unless required by applicable law or agreed to in writing,
-# software distributed under the License is distributed on an
-# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
-# KIND, either express or implied.  See the License for the
-# specific language governing permissions and limitations
-# under the License.
-#
-#-------------------------------------------------------------
-
-args <- commandArgs(TRUE)
-options(digits=22)
-
-library("Matrix")
-library("moments")
-
-A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
-order = as.integer(args[2]);
-
-s = moment(A, order, central=TRUE);
-m = as.matrix(s);
-
-writeMM(as(m, "CsparseMatrix"), paste(args[3], "R", sep="")); 
-
-
+#-------------------------------------------------------------
+#
+# Licensed to the Apache Software Foundation (ASF) under one
+# or more contributor license agreements.  See the NOTICE file
+# distributed with this work for additional information
+# regarding copyright ownership.  The ASF licenses this file
+# to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance
+# with the License.  You may obtain a copy of the License at
+# 
+#   http://www.apache.org/licenses/LICENSE-2.0
+# 
+# Unless required by applicable law or agreed to in writing,
+# software distributed under the License is distributed on an
+# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+# KIND, either express or implied.  See the License for the
+# specific language governing permissions and limitations
+# under the License.
+#
+#-------------------------------------------------------------
+
+args <- commandArgs(TRUE)
+options(digits=22)
+
+library("Matrix")
+library("moments")
+
+A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
+order = as.integer(args[2]);
+
+s = moment(A, order, central=TRUE);
+m = as.matrix(s);
+
+writeMM(as(m, "CsparseMatrix"), paste(args[3], "R", sep="")); 
+
+

http://git-wip-us.apache.org/repos/asf/incubator-systemml/blob/05d2c0a8/src/test/scripts/functions/binary/matrix/Covariance.R
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/binary/matrix/Covariance.R b/src/test/scripts/functions/binary/matrix/Covariance.R
index 199fcf1..2aab811 100644
--- a/src/test/scripts/functions/binary/matrix/Covariance.R
+++ b/src/test/scripts/functions/binary/matrix/Covariance.R
@@ -1,36 +1,36 @@
-#-------------------------------------------------------------
-#
-# Licensed to the Apache Software Foundation (ASF) under one
-# or more contributor license agreements.  See the NOTICE file
-# distributed with this work for additional information
-# regarding copyright ownership.  The ASF licenses this file
-# to you under the Apache License, Version 2.0 (the
-# "License"); you may not use this file except in compliance
-# with the License.  You may obtain a copy of the License at
-# 
-#   http://www.apache.org/licenses/LICENSE-2.0
-# 
-# Unless required by applicable law or agreed to in writing,
-# software distributed under the License is distributed on an
-# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
-# KIND, either express or implied.  See the License for the
-# specific language governing permissions and limitations
-# under the License.
-#
-#-------------------------------------------------------------
-
-args <- commandArgs(TRUE)
-options(digits=22)
-
-library("Matrix")
-library("moments")
-
-A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
-B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
-
-s = cov(A, B);
-m = as.matrix(s);
-
-writeMM(as(m, "CsparseMatrix"), paste(args[2], "R", sep="")); 
-
-
+#-------------------------------------------------------------
+#
+# Licensed to the Apache Software Foundation (ASF) under one
+# or more contributor license agreements.  See the NOTICE file
+# distributed with this work for additional information
+# regarding copyright ownership.  The ASF licenses this file
+# to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance
+# with the License.  You may obtain a copy of the License at
+# 
+#   http://www.apache.org/licenses/LICENSE-2.0
+# 
+# Unless required by applicable law or agreed to in writing,
+# software distributed under the License is distributed on an
+# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+# KIND, either express or implied.  See the License for the
+# specific language governing permissions and limitations
+# under the License.
+#
+#-------------------------------------------------------------
+
+args <- commandArgs(TRUE)
+options(digits=22)
+
+library("Matrix")
+library("moments")
+
+A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
+B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
+
+s = cov(A, B);
+m = as.matrix(s);
+
+writeMM(as(m, "CsparseMatrix"), paste(args[2], "R", sep="")); 
+
+

http://git-wip-us.apache.org/repos/asf/incubator-systemml/blob/05d2c0a8/src/test/scripts/functions/binary/matrix/DiagMatrixMultiplication.R
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/binary/matrix/DiagMatrixMultiplication.R b/src/test/scripts/functions/binary/matrix/DiagMatrixMultiplication.R
index 315169e..ebf7909 100644
--- a/src/test/scripts/functions/binary/matrix/DiagMatrixMultiplication.R
+++ b/src/test/scripts/functions/binary/matrix/DiagMatrixMultiplication.R
@@ -1,38 +1,38 @@
-#-------------------------------------------------------------
-#
-# Licensed to the Apache Software Foundation (ASF) under one
-# or more contributor license agreements.  See the NOTICE file
-# distributed with this work for additional information
-# regarding copyright ownership.  The ASF licenses this file
-# to you under the Apache License, Version 2.0 (the
-# "License"); you may not use this file except in compliance
-# with the License.  You may obtain a copy of the License at
-# 
-#   http://www.apache.org/licenses/LICENSE-2.0
-# 
-# Unless required by applicable law or agreed to in writing,
-# software distributed under the License is distributed on an
-# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
-# KIND, either express or implied.  See the License for the
-# specific language governing permissions and limitations
-# under the License.
-#
-#-------------------------------------------------------------
-
-args <- commandArgs(TRUE)
-options(digits=22)
-
-library("Matrix")
-
-A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
-B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
-
-if( ncol(B)==1 ){
-   C = as.matrix(diag(as.vector(A %*% B)));
-} else{
-   C = as.matrix(diag(A %*% B));
-}
-
-writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep="")); 
-
-
+#-------------------------------------------------------------
+#
+# Licensed to the Apache Software Foundation (ASF) under one
+# or more contributor license agreements.  See the NOTICE file
+# distributed with this work for additional information
+# regarding copyright ownership.  The ASF licenses this file
+# to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance
+# with the License.  You may obtain a copy of the License at
+# 
+#   http://www.apache.org/licenses/LICENSE-2.0
+# 
+# Unless required by applicable law or agreed to in writing,
+# software distributed under the License is distributed on an
+# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+# KIND, either express or implied.  See the License for the
+# specific language governing permissions and limitations
+# under the License.
+#
+#-------------------------------------------------------------
+
+args <- commandArgs(TRUE)
+options(digits=22)
+
+library("Matrix")
+
+A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
+B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
+
+if( ncol(B)==1 ){
+   C = as.matrix(diag(as.vector(A %*% B)));
+} else{
+   C = as.matrix(diag(A %*% B));
+}
+
+writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep="")); 
+
+

http://git-wip-us.apache.org/repos/asf/incubator-systemml/blob/05d2c0a8/src/test/scripts/functions/binary/matrix/DiagMatrixMultiplicationTranspose.R
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/binary/matrix/DiagMatrixMultiplicationTranspose.R b/src/test/scripts/functions/binary/matrix/DiagMatrixMultiplicationTranspose.R
index fc0d59d..cef1f35 100644
--- a/src/test/scripts/functions/binary/matrix/DiagMatrixMultiplicationTranspose.R
+++ b/src/test/scripts/functions/binary/matrix/DiagMatrixMultiplicationTranspose.R
@@ -1,34 +1,34 @@
-#-------------------------------------------------------------
-#
-# Licensed to the Apache Software Foundation (ASF) under one
-# or more contributor license agreements.  See the NOTICE file
-# distributed with this work for additional information
-# regarding copyright ownership.  The ASF licenses this file
-# to you under the Apache License, Version 2.0 (the
-# "License"); you may not use this file except in compliance
-# with the License.  You may obtain a copy of the License at
-# 
-#   http://www.apache.org/licenses/LICENSE-2.0
-# 
-# Unless required by applicable law or agreed to in writing,
-# software distributed under the License is distributed on an
-# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
-# KIND, either express or implied.  See the License for the
-# specific language governing permissions and limitations
-# under the License.
-#
-#-------------------------------------------------------------
-
-args <- commandArgs(TRUE)
-options(digits=22)
-
-library("Matrix")
-
-A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
-B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
-
-C = diag(A %*% t(B));
-
-writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep="")); 
-
-
+#-------------------------------------------------------------
+#
+# Licensed to the Apache Software Foundation (ASF) under one
+# or more contributor license agreements.  See the NOTICE file
+# distributed with this work for additional information
+# regarding copyright ownership.  The ASF licenses this file
+# to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance
+# with the License.  You may obtain a copy of the License at
+# 
+#   http://www.apache.org/licenses/LICENSE-2.0
+# 
+# Unless required by applicable law or agreed to in writing,
+# software distributed under the License is distributed on an
+# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+# KIND, either express or implied.  See the License for the
+# specific language governing permissions and limitations
+# under the License.
+#
+#-------------------------------------------------------------
+
+args <- commandArgs(TRUE)
+options(digits=22)
+
+library("Matrix")
+
+A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
+B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
+
+C = diag(A %*% t(B));
+
+writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep="")); 
+
+

http://git-wip-us.apache.org/repos/asf/incubator-systemml/blob/05d2c0a8/src/test/scripts/functions/binary/matrix/ElementwiseModulusTest.dml
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/binary/matrix/ElementwiseModulusTest.dml b/src/test/scripts/functions/binary/matrix/ElementwiseModulusTest.dml
index 1029ced..27ca7c0 100644
--- a/src/test/scripts/functions/binary/matrix/ElementwiseModulusTest.dml
+++ b/src/test/scripts/functions/binary/matrix/ElementwiseModulusTest.dml
@@ -1,27 +1,27 @@
-#-------------------------------------------------------------
-#
-# Licensed to the Apache Software Foundation (ASF) under one
-# or more contributor license agreements.  See the NOTICE file
-# distributed with this work for additional information
-# regarding copyright ownership.  The ASF licenses this file
-# to you under the Apache License, Version 2.0 (the
-# "License"); you may not use this file except in compliance
-# with the License.  You may obtain a copy of the License at
-# 
-#   http://www.apache.org/licenses/LICENSE-2.0
-# 
-# Unless required by applicable law or agreed to in writing,
-# software distributed under the License is distributed on an
-# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
-# KIND, either express or implied.  See the License for the
-# specific language governing permissions and limitations
-# under the License.
-#
-#-------------------------------------------------------------
-
-# junit test class: org.apache.sysml.test.integration.functions.binary.matrix.ElementwiseModulusTest.java
-
-A = read("$$indir$$a", rows=$$rows$$, cols=$$cols$$, format="text");
-B = read("$$indir$$b", rows=$$rows$$, cols=$$cols$$, format="text");
-C = A %% B;
+#-------------------------------------------------------------
+#
+# Licensed to the Apache Software Foundation (ASF) under one
+# or more contributor license agreements.  See the NOTICE file
+# distributed with this work for additional information
+# regarding copyright ownership.  The ASF licenses this file
+# to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance
+# with the License.  You may obtain a copy of the License at
+# 
+#   http://www.apache.org/licenses/LICENSE-2.0
+# 
+# Unless required by applicable law or agreed to in writing,
+# software distributed under the License is distributed on an
+# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+# KIND, either express or implied.  See the License for the
+# specific language governing permissions and limitations
+# under the License.
+#
+#-------------------------------------------------------------
+
+# junit test class: org.apache.sysml.test.integration.functions.binary.matrix.ElementwiseModulusTest.java
+
+A = read("$$indir$$a", rows=$$rows$$, cols=$$cols$$, format="text");
+B = read("$$indir$$b", rows=$$rows$$, cols=$$cols$$, format="text");
+C = A %% B;
 write(C, "$$outdir$$c", format="text");
\ No newline at end of file

http://git-wip-us.apache.org/repos/asf/incubator-systemml/blob/05d2c0a8/src/test/scripts/functions/binary/matrix/ElementwiseModulusVariableDimensionsTest.dml
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/binary/matrix/ElementwiseModulusVariableDimensionsTest.dml b/src/test/scripts/functions/binary/matrix/ElementwiseModulusVariableDimensionsTest.dml
index 487242f..30f09be 100644
--- a/src/test/scripts/functions/binary/matrix/ElementwiseModulusVariableDimensionsTest.dml
+++ b/src/test/scripts/functions/binary/matrix/ElementwiseModulusVariableDimensionsTest.dml
@@ -1,27 +1,27 @@
-#-------------------------------------------------------------
-#
-# Licensed to the Apache Software Foundation (ASF) under one
-# or more contributor license agreements.  See the NOTICE file
-# distributed with this work for additional information
-# regarding copyright ownership.  The ASF licenses this file
-# to you under the Apache License, Version 2.0 (the
-# "License"); you may not use this file except in compliance
-# with the License.  You may obtain a copy of the License at
-# 
-#   http://www.apache.org/licenses/LICENSE-2.0
-# 
-# Unless required by applicable law or agreed to in writing,
-# software distributed under the License is distributed on an
-# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
-# KIND, either express or implied.  See the License for the
-# specific language governing permissions and limitations
-# under the License.
-#
-#-------------------------------------------------------------
-
-# junit test class: org.apache.sysml.test.integration.functions.binary.matrix.ElementwiseModulusTest.java
-
-A = read("$$indir$$a", rows=$$rows1$$, cols=$$cols1$$, format="text");
-B = read("$$indir$$b", rows=$$rows2$$, cols=$$cols2$$, format="text");
-C = A %% B;
+#-------------------------------------------------------------
+#
+# Licensed to the Apache Software Foundation (ASF) under one
+# or more contributor license agreements.  See the NOTICE file
+# distributed with this work for additional information
+# regarding copyright ownership.  The ASF licenses this file
+# to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance
+# with the License.  You may obtain a copy of the License at
+# 
+#   http://www.apache.org/licenses/LICENSE-2.0
+# 
+# Unless required by applicable law or agreed to in writing,
+# software distributed under the License is distributed on an
+# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+# KIND, either express or implied.  See the License for the
+# specific language governing permissions and limitations
+# under the License.
+#
+#-------------------------------------------------------------
+
+# junit test class: org.apache.sysml.test.integration.functions.binary.matrix.ElementwiseModulusTest.java
+
+A = read("$$indir$$a", rows=$$rows1$$, cols=$$cols1$$, format="text");
+B = read("$$indir$$b", rows=$$rows2$$, cols=$$cols2$$, format="text");
+C = A %% B;
 write(C, "$$outdir$$c", format="text");
\ No newline at end of file

http://git-wip-us.apache.org/repos/asf/incubator-systemml/blob/05d2c0a8/src/test/scripts/functions/binary/matrix/IQM.R
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/binary/matrix/IQM.R b/src/test/scripts/functions/binary/matrix/IQM.R
index 06aacc4..ed15d6a 100644
--- a/src/test/scripts/functions/binary/matrix/IQM.R
+++ b/src/test/scripts/functions/binary/matrix/IQM.R
@@ -1,43 +1,43 @@
-#-------------------------------------------------------------
-#
-# Licensed to the Apache Software Foundation (ASF) under one
-# or more contributor license agreements.  See the NOTICE file
-# distributed with this work for additional information
-# regarding copyright ownership.  The ASF licenses this file
-# to you under the Apache License, Version 2.0 (the
-# "License"); you may not use this file except in compliance
-# with the License.  You may obtain a copy of the License at
-# 
-#   http://www.apache.org/licenses/LICENSE-2.0
-# 
-# Unless required by applicable law or agreed to in writing,
-# software distributed under the License is distributed on an
-# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
-# KIND, either express or implied.  See the License for the
-# specific language governing permissions and limitations
-# under the License.
-#
-#-------------------------------------------------------------
-
-args <- commandArgs(TRUE)
-options(digits=22)
-
-library("Matrix")
-
-A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
-
-m = nrow(A);
-S = sort(A)
-q25d=m*0.25
-q75d=m*0.75
-q25i=ceiling(q25d)
-q75i=ceiling(q75d)
-iqm = sum(S[(q25i+1):q75i])
-iqm = iqm + (q25i-q25d)*S[q25i] - (q75i-q75d)*S[q75i]
-iqm = iqm/(m*0.5)
-
-miqm = as.matrix(iqm);
-
-writeMM(as(miqm, "CsparseMatrix"), paste(args[3], "R", sep="")); 
-
-
+#-------------------------------------------------------------
+#
+# Licensed to the Apache Software Foundation (ASF) under one
+# or more contributor license agreements.  See the NOTICE file
+# distributed with this work for additional information
+# regarding copyright ownership.  The ASF licenses this file
+# to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance
+# with the License.  You may obtain a copy of the License at
+# 
+#   http://www.apache.org/licenses/LICENSE-2.0
+# 
+# Unless required by applicable law or agreed to in writing,
+# software distributed under the License is distributed on an
+# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+# KIND, either express or implied.  See the License for the
+# specific language governing permissions and limitations
+# under the License.
+#
+#-------------------------------------------------------------
+
+args <- commandArgs(TRUE)
+options(digits=22)
+
+library("Matrix")
+
+A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
+
+m = nrow(A);
+S = sort(A)
+q25d=m*0.25
+q75d=m*0.75
+q25i=ceiling(q25d)
+q75i=ceiling(q75d)
+iqm = sum(S[(q25i+1):q75i])
+iqm = iqm + (q25i-q25d)*S[q25i] - (q75i-q75d)*S[q75i]
+iqm = iqm/(m*0.5)
+
+miqm = as.matrix(iqm);
+
+writeMM(as(miqm, "CsparseMatrix"), paste(args[3], "R", sep="")); 
+
+

http://git-wip-us.apache.org/repos/asf/incubator-systemml/blob/05d2c0a8/src/test/scripts/functions/binary/matrix/MapMultChain.R
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/binary/matrix/MapMultChain.R b/src/test/scripts/functions/binary/matrix/MapMultChain.R
index b5124a1..65354b6 100644
--- a/src/test/scripts/functions/binary/matrix/MapMultChain.R
+++ b/src/test/scripts/functions/binary/matrix/MapMultChain.R
@@ -1,34 +1,34 @@
-#-------------------------------------------------------------
-#
-# Licensed to the Apache Software Foundation (ASF) under one
-# or more contributor license agreements.  See the NOTICE file
-# distributed with this work for additional information
-# regarding copyright ownership.  The ASF licenses this file
-# to you under the Apache License, Version 2.0 (the
-# "License"); you may not use this file except in compliance
-# with the License.  You may obtain a copy of the License at
-# 
-#   http://www.apache.org/licenses/LICENSE-2.0
-# 
-# Unless required by applicable law or agreed to in writing,
-# software distributed under the License is distributed on an
-# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
-# KIND, either express or implied.  See the License for the
-# specific language governing permissions and limitations
-# under the License.
-#
-#-------------------------------------------------------------
-
-args <- commandArgs(TRUE)
-options(digits=22)
-
-library("Matrix")
-
-X <- readMM(paste(args[1], "X.mtx", sep=""))
-v <- readMM(paste(args[1], "v.mtx", sep=""))
-
-R = (t(X) %*% (X %*% v));
-
-writeMM(as(R, "CsparseMatrix"), paste(args[2], "R", sep="")); 
-
-
+#-------------------------------------------------------------
+#
+# Licensed to the Apache Software Foundation (ASF) under one
+# or more contributor license agreements.  See the NOTICE file
+# distributed with this work for additional information
+# regarding copyright ownership.  The ASF licenses this file
+# to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance
+# with the License.  You may obtain a copy of the License at
+# 
+#   http://www.apache.org/licenses/LICENSE-2.0
+# 
+# Unless required by applicable law or agreed to in writing,
+# software distributed under the License is distributed on an
+# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+# KIND, either express or implied.  See the License for the
+# specific language governing permissions and limitations
+# under the License.
+#
+#-------------------------------------------------------------
+
+args <- commandArgs(TRUE)
+options(digits=22)
+
+library("Matrix")
+
+X <- readMM(paste(args[1], "X.mtx", sep=""))
+v <- readMM(paste(args[1], "v.mtx", sep=""))
+
+R = (t(X) %*% (X %*% v));
+
+writeMM(as(R, "CsparseMatrix"), paste(args[2], "R", sep="")); 
+
+

http://git-wip-us.apache.org/repos/asf/incubator-systemml/blob/05d2c0a8/src/test/scripts/functions/binary/matrix/MapMultChainWeights.R
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/binary/matrix/MapMultChainWeights.R b/src/test/scripts/functions/binary/matrix/MapMultChainWeights.R
index e9c8d3e..63e8d08 100644
--- a/src/test/scripts/functions/binary/matrix/MapMultChainWeights.R
+++ b/src/test/scripts/functions/binary/matrix/MapMultChainWeights.R
@@ -1,35 +1,35 @@
-#-------------------------------------------------------------
-#
-# Licensed to the Apache Software Foundation (ASF) under one
-# or more contributor license agreements.  See the NOTICE file
-# distributed with this work for additional information
-# regarding copyright ownership.  The ASF licenses this file
-# to you under the Apache License, Version 2.0 (the
-# "License"); you may not use this file except in compliance
-# with the License.  You may obtain a copy of the License at
-# 
-#   http://www.apache.org/licenses/LICENSE-2.0
-# 
-# Unless required by applicable law or agreed to in writing,
-# software distributed under the License is distributed on an
-# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
-# KIND, either express or implied.  See the License for the
-# specific language governing permissions and limitations
-# under the License.
-#
-#-------------------------------------------------------------
-
-args <- commandArgs(TRUE)
-options(digits=22)
-
-library("Matrix")
-
-X <- readMM(paste(args[1], "X.mtx", sep=""))
-v <- readMM(paste(args[1], "v.mtx", sep=""))
-w <- readMM(paste(args[1], "w.mtx", sep=""))
-
-R = (t(X) %*% (w*(X %*% v)));
-
-writeMM(as(R, "CsparseMatrix"), paste(args[2], "R", sep="")); 
-
-
+#-------------------------------------------------------------
+#
+# Licensed to the Apache Software Foundation (ASF) under one
+# or more contributor license agreements.  See the NOTICE file
+# distributed with this work for additional information
+# regarding copyright ownership.  The ASF licenses this file
+# to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance
+# with the License.  You may obtain a copy of the License at
+# 
+#   http://www.apache.org/licenses/LICENSE-2.0
+# 
+# Unless required by applicable law or agreed to in writing,
+# software distributed under the License is distributed on an
+# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+# KIND, either express or implied.  See the License for the
+# specific language governing permissions and limitations
+# under the License.
+#
+#-------------------------------------------------------------
+
+args <- commandArgs(TRUE)
+options(digits=22)
+
+library("Matrix")
+
+X <- readMM(paste(args[1], "X.mtx", sep=""))
+v <- readMM(paste(args[1], "v.mtx", sep=""))
+w <- readMM(paste(args[1], "w.mtx", sep=""))
+
+R = (t(X) %*% (w*(X %*% v)));
+
+writeMM(as(R, "CsparseMatrix"), paste(args[2], "R", sep="")); 
+
+

http://git-wip-us.apache.org/repos/asf/incubator-systemml/blob/05d2c0a8/src/test/scripts/functions/binary/matrix/MapMultChainWeights2.R
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/binary/matrix/MapMultChainWeights2.R b/src/test/scripts/functions/binary/matrix/MapMultChainWeights2.R
index 2c7320d..d0daf06 100644
--- a/src/test/scripts/functions/binary/matrix/MapMultChainWeights2.R
+++ b/src/test/scripts/functions/binary/matrix/MapMultChainWeights2.R
@@ -1,35 +1,35 @@
-#-------------------------------------------------------------
-#
-# Licensed to the Apache Software Foundation (ASF) under one
-# or more contributor license agreements.  See the NOTICE file
-# distributed with this work for additional information
-# regarding copyright ownership.  The ASF licenses this file
-# to you under the Apache License, Version 2.0 (the
-# "License"); you may not use this file except in compliance
-# with the License.  You may obtain a copy of the License at
-# 
-#   http://www.apache.org/licenses/LICENSE-2.0
-# 
-# Unless required by applicable law or agreed to in writing,
-# software distributed under the License is distributed on an
-# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
-# KIND, either express or implied.  See the License for the
-# specific language governing permissions and limitations
-# under the License.
-#
-#-------------------------------------------------------------
-
-args <- commandArgs(TRUE)
-options(digits=22)
-
-library("Matrix")
-
-X <- readMM(paste(args[1], "X.mtx", sep=""))
-v <- readMM(paste(args[1], "v.mtx", sep=""))
-w <- readMM(paste(args[1], "w.mtx", sep=""))
-
-R = t(X) %*% ((X %*% v)-w);
-
-writeMM(as(R, "CsparseMatrix"), paste(args[2], "R", sep="")); 
-
-
+#-------------------------------------------------------------
+#
+# Licensed to the Apache Software Foundation (ASF) under one
+# or more contributor license agreements.  See the NOTICE file
+# distributed with this work for additional information
+# regarding copyright ownership.  The ASF licenses this file
+# to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance
+# with the License.  You may obtain a copy of the License at
+# 
+#   http://www.apache.org/licenses/LICENSE-2.0
+# 
+# Unless required by applicable law or agreed to in writing,
+# software distributed under the License is distributed on an
+# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+# KIND, either express or implied.  See the License for the
+# specific language governing permissions and limitations
+# under the License.
+#
+#-------------------------------------------------------------
+
+args <- commandArgs(TRUE)
+options(digits=22)
+
+library("Matrix")
+
+X <- readMM(paste(args[1], "X.mtx", sep=""))
+v <- readMM(paste(args[1], "v.mtx", sep=""))
+w <- readMM(paste(args[1], "w.mtx", sep=""))
+
+R = t(X) %*% ((X %*% v)-w);
+
+writeMM(as(R, "CsparseMatrix"), paste(args[2], "R", sep="")); 
+
+

http://git-wip-us.apache.org/repos/asf/incubator-systemml/blob/05d2c0a8/src/test/scripts/functions/binary/matrix/MapMultLimitTest.dml
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/binary/matrix/MapMultLimitTest.dml b/src/test/scripts/functions/binary/matrix/MapMultLimitTest.dml
index e9827eb..e9c0628 100644
--- a/src/test/scripts/functions/binary/matrix/MapMultLimitTest.dml
+++ b/src/test/scripts/functions/binary/matrix/MapMultLimitTest.dml
@@ -1,31 +1,31 @@
-#-------------------------------------------------------------
-#
-# Licensed to the Apache Software Foundation (ASF) under one
-# or more contributor license agreements.  See the NOTICE file
-# distributed with this work for additional information
-# regarding copyright ownership.  The ASF licenses this file
-# to you under the Apache License, Version 2.0 (the
-# "License"); you may not use this file except in compliance
-# with the License.  You may obtain a copy of the License at
-# 
-#   http://www.apache.org/licenses/LICENSE-2.0
-# 
-# Unless required by applicable law or agreed to in writing,
-# software distributed under the License is distributed on an
-# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
-# KIND, either express or implied.  See the License for the
-# specific language governing permissions and limitations
-# under the License.
-#
-#-------------------------------------------------------------
-
-A = read($1);
-B1 = read($2);
-B2 = read($3);
-
-C1 = A %*% B1;
-C2 = A %*% B2;
-
-write(C1, $4);
-write(C2, $5);
-
+#-------------------------------------------------------------
+#
+# Licensed to the Apache Software Foundation (ASF) under one
+# or more contributor license agreements.  See the NOTICE file
+# distributed with this work for additional information
+# regarding copyright ownership.  The ASF licenses this file
+# to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance
+# with the License.  You may obtain a copy of the License at
+# 
+#   http://www.apache.org/licenses/LICENSE-2.0
+# 
+# Unless required by applicable law or agreed to in writing,
+# software distributed under the License is distributed on an
+# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+# KIND, either express or implied.  See the License for the
+# specific language governing permissions and limitations
+# under the License.
+#
+#-------------------------------------------------------------
+
+A = read($1);
+B1 = read($2);
+B2 = read($3);
+
+C1 = A %*% B1;
+C2 = A %*% B2;
+
+write(C1, $4);
+write(C2, $5);
+

http://git-wip-us.apache.org/repos/asf/incubator-systemml/blob/05d2c0a8/src/test/scripts/functions/binary/matrix/MatrixVectorMultiplication.R
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/binary/matrix/MatrixVectorMultiplication.R b/src/test/scripts/functions/binary/matrix/MatrixVectorMultiplication.R
index 991e9cc..9f5d6aa 100644
--- a/src/test/scripts/functions/binary/matrix/MatrixVectorMultiplication.R
+++ b/src/test/scripts/functions/binary/matrix/MatrixVectorMultiplication.R
@@ -1,36 +1,36 @@
-#-------------------------------------------------------------
-#
-# Licensed to the Apache Software Foundation (ASF) under one
-# or more contributor license agreements.  See the NOTICE file
-# distributed with this work for additional information
-# regarding copyright ownership.  The ASF licenses this file
-# to you under the Apache License, Version 2.0 (the
-# "License"); you may not use this file except in compliance
-# with the License.  You may obtain a copy of the License at
-# 
-#   http://www.apache.org/licenses/LICENSE-2.0
-# 
-# Unless required by applicable law or agreed to in writing,
-# software distributed under the License is distributed on an
-# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
-# KIND, either express or implied.  See the License for the
-# specific language governing permissions and limitations
-# under the License.
-#
-#-------------------------------------------------------------
-
-args <- commandArgs(TRUE)
-options(digits=22)
-
-library("Matrix")
-
-A1 <- readMM(paste(args[1], "A.mtx", sep=""))
-A <- as.matrix(A1);
-x1 <- readMM(paste(args[1], "x.mtx", sep=""))
-x <- as.matrix(x1);
-
-y <- A%*%x;
-
-writeMM(as(y, "CsparseMatrix"), paste(args[2], "y", sep="")); 
-
-
+#-------------------------------------------------------------
+#
+# Licensed to the Apache Software Foundation (ASF) under one
+# or more contributor license agreements.  See the NOTICE file
+# distributed with this work for additional information
+# regarding copyright ownership.  The ASF licenses this file
+# to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance
+# with the License.  You may obtain a copy of the License at
+# 
+#   http://www.apache.org/licenses/LICENSE-2.0
+# 
+# Unless required by applicable law or agreed to in writing,
+# software distributed under the License is distributed on an
+# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+# KIND, either express or implied.  See the License for the
+# specific language governing permissions and limitations
+# under the License.
+#
+#-------------------------------------------------------------
+
+args <- commandArgs(TRUE)
+options(digits=22)
+
+library("Matrix")
+
+A1 <- readMM(paste(args[1], "A.mtx", sep=""))
+A <- as.matrix(A1);
+x1 <- readMM(paste(args[1], "x.mtx", sep=""))
+x <- as.matrix(x1);
+
+y <- A%*%x;
+
+writeMM(as(y, "CsparseMatrix"), paste(args[2], "y", sep="")); 
+
+

http://git-wip-us.apache.org/repos/asf/incubator-systemml/blob/05d2c0a8/src/test/scripts/functions/binary/matrix/Median.R
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/binary/matrix/Median.R b/src/test/scripts/functions/binary/matrix/Median.R
index 41c1c16..0cf2c31 100644
--- a/src/test/scripts/functions/binary/matrix/Median.R
+++ b/src/test/scripts/functions/binary/matrix/Median.R
@@ -1,34 +1,34 @@
-#-------------------------------------------------------------
-#
-# Licensed to the Apache Software Foundation (ASF) under one
-# or more contributor license agreements.  See the NOTICE file
-# distributed with this work for additional information
-# regarding copyright ownership.  The ASF licenses this file
-# to you under the Apache License, Version 2.0 (the
-# "License"); you may not use this file except in compliance
-# with the License.  You may obtain a copy of the License at
-# 
-#   http://www.apache.org/licenses/LICENSE-2.0
-# 
-# Unless required by applicable law or agreed to in writing,
-# software distributed under the License is distributed on an
-# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
-# KIND, either express or implied.  See the License for the
-# specific language governing permissions and limitations
-# under the License.
-#
-#-------------------------------------------------------------
-
-args <- commandArgs(TRUE)
-options(digits=22)
-
-library("Matrix")
-
-A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
-
-s = median(A);
-m = as.matrix(s);
-
-writeMM(as(m, "CsparseMatrix"), paste(args[3], "R", sep="")); 
-
-
+#-------------------------------------------------------------
+#
+# Licensed to the Apache Software Foundation (ASF) under one
+# or more contributor license agreements.  See the NOTICE file
+# distributed with this work for additional information
+# regarding copyright ownership.  The ASF licenses this file
+# to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance
+# with the License.  You may obtain a copy of the License at
+# 
+#   http://www.apache.org/licenses/LICENSE-2.0
+# 
+# Unless required by applicable law or agreed to in writing,
+# software distributed under the License is distributed on an
+# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+# KIND, either express or implied.  See the License for the
+# specific language governing permissions and limitations
+# under the License.
+#
+#-------------------------------------------------------------
+
+args <- commandArgs(TRUE)
+options(digits=22)
+
+library("Matrix")
+
+A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
+
+s = median(A);
+m = as.matrix(s);
+
+writeMM(as(m, "CsparseMatrix"), paste(args[3], "R", sep="")); 
+
+

http://git-wip-us.apache.org/repos/asf/incubator-systemml/blob/05d2c0a8/src/test/scripts/functions/binary/matrix/OuterProduct.R
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/binary/matrix/OuterProduct.R b/src/test/scripts/functions/binary/matrix/OuterProduct.R
index b1cdbb8..72d270d 100644
--- a/src/test/scripts/functions/binary/matrix/OuterProduct.R
+++ b/src/test/scripts/functions/binary/matrix/OuterProduct.R
@@ -1,41 +1,41 @@
-#-------------------------------------------------------------
-#
-# Licensed to the Apache Software Foundation (ASF) under one
-# or more contributor license agreements.  See the NOTICE file
-# distributed with this work for additional information
-# regarding copyright ownership.  The ASF licenses this file
-# to you under the Apache License, Version 2.0 (the
-# "License"); you may not use this file except in compliance
-# with the License.  You may obtain a copy of the License at
-# 
-#   http://www.apache.org/licenses/LICENSE-2.0
-# 
-# Unless required by applicable law or agreed to in writing,
-# software distributed under the License is distributed on an
-# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
-# KIND, either express or implied.  See the License for the
-# specific language governing permissions and limitations
-# under the License.
-#
-#-------------------------------------------------------------
-
-args <- commandArgs(TRUE)
-options(digits=22)
-
-library("Matrix")
-
-#note: we use matrix here, becase Matrix created out-of-memory issues
-# 'Cholmod error 'out of memory' at file ../Core/cholmod_memory.c, line 147'
-# however, R still fails with 'Error: cannot allocate vector of size 3.0 Gb'
-
-A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
-B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
-
-C <- A %*% B;
-#C <- A %o% B; 
-
-cmin <- min(C);
-
-writeMM(as(cmin, "CsparseMatrix"), paste(args[2], "C", sep="")); 
-
-
+#-------------------------------------------------------------
+#
+# Licensed to the Apache Software Foundation (ASF) under one
+# or more contributor license agreements.  See the NOTICE file
+# distributed with this work for additional information
+# regarding copyright ownership.  The ASF licenses this file
+# to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance
+# with the License.  You may obtain a copy of the License at
+# 
+#   http://www.apache.org/licenses/LICENSE-2.0
+# 
+# Unless required by applicable law or agreed to in writing,
+# software distributed under the License is distributed on an
+# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+# KIND, either express or implied.  See the License for the
+# specific language governing permissions and limitations
+# under the License.
+#
+#-------------------------------------------------------------
+
+args <- commandArgs(TRUE)
+options(digits=22)
+
+library("Matrix")
+
+#note: we use matrix here, becase Matrix created out-of-memory issues
+# 'Cholmod error 'out of memory' at file ../Core/cholmod_memory.c, line 147'
+# however, R still fails with 'Error: cannot allocate vector of size 3.0 Gb'
+
+A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
+B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
+
+C <- A %*% B;
+#C <- A %o% B; 
+
+cmin <- min(C);
+
+writeMM(as(cmin, "CsparseMatrix"), paste(args[2], "C", sep="")); 
+
+

http://git-wip-us.apache.org/repos/asf/incubator-systemml/blob/05d2c0a8/src/test/scripts/functions/binary/matrix/Quantile.R
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/binary/matrix/Quantile.R b/src/test/scripts/functions/binary/matrix/Quantile.R
index 39c1446..1997456 100644
--- a/src/test/scripts/functions/binary/matrix/Quantile.R
+++ b/src/test/scripts/functions/binary/matrix/Quantile.R
@@ -1,35 +1,35 @@
-#-------------------------------------------------------------
-#
-# Licensed to the Apache Software Foundation (ASF) under one
-# or more contributor license agreements.  See the NOTICE file
-# distributed with this work for additional information
-# regarding copyright ownership.  The ASF licenses this file
-# to you under the Apache License, Version 2.0 (the
-# "License"); you may not use this file except in compliance
-# with the License.  You may obtain a copy of the License at
-# 
-#   http://www.apache.org/licenses/LICENSE-2.0
-# 
-# Unless required by applicable law or agreed to in writing,
-# software distributed under the License is distributed on an
-# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
-# KIND, either express or implied.  See the License for the
-# specific language governing permissions and limitations
-# under the License.
-#
-#-------------------------------------------------------------
-
-args <- commandArgs(TRUE)
-options(digits=22)
-
-library("Matrix")
-
-A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
-p = as.double(args[2]);
-
-s = quantile(A, p);
-m = as.matrix(s);
-
-writeMM(as(m, "CsparseMatrix"), paste(args[3], "R", sep="")); 
-
-
+#-------------------------------------------------------------
+#
+# Licensed to the Apache Software Foundation (ASF) under one
+# or more contributor license agreements.  See the NOTICE file
+# distributed with this work for additional information
+# regarding copyright ownership.  The ASF licenses this file
+# to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance
+# with the License.  You may obtain a copy of the License at
+# 
+#   http://www.apache.org/licenses/LICENSE-2.0
+# 
+# Unless required by applicable law or agreed to in writing,
+# software distributed under the License is distributed on an
+# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+# KIND, either express or implied.  See the License for the
+# specific language governing permissions and limitations
+# under the License.
+#
+#-------------------------------------------------------------
+
+args <- commandArgs(TRUE)
+options(digits=22)
+
+library("Matrix")
+
+A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
+p = as.double(args[2]);
+
+s = quantile(A, p);
+m = as.matrix(s);
+
+writeMM(as(m, "CsparseMatrix"), paste(args[3], "R", sep="")); 
+
+

http://git-wip-us.apache.org/repos/asf/incubator-systemml/blob/05d2c0a8/src/test/scripts/functions/binary/matrix/ScalarModulusTest.dml
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/binary/matrix/ScalarModulusTest.dml b/src/test/scripts/functions/binary/matrix/ScalarModulusTest.dml
index ceaa003..12468ce 100644
--- a/src/test/scripts/functions/binary/matrix/ScalarModulusTest.dml
+++ b/src/test/scripts/functions/binary/matrix/ScalarModulusTest.dml
@@ -1,40 +1,40 @@
-#-------------------------------------------------------------
-#
-# Licensed to the Apache Software Foundation (ASF) under one
-# or more contributor license agreements.  See the NOTICE file
-# distributed with this work for additional information
-# regarding copyright ownership.  The ASF licenses this file
-# to you under the Apache License, Version 2.0 (the
-# "License"); you may not use this file except in compliance
-# with the License.  You may obtain a copy of the License at
-# 
-#   http://www.apache.org/licenses/LICENSE-2.0
-# 
-# Unless required by applicable law or agreed to in writing,
-# software distributed under the License is distributed on an
-# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
-# KIND, either express or implied.  See the License for the
-# specific language governing permissions and limitations
-# under the License.
-#
-#-------------------------------------------------------------
-
-# junit test class: org.apache.sysml.test.integration.functions.binary.matrix.ScalarModulusTest.java
-
-$$vardeclaration$$
-
-Vector = read("$$indir$$vector", rows=$$rows$$, cols=1, format="text");
-VectorLeft = Vector %% $$divisor$$;
-write(VectorLeft, "$$outdir$$vector_left", format="text");
-
-Vector = read("$$indir$$vector", rows=$$rows$$, cols=1, format="text");
-VectorRight = $$dividend$$ %% Vector;
-write(VectorRight, "$$outdir$$vector_right", format="text");
-
-Matrix = read("$$indir$$matrix", rows=$$rows$$, cols=$$cols$$, format="text");
-MatrixLeft = Matrix %% $$divisor$$;
-write(MatrixLeft, "$$outdir$$matrix_left", format="text");
-
-Matrix = read("$$indir$$matrix", rows=$$rows$$, cols=$$cols$$, format="text");
-MatrixRight = $$dividend$$ %% Matrix;
+#-------------------------------------------------------------
+#
+# Licensed to the Apache Software Foundation (ASF) under one
+# or more contributor license agreements.  See the NOTICE file
+# distributed with this work for additional information
+# regarding copyright ownership.  The ASF licenses this file
+# to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance
+# with the License.  You may obtain a copy of the License at
+# 
+#   http://www.apache.org/licenses/LICENSE-2.0
+# 
+# Unless required by applicable law or agreed to in writing,
+# software distributed under the License is distributed on an
+# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+# KIND, either express or implied.  See the License for the
+# specific language governing permissions and limitations
+# under the License.
+#
+#-------------------------------------------------------------
+
+# junit test class: org.apache.sysml.test.integration.functions.binary.matrix.ScalarModulusTest.java
+
+$$vardeclaration$$
+
+Vector = read("$$indir$$vector", rows=$$rows$$, cols=1, format="text");
+VectorLeft = Vector %% $$divisor$$;
+write(VectorLeft, "$$outdir$$vector_left", format="text");
+
+Vector = read("$$indir$$vector", rows=$$rows$$, cols=1, format="text");
+VectorRight = $$dividend$$ %% Vector;
+write(VectorRight, "$$outdir$$vector_right", format="text");
+
+Matrix = read("$$indir$$matrix", rows=$$rows$$, cols=$$cols$$, format="text");
+MatrixLeft = Matrix %% $$divisor$$;
+write(MatrixLeft, "$$outdir$$matrix_left", format="text");
+
+Matrix = read("$$indir$$matrix", rows=$$rows$$, cols=$$cols$$, format="text");
+MatrixRight = $$dividend$$ %% Matrix;
 write(MatrixRight, "$$outdir$$matrix_right", format="text");
\ No newline at end of file

http://git-wip-us.apache.org/repos/asf/incubator-systemml/blob/05d2c0a8/src/test/scripts/functions/binary/matrix/TransposeMatrixMultiplication.R
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/binary/matrix/TransposeMatrixMultiplication.R b/src/test/scripts/functions/binary/matrix/TransposeMatrixMultiplication.R
index 8b73634..bfc621a 100644
--- a/src/test/scripts/functions/binary/matrix/TransposeMatrixMultiplication.R
+++ b/src/test/scripts/functions/binary/matrix/TransposeMatrixMultiplication.R
@@ -1,34 +1,34 @@
-#-------------------------------------------------------------
-#
-# Licensed to the Apache Software Foundation (ASF) under one
-# or more contributor license agreements.  See the NOTICE file
-# distributed with this work for additional information
-# regarding copyright ownership.  The ASF licenses this file
-# to you under the Apache License, Version 2.0 (the
-# "License"); you may not use this file except in compliance
-# with the License.  You may obtain a copy of the License at
-# 
-#   http://www.apache.org/licenses/LICENSE-2.0
-# 
-# Unless required by applicable law or agreed to in writing,
-# software distributed under the License is distributed on an
-# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
-# KIND, either express or implied.  See the License for the
-# specific language governing permissions and limitations
-# under the License.
-#
-#-------------------------------------------------------------
-
-args <- commandArgs(TRUE)
-options(digits=22)
-
-library("Matrix")
-
-A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
-B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
-
-C = t(A) %*% B;
-
-writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep="")); 
-
-
+#-------------------------------------------------------------
+#
+# Licensed to the Apache Software Foundation (ASF) under one
+# or more contributor license agreements.  See the NOTICE file
+# distributed with this work for additional information
+# regarding copyright ownership.  The ASF licenses this file
+# to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance
+# with the License.  You may obtain a copy of the License at
+# 
+#   http://www.apache.org/licenses/LICENSE-2.0
+# 
+# Unless required by applicable law or agreed to in writing,
+# software distributed under the License is distributed on an
+# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+# KIND, either express or implied.  See the License for the
+# specific language governing permissions and limitations
+# under the License.
+#
+#-------------------------------------------------------------
+
+args <- commandArgs(TRUE)
+options(digits=22)
+
+library("Matrix")
+
+A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
+B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
+
+C = t(A) %*% B;
+
+writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep="")); 
+
+

http://git-wip-us.apache.org/repos/asf/incubator-systemml/blob/05d2c0a8/src/test/scripts/functions/binary/matrix/TransposeMatrixMultiplicationMinus.R
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/binary/matrix/TransposeMatrixMultiplicationMinus.R b/src/test/scripts/functions/binary/matrix/TransposeMatrixMultiplicationMinus.R
index 7fbcb68..c94535c 100644
--- a/src/test/scripts/functions/binary/matrix/TransposeMatrixMultiplicationMinus.R
+++ b/src/test/scripts/functions/binary/matrix/TransposeMatrixMultiplicationMinus.R
@@ -1,34 +1,34 @@
-#-------------------------------------------------------------
-#
-# Licensed to the Apache Software Foundation (ASF) under one
-# or more contributor license agreements.  See the NOTICE file
-# distributed with this work for additional information
-# regarding copyright ownership.  The ASF licenses this file
-# to you under the Apache License, Version 2.0 (the
-# "License"); you may not use this file except in compliance
-# with the License.  You may obtain a copy of the License at
-# 
-#   http://www.apache.org/licenses/LICENSE-2.0
-# 
-# Unless required by applicable law or agreed to in writing,
-# software distributed under the License is distributed on an
-# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
-# KIND, either express or implied.  See the License for the
-# specific language governing permissions and limitations
-# under the License.
-#
-#-------------------------------------------------------------
-
-args <- commandArgs(TRUE)
-options(digits=22)
-
-library("Matrix")
-
-A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
-B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
-
-C = -t(A) %*% B;
-
-writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep="")); 
-
-
+#-------------------------------------------------------------
+#
+# Licensed to the Apache Software Foundation (ASF) under one
+# or more contributor license agreements.  See the NOTICE file
+# distributed with this work for additional information
+# regarding copyright ownership.  The ASF licenses this file
+# to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance
+# with the License.  You may obtain a copy of the License at
+# 
+#   http://www.apache.org/licenses/LICENSE-2.0
+# 
+# Unless required by applicable law or agreed to in writing,
+# software distributed under the License is distributed on an
+# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+# KIND, either express or implied.  See the License for the
+# specific language governing permissions and limitations
+# under the License.
+#
+#-------------------------------------------------------------
+
+args <- commandArgs(TRUE)
+options(digits=22)
+
+library("Matrix")
+
+A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
+B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
+
+C = -t(A) %*% B;
+
+writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep="")); 
+
+

http://git-wip-us.apache.org/repos/asf/incubator-systemml/blob/05d2c0a8/src/test/scripts/functions/binary/matrix/TransposeMatrixMultiplicationMinus.dml
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/binary/matrix/TransposeMatrixMultiplicationMinus.dml b/src/test/scripts/functions/binary/matrix/TransposeMatrixMultiplicationMinus.dml
index c9f9c22..a31e1bf 100644
--- a/src/test/scripts/functions/binary/matrix/TransposeMatrixMultiplicationMinus.dml
+++ b/src/test/scripts/functions/binary/matrix/TransposeMatrixMultiplicationMinus.dml
@@ -1,27 +1,27 @@
-#-------------------------------------------------------------
-#
-# Licensed to the Apache Software Foundation (ASF) under one
-# or more contributor license agreements.  See the NOTICE file
-# distributed with this work for additional information
-# regarding copyright ownership.  The ASF licenses this file
-# to you under the Apache License, Version 2.0 (the
-# "License"); you may not use this file except in compliance
-# with the License.  You may obtain a copy of the License at
-# 
-#   http://www.apache.org/licenses/LICENSE-2.0
-# 
-# Unless required by applicable law or agreed to in writing,
-# software distributed under the License is distributed on an
-# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
-# KIND, either express or implied.  See the License for the
-# specific language governing permissions and limitations
-# under the License.
-#
-#-------------------------------------------------------------
-
-A = read($1, rows=$2, cols=$3, format="text");
-B = read($4, rows=$5, cols=$6, format="text");
-
-C = -t(A) %*% B;
-
-write(C, $7, format="text");
+#-------------------------------------------------------------
+#
+# Licensed to the Apache Software Foundation (ASF) under one
+# or more contributor license agreements.  See the NOTICE file
+# distributed with this work for additional information
+# regarding copyright ownership.  The ASF licenses this file
+# to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance
+# with the License.  You may obtain a copy of the License at
+# 
+#   http://www.apache.org/licenses/LICENSE-2.0
+# 
+# Unless required by applicable law or agreed to in writing,
+# software distributed under the License is distributed on an
+# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+# KIND, either express or implied.  See the License for the
+# specific language governing permissions and limitations
+# under the License.
+#
+#-------------------------------------------------------------
+
+A = read($1, rows=$2, cols=$3, format="text");
+B = read($4, rows=$5, cols=$6, format="text");
+
+C = -t(A) %*% B;
+
+write(C, $7, format="text");

http://git-wip-us.apache.org/repos/asf/incubator-systemml/blob/05d2c0a8/src/test/scripts/functions/binary/matrix/UaggOuterChain.R
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/binary/matrix/UaggOuterChain.R b/src/test/scripts/functions/binary/matrix/UaggOuterChain.R
index 846e11c..c7e9f3a 100644
--- a/src/test/scripts/functions/binary/matrix/UaggOuterChain.R
+++ b/src/test/scripts/functions/binary/matrix/UaggOuterChain.R
@@ -1,34 +1,34 @@
-#-------------------------------------------------------------
-#
-# Licensed to the Apache Software Foundation (ASF) under one
-# or more contributor license agreements.  See the NOTICE file
-# distributed with this work for additional information
-# regarding copyright ownership.  The ASF licenses this file
-# to you under the Apache License, Version 2.0 (the
-# "License"); you may not use this file except in compliance
-# with the License.  You may obtain a copy of the License at
-# 
-#   http://www.apache.org/licenses/LICENSE-2.0
-# 
-# Unless required by applicable law or agreed to in writing,
-# software distributed under the License is distributed on an
-# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
-# KIND, either express or implied.  See the License for the
-# specific language governing permissions and limitations
-# under the License.
-#
-#-------------------------------------------------------------
-
-args <- commandArgs(TRUE)
-options(digits=22)
-
-library("Matrix")
-
-A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
-B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
-
-C = rowSums(outer(A,B,"<"));
-
-writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep="")); 
-
-
+#-------------------------------------------------------------
+#
+# Licensed to the Apache Software Foundation (ASF) under one
+# or more contributor license agreements.  See the NOTICE file
+# distributed with this work for additional information
+# regarding copyright ownership.  The ASF licenses this file
+# to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance
+# with the License.  You may obtain a copy of the License at
+# 
+#   http://www.apache.org/licenses/LICENSE-2.0
+# 
+# Unless required by applicable law or agreed to in writing,
+# software distributed under the License is distributed on an
+# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+# KIND, either express or implied.  See the License for the
+# specific language governing permissions and limitations
+# under the License.
+#
+#-------------------------------------------------------------
+
+args <- commandArgs(TRUE)
+options(digits=22)
+
+library("Matrix")
+
+A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
+B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
+
+C = rowSums(outer(A,B,"<"));
+
+writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep="")); 
+
+

http://git-wip-us.apache.org/repos/asf/incubator-systemml/blob/05d2c0a8/src/test/scripts/functions/binary/matrix/UaggOuterChainColSums.R
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/binary/matrix/UaggOuterChainColSums.R b/src/test/scripts/functions/binary/matrix/UaggOuterChainColSums.R
index f8b9cf1..fbfbd10 100644
--- a/src/test/scripts/functions/binary/matrix/UaggOuterChainColSums.R
+++ b/src/test/scripts/functions/binary/matrix/UaggOuterChainColSums.R
@@ -1,34 +1,34 @@
-#-------------------------------------------------------------
-#
-# Licensed to the Apache Software Foundation (ASF) under one
-# or more contributor license agreements.  See the NOTICE file
-# distributed with this work for additional information
-# regarding copyright ownership.  The ASF licenses this file
-# to you under the Apache License, Version 2.0 (the
-# "License"); you may not use this file except in compliance
-# with the License.  You may obtain a copy of the License at
-# 
-#   http://www.apache.org/licenses/LICENSE-2.0
-# 
-# Unless required by applicable law or agreed to in writing,
-# software distributed under the License is distributed on an
-# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
-# KIND, either express or implied.  See the License for the
-# specific language governing permissions and limitations
-# under the License.
-#
-#-------------------------------------------------------------
-
-args <- commandArgs(TRUE)
-options(digits=22)
-
-library("Matrix")
-
-A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
-B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
-
-C <- t(as.matrix(colSums(outer(A,B,"<"))));
-
-writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep="")); 
-
-
+#-------------------------------------------------------------
+#
+# Licensed to the Apache Software Foundation (ASF) under one
+# or more contributor license agreements.  See the NOTICE file
+# distributed with this work for additional information
+# regarding copyright ownership.  The ASF licenses this file
+# to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance
+# with the License.  You may obtain a copy of the License at
+# 
+#   http://www.apache.org/licenses/LICENSE-2.0
+# 
+# Unless required by applicable law or agreed to in writing,
+# software distributed under the License is distributed on an
+# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+# KIND, either express or implied.  See the License for the
+# specific language governing permissions and limitations
+# under the License.
+#
+#-------------------------------------------------------------
+
+args <- commandArgs(TRUE)
+options(digits=22)
+
+library("Matrix")
+
+A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
+B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
+
+C <- t(as.matrix(colSums(outer(A,B,"<"))));
+
+writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep="")); 
+
+

http://git-wip-us.apache.org/repos/asf/incubator-systemml/blob/05d2c0a8/src/test/scripts/functions/binary/matrix/UaggOuterChainEquals.R
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/binary/matrix/UaggOuterChainEquals.R b/src/test/scripts/functions/binary/matrix/UaggOuterChainEquals.R
index dda255c..b14e7b0 100644
--- a/src/test/scripts/functions/binary/matrix/UaggOuterChainEquals.R
+++ b/src/test/scripts/functions/binary/matrix/UaggOuterChainEquals.R
@@ -1,34 +1,34 @@
-#-------------------------------------------------------------
-#
-# Licensed to the Apache Software Foundation (ASF) under one
-# or more contributor license agreements.  See the NOTICE file
-# distributed with this work for additional information
-# regarding copyright ownership.  The ASF licenses this file
-# to you under the Apache License, Version 2.0 (the
-# "License"); you may not use this file except in compliance
-# with the License.  You may obtain a copy of the License at
-# 
-#   http://www.apache.org/licenses/LICENSE-2.0
-# 
-# Unless required by applicable law or agreed to in writing,
-# software distributed under the License is distributed on an
-# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
-# KIND, either express or implied.  See the License for the
-# specific language governing permissions and limitations
-# under the License.
-#
-#-------------------------------------------------------------
-
-args <- commandArgs(TRUE)
-options(digits=22)
-
-library("Matrix")
-
-A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
-B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
-
-C = rowSums(outer(A,B,"=="));
-
-writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep="")); 
-
-
+#-------------------------------------------------------------
+#
+# Licensed to the Apache Software Foundation (ASF) under one
+# or more contributor license agreements.  See the NOTICE file
+# distributed with this work for additional information
+# regarding copyright ownership.  The ASF licenses this file
+# to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance
+# with the License.  You may obtain a copy of the License at
+# 
+#   http://www.apache.org/licenses/LICENSE-2.0
+# 
+# Unless required by applicable law or agreed to in writing,
+# software distributed under the License is distributed on an
+# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+# KIND, either express or implied.  See the License for the
+# specific language governing permissions and limitations
+# under the License.
+#
+#-------------------------------------------------------------
+
+args <- commandArgs(TRUE)
+options(digits=22)
+
+library("Matrix")
+
+A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
+B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
+
+C = rowSums(outer(A,B,"=="));
+
+writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep="")); 
+
+

http://git-wip-us.apache.org/repos/asf/incubator-systemml/blob/05d2c0a8/src/test/scripts/functions/binary/matrix/UaggOuterChainEqualsColSums.R
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/binary/matrix/UaggOuterChainEqualsColSums.R b/src/test/scripts/functions/binary/matrix/UaggOuterChainEqualsColSums.R
index bc07ef8..b948c1d 100644
--- a/src/test/scripts/functions/binary/matrix/UaggOuterChainEqualsColSums.R
+++ b/src/test/scripts/functions/binary/matrix/UaggOuterChainEqualsColSums.R
@@ -1,34 +1,34 @@
-#-------------------------------------------------------------
-#
-# Licensed to the Apache Software Foundation (ASF) under one
-# or more contributor license agreements.  See the NOTICE file
-# distributed with this work for additional information
-# regarding copyright ownership.  The ASF licenses this file
-# to you under the Apache License, Version 2.0 (the
-# "License"); you may not use this file except in compliance
-# with the License.  You may obtain a copy of the License at
-# 
-#   http://www.apache.org/licenses/LICENSE-2.0
-# 
-# Unless required by applicable law or agreed to in writing,
-# software distributed under the License is distributed on an
-# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
-# KIND, either express or implied.  See the License for the
-# specific language governing permissions and limitations
-# under the License.
-#
-#-------------------------------------------------------------
-
-args <- commandArgs(TRUE)
-options(digits=22)
-
-library("Matrix")
-
-A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
-B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
-
-C <- t(as.matrix(colSums(outer(A,B,"=="))));
-
-writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep="")); 
-
-
+#-------------------------------------------------------------
+#
+# Licensed to the Apache Software Foundation (ASF) under one
+# or more contributor license agreements.  See the NOTICE file
+# distributed with this work for additional information
+# regarding copyright ownership.  The ASF licenses this file
+# to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance
+# with the License.  You may obtain a copy of the License at
+# 
+#   http://www.apache.org/licenses/LICENSE-2.0
+# 
+# Unless required by applicable law or agreed to in writing,
+# software distributed under the License is distributed on an
+# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+# KIND, either express or implied.  See the License for the
+# specific language governing permissions and limitations
+# under the License.
+#
+#-------------------------------------------------------------
+
+args <- commandArgs(TRUE)
+options(digits=22)
+
+library("Matrix")
+
+A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
+B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
+
+C <- t(as.matrix(colSums(outer(A,B,"=="))));
+
+writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep="")); 
+
+

http://git-wip-us.apache.org/repos/asf/incubator-systemml/blob/05d2c0a8/src/test/scripts/functions/binary/matrix/UaggOuterChainEqualsSums.R
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/binary/matrix/UaggOuterChainEqualsSums.R b/src/test/scripts/functions/binary/matrix/UaggOuterChainEqualsSums.R
index 6c5237e..57d2d86 100644
--- a/src/test/scripts/functions/binary/matrix/UaggOuterChainEqualsSums.R
+++ b/src/test/scripts/functions/binary/matrix/UaggOuterChainEqualsSums.R
@@ -1,34 +1,34 @@
-#-------------------------------------------------------------
-#
-# Licensed to the Apache Software Foundation (ASF) under one
-# or more contributor license agreements.  See the NOTICE file
-# distributed with this work for additional information
-# regarding copyright ownership.  The ASF licenses this file
-# to you under the Apache License, Version 2.0 (the
-# "License"); you may not use this file except in compliance
-# with the License.  You may obtain a copy of the License at
-# 
-#   http://www.apache.org/licenses/LICENSE-2.0
-# 
-# Unless required by applicable law or agreed to in writing,
-# software distributed under the License is distributed on an
-# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
-# KIND, either express or implied.  See the License for the
-# specific language governing permissions and limitations
-# under the License.
-#
-#-------------------------------------------------------------
-
-args <- commandArgs(TRUE)
-options(digits=22)
-
-library("Matrix")
-
-A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
-B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
-
-C = sum(outer(A,B,"=="));
-
-writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep="")); 
-
-
+#-------------------------------------------------------------
+#
+# Licensed to the Apache Software Foundation (ASF) under one
+# or more contributor license agreements.  See the NOTICE file
+# distributed with this work for additional information
+# regarding copyright ownership.  The ASF licenses this file
+# to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance
+# with the License.  You may obtain a copy of the License at
+# 
+#   http://www.apache.org/licenses/LICENSE-2.0
+# 
+# Unless required by applicable law or agreed to in writing,
+# software distributed under the License is distributed on an
+# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+# KIND, either express or implied.  See the License for the
+# specific language governing permissions and limitations
+# under the License.
+#
+#-------------------------------------------------------------
+
+args <- commandArgs(TRUE)
+options(digits=22)
+
+library("Matrix")
+
+A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
+B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
+
+C = sum(outer(A,B,"=="));
+
+writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep="")); 
+
+

http://git-wip-us.apache.org/repos/asf/incubator-systemml/blob/05d2c0a8/src/test/scripts/functions/binary/matrix/UaggOuterChainGreater.R
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/binary/matrix/UaggOuterChainGreater.R b/src/test/scripts/functions/binary/matrix/UaggOuterChainGreater.R
index d5f803d..ff310ab 100644
--- a/src/test/scripts/functions/binary/matrix/UaggOuterChainGreater.R
+++ b/src/test/scripts/functions/binary/matrix/UaggOuterChainGreater.R
@@ -19,17 +19,17 @@
 #
 #-------------------------------------------------------------
 
-
-args <- commandArgs(TRUE)
-options(digits=22)
-
-library("Matrix")
-
-A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
-B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
-
-C = rowSums(outer(A,B,">"));
-
-writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep="")); 
-
-
+
+args <- commandArgs(TRUE)
+options(digits=22)
+
+library("Matrix")
+
+A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
+B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
+
+C = rowSums(outer(A,B,">"));
+
+writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep="")); 
+
+

http://git-wip-us.apache.org/repos/asf/incubator-systemml/blob/05d2c0a8/src/test/scripts/functions/binary/matrix/UaggOuterChainGreaterColSums.R
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/binary/matrix/UaggOuterChainGreaterColSums.R b/src/test/scripts/functions/binary/matrix/UaggOuterChainGreaterColSums.R
index 847febe..6238bb9 100644
--- a/src/test/scripts/functions/binary/matrix/UaggOuterChainGreaterColSums.R
+++ b/src/test/scripts/functions/binary/matrix/UaggOuterChainGreaterColSums.R
@@ -19,17 +19,17 @@
 #
 #-------------------------------------------------------------
 
-
-args <- commandArgs(TRUE)
-options(digits=22)
-
-library("Matrix")
-
-A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
-B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
-
-C <- t(as.matrix(colSums(outer(A,B,">"))));
-
-writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep="")); 
-
-
+
+args <- commandArgs(TRUE)
+options(digits=22)
+
+library("Matrix")
+
+A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
+B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
+
+C <- t(as.matrix(colSums(outer(A,B,">"))));
+
+writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep="")); 
+
+

http://git-wip-us.apache.org/repos/asf/incubator-systemml/blob/05d2c0a8/src/test/scripts/functions/binary/matrix/UaggOuterChainGreaterEquals.R
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/binary/matrix/UaggOuterChainGreaterEquals.R b/src/test/scripts/functions/binary/matrix/UaggOuterChainGreaterEquals.R
index 713f3d3..3d73686 100644
--- a/src/test/scripts/functions/binary/matrix/UaggOuterChainGreaterEquals.R
+++ b/src/test/scripts/functions/binary/matrix/UaggOuterChainGreaterEquals.R
@@ -19,17 +19,17 @@
 #
 #-------------------------------------------------------------
 
-
-args <- commandArgs(TRUE)
-options(digits=22)
-
-library("Matrix")
-
-A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
-B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
-
-C = rowSums(outer(A,B,">="));
-
-writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep="")); 
-
-
+
+args <- commandArgs(TRUE)
+options(digits=22)
+
+library("Matrix")
+
+A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
+B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
+
+C = rowSums(outer(A,B,">="));
+
+writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep="")); 
+
+

http://git-wip-us.apache.org/repos/asf/incubator-systemml/blob/05d2c0a8/src/test/scripts/functions/binary/matrix/UaggOuterChainGreaterEqualsColSums.R
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/binary/matrix/UaggOuterChainGreaterEqualsColSums.R b/src/test/scripts/functions/binary/matrix/UaggOuterChainGreaterEqualsColSums.R
index 7a02c6f..0ab7ee2 100644
--- a/src/test/scripts/functions/binary/matrix/UaggOuterChainGreaterEqualsColSums.R
+++ b/src/test/scripts/functions/binary/matrix/UaggOuterChainGreaterEqualsColSums.R
@@ -19,17 +19,17 @@
 #
 #-------------------------------------------------------------
 
-
-args <- commandArgs(TRUE)
-options(digits=22)
-
-library("Matrix")
-
-A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
-B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
-
-C <- t(as.matrix(colSums(outer(A,B,">="))));
-
-writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep="")); 
-
-
+
+args <- commandArgs(TRUE)
+options(digits=22)
+
+library("Matrix")
+
+A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
+B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
+
+C <- t(as.matrix(colSums(outer(A,B,">="))));
+
+writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep="")); 
+
+

http://git-wip-us.apache.org/repos/asf/incubator-systemml/blob/05d2c0a8/src/test/scripts/functions/binary/matrix/UaggOuterChainLessEquals.R
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/binary/matrix/UaggOuterChainLessEquals.R b/src/test/scripts/functions/binary/matrix/UaggOuterChainLessEquals.R
index 4292d08..5aa68d8 100644
--- a/src/test/scripts/functions/binary/matrix/UaggOuterChainLessEquals.R
+++ b/src/test/scripts/functions/binary/matrix/UaggOuterChainLessEquals.R
@@ -19,17 +19,17 @@
 #
 #-------------------------------------------------------------
 
-
-args <- commandArgs(TRUE)
-options(digits=22)
-
-library("Matrix")
-
-A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
-B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
-
-C = rowSums(outer(A,B,"<="));
-
-writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep="")); 
-
-
+
+args <- commandArgs(TRUE)
+options(digits=22)
+
+library("Matrix")
+
+A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
+B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
+
+C = rowSums(outer(A,B,"<="));
+
+writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep="")); 
+
+

http://git-wip-us.apache.org/repos/asf/incubator-systemml/blob/05d2c0a8/src/test/scripts/functions/binary/matrix/UaggOuterChainLessEqualsColSums.R
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/binary/matrix/UaggOuterChainLessEqualsColSums.R b/src/test/scripts/functions/binary/matrix/UaggOuterChainLessEqualsColSums.R
index bc743db..e8e65aa 100644
--- a/src/test/scripts/functions/binary/matrix/UaggOuterChainLessEqualsColSums.R
+++ b/src/test/scripts/functions/binary/matrix/UaggOuterChainLessEqualsColSums.R
@@ -19,17 +19,17 @@
 #
 #-------------------------------------------------------------
 
-
-args <- commandArgs(TRUE)
-options(digits=22)
-
-library("Matrix")
-
-A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
-B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
-
-C <- t(as.matrix(colSums(outer(A,B,"<="))));
-
-writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep="")); 
-
-
+
+args <- commandArgs(TRUE)
+options(digits=22)
+
+library("Matrix")
+
+A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
+B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
+
+C <- t(as.matrix(colSums(outer(A,B,"<="))));
+
+writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep="")); 
+
+

http://git-wip-us.apache.org/repos/asf/incubator-systemml/blob/05d2c0a8/src/test/scripts/functions/binary/matrix/UaggOuterChainNotEquals.R
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/binary/matrix/UaggOuterChainNotEquals.R b/src/test/scripts/functions/binary/matrix/UaggOuterChainNotEquals.R
index 4875faa..7edb245 100644
--- a/src/test/scripts/functions/binary/matrix/UaggOuterChainNotEquals.R
+++ b/src/test/scripts/functions/binary/matrix/UaggOuterChainNotEquals.R
@@ -19,17 +19,17 @@
 #
 #-------------------------------------------------------------
 
-
-args <- commandArgs(TRUE)
-options(digits=22)
-
-library("Matrix")
-
-A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
-B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
-
-C = rowSums(outer(A,B,"!="));
-
-writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep="")); 
-
-
+
+args <- commandArgs(TRUE)
+options(digits=22)
+
+library("Matrix")
+
+A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
+B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
+
+C = rowSums(outer(A,B,"!="));
+
+writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep="")); 
+
+

http://git-wip-us.apache.org/repos/asf/incubator-systemml/blob/05d2c0a8/src/test/scripts/functions/binary/matrix/UaggOuterChainNotEqualsColSums.R
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/binary/matrix/UaggOuterChainNotEqualsColSums.R b/src/test/scripts/functions/binary/matrix/UaggOuterChainNotEqualsColSums.R
index 2aea9d5..13ca5ad 100644
--- a/src/test/scripts/functions/binary/matrix/UaggOuterChainNotEqualsColSums.R
+++ b/src/test/scripts/functions/binary/matrix/UaggOuterChainNotEqualsColSums.R
@@ -19,17 +19,17 @@
 #
 #-------------------------------------------------------------
 
-
-args <- commandArgs(TRUE)
-options(digits=22)
-
-library("Matrix")
-
-A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
-B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
-
-C <- t(as.matrix(colSums(outer(A,B,"!="))));
-
-writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep="")); 
-
-
+
+args <- commandArgs(TRUE)
+options(digits=22)
+
+library("Matrix")
+
+A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
+B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
+
+C <- t(as.matrix(colSums(outer(A,B,"!="))));
+
+writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep="")); 
+
+

http://git-wip-us.apache.org/repos/asf/incubator-systemml/blob/05d2c0a8/src/test/scripts/functions/binary/matrix/UaggOuterChainSums.R
----------------------------------------------------------------------
diff --git a/src/test/scripts/functions/binary/matrix/UaggOuterChainSums.R b/src/test/scripts/functions/binary/matrix/UaggOuterChainSums.R
index 2065bef..1d8a95a 100644
--- a/src/test/scripts/functions/binary/matrix/UaggOuterChainSums.R
+++ b/src/test/scripts/functions/binary/matrix/UaggOuterChainSums.R
@@ -1,33 +1,33 @@
-#-------------------------------------------------------------
-#
-# Licensed to the Apache Software Foundation (ASF) under one
-# or more contributor license agreements.  See the NOTICE file
-# distributed with this work for additional information
-# regarding copyright ownership.  The ASF licenses this file
-# to you under the Apache License, Version 2.0 (the
-# "License"); you may not use this file except in compliance
-# with the License.  You may obtain a copy of the License at
-# 
-#   http://www.apache.org/licenses/LICENSE-2.0
-# 
-# Unless required by applicable law or agreed to in writing,
-# software distributed under the License is distributed on an
-# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
-# KIND, either express or implied.  See the License for the
-# specific language governing permissions and limitations
-# under the License.
-#
-#-------------------------------------------------------------
-
-args <- commandArgs(TRUE)
-options(digits=22)
-
-library("Matrix")
-
-A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
-B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
-
-C = sum(outer(A,B,"<"));
-
-writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep=""));  
-
+#-------------------------------------------------------------
+#
+# Licensed to the Apache Software Foundation (ASF) under one
+# or more contributor license agreements.  See the NOTICE file
+# distributed with this work for additional information
+# regarding copyright ownership.  The ASF licenses this file
+# to you under the Apache License, Version 2.0 (the
+# "License"); you may not use this file except in compliance
+# with the License.  You may obtain a copy of the License at
+# 
+#   http://www.apache.org/licenses/LICENSE-2.0
+# 
+# Unless required by applicable law or agreed to in writing,
+# software distributed under the License is distributed on an
+# "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
+# KIND, either express or implied.  See the License for the
+# specific language governing permissions and limitations
+# under the License.
+#
+#-------------------------------------------------------------
+
+args <- commandArgs(TRUE)
+options(digits=22)
+
+library("Matrix")
+
+A <- as.matrix(readMM(paste(args[1], "A.mtx", sep="")))
+B <- as.matrix(readMM(paste(args[1], "B.mtx", sep="")))
+
+C = sum(outer(A,B,"<"));
+
+writeMM(as(C, "CsparseMatrix"), paste(args[2], "C", sep=""));  
+