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.
   */
  
  /*!
   * \brief External function interface to rocBLAS libraries
   * \file tags.h
   */
  #ifndef TOPI_CONTRIB_ROCBLAS_H_
  #define TOPI_CONTRIB_ROCBLAS_H_
  
  #include "tvm/top/operation.h"
  #include "topi/detail/extern.h"
  
  namespace topi {
  namespace contrib {
  using namespace tvm;
  using namespace tvm::top;
  /*!
  * \brief Create an op that multiplies lhs and rhs with rocBLAS
  *
  * \param lhs The left matrix operand
  * \param rhs The right matrix operand
  * \param transa Whether to transpose lhs
  * \param transb Whether to transpose rhs
  *
  * \return The output tensor
  */
  inline Tensor rocblas_matmul(const Tensor& lhs,
                               const Tensor& rhs,
                               bool transa,
                               bool transb) {
    auto n = transa ? lhs->shape[1] : lhs->shape[0];
    auto m = transb ? rhs->shape[0] : rhs->shape[1];
  
    return make_extern(
      { { n, m } }, { lhs->dtype }, { lhs, rhs },
      [&](Array<Buffer> ins, Array<Buffer> outs) {
        return call_packed({
          PrimExpr("tvm.contrib.rocblas.matmul"),
          pack_buffer(ins[0]),
          pack_buffer(ins[1]),
          pack_buffer(outs[0]),
          transa,
          transb });
      }, "C", "", {})[0];
  }
  
  }  // namespace contrib
  }  // namespace topi
  
  #endif  // TOPI_CONTRIB_ROCBLAS_H_
  