1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
|
//Unolved Example 2:
clear;
clc;
disp("Unsolved example 2");
//Implementing Stack using union:
function[stack]=sta_union(etype,a)
stackelement=struct('etype',etype);
[k,l]=size(a);
select stackelement.etype,
case 'int' then
a=int32(a);
stack=struct('top',l,'items',a);,
case 'float' then
a=double(a);
stack=struct('top',l,'items',a);,
case 'char' then
a=string(a);
stack=struct('top',l,'items',a);,
end
disp(stack,"Stack is:");
endfunction
a=[32 12.34 232 32.322]
stack=sta_union('float',a)
stack=sta_union('int',a)
stack=sta_union('char',a)
|