Lines Matching refs:B
7 integer :: f, realpart = B"0101", img = B"1111", resint
13 integer, parameter :: a = B"110A"
15 integer, parameter :: b = B"1232"
17 integer, parameter :: b1 = B"010101010101010101010101011111111111111111111&
36 data rescmplx / B"010101" /
38 resbit = BGE(B"0101", B"1111")
39 resbit = BGT(Z"0101", B"1111")
40 resbit = BLE(B"0101", B"1111")
41 resbit = BLT(B"0101", B"1111")
44 res = CMPLX (B"0101", B"1111", 4)
46 dbl = DBLE(B"1111")
50 dbl = DSHIFTL(B"0101",B"0101",2)
52 dbl = DSHIFTR(B"1010",B"1010",2)
53 dbl = DSHIFTL(B"0101",5,2) ! OK
54 dbl = DSHIFTR(B"1010",5,2) ! OK
57 resint = IAND(B"0001", B"0011")
58 resint = IAND(B"0001", 3)
61 resint = IEOR(B"0001", B"0011")
62 resint = IEOR(B"0001", 3)
64 resint = INT(B"1010")
67 res = IOR(B"0101", B"0011")
68 res = IOR(B"0101", 3)
71 res = MERGE_BITS(B"1101",3,11)
73 res = MERGE_BITS(B"1101",B"0011",11)
75 res = MERGE_BITS(B"1101",B"0011",B"1011")
76 res = MERGE_BITS(B"1101",3,B"1011")
78 res = REAL(B"1101")