Method create_program

test/verify/test_shrink.cpp:36–73

struct test_shrink : verify_program<test_shrink<T>>
{
    migraphx::program create_program() const
    {
        migraphx::program p;
        float bias  = 1.5;
        float lambd = 1.5;
        auto* mm    = p.get_main_module();
        migraphx::shape is{T, {2, 3}};
        std::vector<float> data;
        migraphx::shape::visit(T, [&](auto as) {
            as.is_signed() ? data.assign({-3.0, -2.0, -1.0, 0.0, 1.0, 2.0})
                           : data.assign({3.0, 2.0, 1.0, 0.0, 1.0, 2.0});
        });
        auto x        = mm->add_literal(migraphx::literal{is, data});
        auto lit_bias = mm->add_literal(migraphx::literal{migraphx::shape::float_type, {bias}});
        auto lit_neg_lambd =
            mm->add_literal(migraphx::literal{migraphx::shape::float_type, {-lambd}});
        auto lit_lambd = mm->add_literal(migraphx::literal{migraphx::shape::float_type, {lambd}});

        auto x_plus_bias = add_common_op(*mm, migraphx::make_op("add"), {x, lit_bias});
        auto x_min_bias  = add_common_op(*mm, migraphx::make_op("sub"), {x, lit_bias});

        auto cond1   = add_common_op(*mm, migraphx::make_op("less"), {x, lit_neg_lambd});
        auto cond2_a = add_common_op(*mm, migraphx::make_op("not"), {cond1});
        auto cond2_b = add_common_op(*mm, migraphx::make_op("greater"), {x, lit_lambd});
        auto cond2   = add_common_op(*mm, migraphx::make_op("logical_and"), {cond2_a, cond2_b});

        auto mul1 = mm->add_instruction(migraphx::make_op("convert", {{"target_type", T}}), cond1);
        auto mul2 = mm->add_instruction(migraphx::make_op("convert", {{"target_type", T}}), cond2);

        auto first  = add_common_op(*mm, migraphx::make_op("mul"), {mul1, x_plus_bias});
        auto second = add_common_op(*mm, migraphx::make_op("mul"), {mul2, x_min_bias});
        auto ret    = add_common_op(*mm, migraphx::make_op("add"), {first, second});
        if(ret->get_shape().type() != T)
        {
            mm->add_instruction(migraphx::make_op("convert", {{"target_type", T}}), ret);
        }
        return p;
    }
};

template struct test_shrink<migraphx::shape::double_type>;