Module Make_frontend.Einsum
type token = | Axis of char| Ellipsis
val parse_operand : string -> token listval parse_equation : string -> token list array * token list optionval handle_repeated_indices :
('a, 'b) B.t ->
token list ->
('a, 'b) B.t * token listtype tensor_info = {id : int;shape : int array;axis_labels : char list;
}val contract_pair :
('a, 'b) B.t ->
Stdlib.String.t ->
('a, 'b) B.t ->
Stdlib.String.t ->
Stdlib.String.t ->
('a, 'b) B.tval calculate : string -> ('a, 'b) B.t array -> ('a, 'b) B.t