Lines Matching full:kind
12 integer(kind=kind(m1j1)) :: t_s1m1j1
13 integer(kind=kind(m1s1j1)) :: t_s1j1 ! implicitly typed in s1
17 integer(kind=kind(m1j2)) :: t_s1bm1j2
19 integer(kind=kind(m1s1j2)) :: t_s1bm1s1j2
21 integer(kind=kind(m1s1j3)) :: t_m1s1j3 ! m1s1j3 implicitly typed in s1
27 integer(kind=kind(m1j3)) :: t_m1j3
29 integer(kind=kind(m1s1j3)) :: t_m1s1j3
33 integer(kind=kind(m1j4)) :: t_m1j4
35 integer(kind=kind(m1s1j4)) :: t_m1s1j4
37 integer(kind=kind(m1s2j1)) :: t_m1s2j1
39 integer(kind=kind(m1s2j2)) :: t_m1s2j2 ! m1s2j2 implicitly typed in s2
52 integer(kind=kind(m2j1)) :: t_s1m2j1
54 integer(kind=kind(m2s1j1)) :: t_s1j1
58 integer(kind=kind(m2j2)) :: t_s1bm2j2
60 integer(kind=kind(m2s1j2)) :: t_s1bm2s1j2
62 integer(kind=kind(m2s1j3)) :: t_m2s1j3
68 integer(kind=kind(m2j3)) :: t_m2j3
70 integer(kind=kind(m2s1j3)) :: t_m2s1j3
74 integer(kind=kind(m2j4)) :: t_m2j4
76 integer(kind=kind(m2s1j4)) :: t_m2s1j4
78 integer(kind=kind(m2s2j1)) :: t_m2s2j1
80 integer(kind=kind(m2s2j2)) :: t_m2s2j2