apache / incubator-retired-mrql / ab6bac73711b0d5fa5f05fa2c9b4c558c0576042 / . / queries / matrix.mrql

/** | |

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

*/ | |

Xmatrix = source(binary,"tmp/Xmatrix.bin"); | |

Ymatrix = source(binary,"tmp/Ymatrix.bin"); | |

// matrix transpose: | |

macro transpose ( X ) { | |

select (x,j,i) | |

from (x,i,j) in X | |

}; | |

// matrix multiplication: | |

macro multiply ( X, Y ) { | |

select (sum(z),i,j) | |

from (x,i,k) in X, (y,k,j) in Y, z = x*y | |

group by (i,j) | |

}; | |

multiply(Xmatrix,Ymatrix); |