src/test/scripts/functions/federated/FederatedRCBindTestReference.dml

#-------------------------------------------------------------
#
# 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.
#
#-------------------------------------------------------------

if($in_partitioned) {
  A = rbind(read($in_A1), read($in_A2));
  B = rbind(read($in_B1), read($in_B2));
}
else {
  A = read($in_A1);
  B = read($in_B1);
}

R = rbind(A, B)
C = cbind(A, B)
R_LF = rbind(B, A)
C_LF = cbind(B, A)
R_FF_misaligned = rbind(A, A);
C_FF_aligned = cbind(A, A);

write(R, $out_R_FF)
write(R, $out_R_FL)
write(R_LF, $out_R_LF)
write(C, $out_C_FF)
write(C, $out_C_FL)
write(C_LF, $out_C_LF)
write(R_FF_misaligned, $out_R_FF_misaligned);
write(C_FF_aligned, $out_C_FF_aligned);