CONSTANT N = 3; -- mnozenie :-) SUBDESIGN lab3cw3 ( a[N-1..0], b[N-1..0] : INPUT; p[2*N-1..0] : OUTPUT; ) BEGIN IF b[] == 0 THEN p[] = 0; ELSIF b[] == 1 THEN p[] = (0, a[]); ELSIF b[] == 2 THEN p[] = (0, a[], B"0"); ELSIF b[] == 3 THEN p[] = (0, a[], B"0") + (0, a[]); ELSIF b[] == 4 THEN p[] = (0, a[], B"00"); ELSIF b[] == 5 THEN p[] = (0, a[]) + (0, a[], B"00"); ELSIF b[] == 6 THEN p[] = (0, a[], B"0") + (0, a[], B"00"); ELSIF b[] == 7 THEN p[] = (0, a[]) + (0, a[], B"0") + (0, a[], B"00"); END IF; END;