PTO-TILE-MODEL-EXECUTION-COMPLEX

1// PTO-UNIT: {"id":"PTO-TILE-MODEL-EXECUTION-COMPLEX","surface":"tile","classification":["model","execution","complex"],"depends_on":["PTO-TILE-MODEL-EXECUTION-ELEMENTWISE","PTO-TILE-MODEL-EXECUTION-REARRANGEMENT","PTO-TILE-MODEL-LEGALITY-INDEXED-LAYOUT"]}2// PTO-REQ-TEPL-COMPLEX-001: ordering and histogram operations.3
4impdef func TileProfileOrderLeft(5    left: Word,6    right: Word,7    descending: boolean,8    data_type: TileDataType) => boolean9begin10    if descending then11        return SInt(left) >= SInt(right);12    end;13    return SInt(left) <= SInt(right);14end;15
16impdef func TileProfileValueIsNaN(17    value: Word,18    data_type: TileDataType) => boolean19begin20    return FALSE;21end;22
23pure func ExtractWordByte(value: Word, byte_index: integer {0..3}) => Byte24begin25    return value[(byte_index * 8) +: 8];26end;27
28func THISTOGRAM(destination: TileIndex, source: TileIndex, filter: TileIndex,29                selected_byte: integer {0..3})30begin31    var result = _Tiles[[destination]];32    let source_tile = _Tiles[[source]];33    let filter_tile = _Tiles[[filter]];34    assert TileOperandsLegal_THISTOGRAM(35        destination,36        source,37        filter,38        selected_byte);39    for row = 0 to source_tile.valid_rows - 1 looplimit 65536 do40        var counts: array [[256]] of Word;41        for bin = 0 to 255 do42            counts[[bin]] = Zeros{PTO_XLEN};43        end;44        for column = 0 to source_tile.valid_columns - 1 looplimit 65536 do45            let source_element = TileLogicalLinearIndex(46                source_tile,47                row as integer {0..65535},48                column as integer {0..65535});49            let value = TileReadLogicalElement(source_tile, source_element);50            var selected = TRUE;51            if source_tile.data_type == TileDataType_U16 &&52               selected_byte == 0 then53                let filter_element = TileLogicalLinearIndex(54                    filter_tile,55                    row as integer {0..65535},56                    0);57                selected = ExtractWordByte(value, 1) ==58                    TileReadLogicalElement(filter_tile, filter_element)[7:0];59            elsif source_tile.data_type == TileDataType_U32 then60                if selected_byte <= 2 then61                    selected = ExtractWordByte(value, 3) ==62                        TileReadLogicalElement(filter_tile,63                            TileLogicalLinearIndex(filter_tile, 0, 0))[7:0];64                end;65                if selected && selected_byte <= 1 then66                    selected = ExtractWordByte(value, 2) ==67                        TileReadLogicalElement(filter_tile,68                            TileLogicalLinearIndex(filter_tile, 1, 0))[7:0];69                end;70                if selected && selected_byte == 0 then71                    selected = ExtractWordByte(value, 1) ==72                        TileReadLogicalElement(filter_tile,73                            TileLogicalLinearIndex(filter_tile, 2, 0))[7:0];74                end;75            end;76            if selected then77                let bin = UInt(ExtractWordByte(value, selected_byte));78                counts[[bin]] = counts[[bin]] + 1;79            end;80        end;81        var cumulative: Word = Zeros{PTO_XLEN};82        for bin = 0 to 255 do83            cumulative = cumulative + counts[[bin]];84            let element = TileLogicalLinearIndex(85                result,86                row as integer {0..65535},87                bin as integer {0..65535});88            result = TileInfoWithLogicalElement(result, element, cumulative);89        end;90    end;91    result = TileWithValidRegionDefined(result);92    result = TileWithPadding(result, TilePad_Null);93    result.location = TileLocation_Any;94    _Tiles[[destination]] = result;95end;96