| /dports/math/libpgmath/flang-d07daf3/test/f90_correct/src/ |
| H A D | dt07.f90 | 17 type tscope type
21 type (tscope), parameter :: local = tscope(2,3)
22 type (tscope), parameter :: global = tscope(1,4)
26 type(tscope)::x
55 type(tscope)::m
60 m = tscope(2,3)
62 m = tscope(1,4)
64 m = tscope(3,5)
66 m = tscope(2,4)
68 m = tscope(2,5)
[all …]
|
| H A D | dt04.f90 | 17 type tscope type
22 type(tscope)::x
23 type (tscope), parameter :: local = tscope(2)
24 type (tscope), parameter :: global = tscope(1)
36 type tscope type
42 type tscope type
47 type(tscope)::x
50 type(tscope)::l,g,m
|
| H A D | dt06.f90 | 17 type tscope type
20 type (tscope), parameter :: local = tscope(2)
21 type (tscope), parameter :: global = tscope(1)
25 type(tscope)::x
43 type(tscope)::x
46 type(tscope)::l,g,m
|
| H A D | dt05.f90 | 17 type tscope type
21 type (tscope), parameter :: local = tscope(2)
22 type (tscope), parameter :: global = tscope(1)
26 type(tscope)::x
44 type(tscope)::x
47 type(tscope)::l,g,m
|
| H A D | dt08.f90 | 17 type tscope type
21 type (tscope), parameter :: local = tscope(2,3.333)
22 type (tscope), parameter :: global = tscope(1,4.444)
44 type(tscope)::m
|
| /dports/math/scalapack/scalapack-2.1.0/BLACS/SRC/ |
| H A D | blacs_barr_.c | 9 char tscope; in Cblacs_barrier() local
13 tscope = F2C_CharTrans(scope); in Cblacs_barrier()
14 tscope = Mlowcase(tscope); in Cblacs_barrier()
16 switch(tscope) in Cblacs_barrier()
|
| /dports/math/blacs/BLACS/SRC/MPI/ |
| H A D | blacs_barrier_.c | 9 char tscope; in Cblacs_barrier() local
13 tscope = F2C_CharTrans(scope); in Cblacs_barrier()
14 tscope = Mlowcase(tscope); in Cblacs_barrier()
16 switch(tscope) in Cblacs_barrier()
|
| H A D | igebr2d_.c | 79 char ttop, tscope; in Cigebr2d() local
85 tscope = F2C_CharTrans(scope); in Cigebr2d()
86 tscope = Mlowcase(tscope); in Cigebr2d()
88 BI_ArgCheck(Mpval(ConTxt), RT_BR, __FILE__, tscope, 'u', 'u', Mpval(m), in Cigebr2d()
101 switch(tscope) in Cigebr2d()
117 tscope); in Cigebr2d()
|
| H A D | zgebr2d_.c | 79 char ttop, tscope; in Czgebr2d() local
85 tscope = F2C_CharTrans(scope); in Czgebr2d()
86 tscope = Mlowcase(tscope); in Czgebr2d()
88 BI_ArgCheck(Mpval(ConTxt), RT_BR, __FILE__, tscope, 'u', 'u', Mpval(m), in Czgebr2d()
101 switch(tscope) in Czgebr2d()
117 tscope); in Czgebr2d()
|
| H A D | sgebr2d_.c | 79 char ttop, tscope; in Csgebr2d() local
85 tscope = F2C_CharTrans(scope); in Csgebr2d()
86 tscope = Mlowcase(tscope); in Csgebr2d()
88 BI_ArgCheck(Mpval(ConTxt), RT_BR, __FILE__, tscope, 'u', 'u', Mpval(m), in Csgebr2d()
101 switch(tscope) in Csgebr2d()
117 tscope); in Csgebr2d()
|
| H A D | strbr2d_.c | 92 char ttop, tscope, tuplo, tdiag; in Cstrbr2d() local
98 tscope = F2C_CharTrans(scope); in Cstrbr2d()
99 tscope = Mlowcase(tscope); in Cstrbr2d()
105 BI_ArgCheck(Mpval(ConTxt), RT_BR, __FILE__, tscope, tuplo, tdiag, Mpval(m), in Cstrbr2d()
118 switch(tscope) in Cstrbr2d()
134 tscope); in Cstrbr2d()
|
| H A D | ztrbr2d_.c | 92 char ttop, tscope, tuplo, tdiag; in Cztrbr2d() local
98 tscope = F2C_CharTrans(scope); in Cztrbr2d()
99 tscope = Mlowcase(tscope); in Cztrbr2d()
105 BI_ArgCheck(Mpval(ConTxt), RT_BR, __FILE__, tscope, tuplo, tdiag, Mpval(m), in Cztrbr2d()
118 switch(tscope) in Cztrbr2d()
134 tscope); in Cztrbr2d()
|
| /dports/math/blacs/BLACS_shared/SRC/MPI/ |
| H A D | blacs_barrier_.c | 9 char tscope; in Cblacs_barrier() local
13 tscope = F2C_CharTrans(scope); in Cblacs_barrier()
14 tscope = Mlowcase(tscope); in Cblacs_barrier()
16 switch(tscope) in Cblacs_barrier()
|
| H A D | dgebr2d_.c | 79 char ttop, tscope; in Cdgebr2d() local
85 tscope = F2C_CharTrans(scope); in Cdgebr2d()
86 tscope = Mlowcase(tscope); in Cdgebr2d()
88 BI_ArgCheck(Mpval(ConTxt), RT_BR, __FILE__, tscope, 'u', 'u', Mpval(m), in Cdgebr2d()
101 switch(tscope) in Cdgebr2d()
117 tscope); in Cdgebr2d()
|
| H A D | itrbr2d_.c | 92 char ttop, tscope, tuplo, tdiag; in Citrbr2d() local
98 tscope = F2C_CharTrans(scope); in Citrbr2d()
99 tscope = Mlowcase(tscope); in Citrbr2d()
105 BI_ArgCheck(Mpval(ConTxt), RT_BR, __FILE__, tscope, tuplo, tdiag, Mpval(m), in Citrbr2d()
118 switch(tscope) in Citrbr2d()
134 tscope); in Citrbr2d()
|
| H A D | strbr2d_.c | 92 char ttop, tscope, tuplo, tdiag; in Cstrbr2d() local
98 tscope = F2C_CharTrans(scope); in Cstrbr2d()
99 tscope = Mlowcase(tscope); in Cstrbr2d()
105 BI_ArgCheck(Mpval(ConTxt), RT_BR, __FILE__, tscope, tuplo, tdiag, Mpval(m), in Cstrbr2d()
118 switch(tscope) in Cstrbr2d()
134 tscope); in Cstrbr2d()
|
| H A D | cgebr2d_.c | 79 char ttop, tscope; in Ccgebr2d() local
85 tscope = F2C_CharTrans(scope); in Ccgebr2d()
86 tscope = Mlowcase(tscope); in Ccgebr2d()
88 BI_ArgCheck(Mpval(ConTxt), RT_BR, __FILE__, tscope, 'u', 'u', Mpval(m), in Ccgebr2d()
101 switch(tscope) in Ccgebr2d()
117 tscope); in Ccgebr2d()
|
| H A D | ctrbr2d_.c | 92 char ttop, tscope, tuplo, tdiag; in Cctrbr2d() local
98 tscope = F2C_CharTrans(scope); in Cctrbr2d()
99 tscope = Mlowcase(tscope); in Cctrbr2d()
105 BI_ArgCheck(Mpval(ConTxt), RT_BR, __FILE__, tscope, tuplo, tdiag, Mpval(m), in Cctrbr2d()
118 switch(tscope) in Cctrbr2d()
134 tscope); in Cctrbr2d()
|
| H A D | sgebr2d_.c | 79 char ttop, tscope; in Csgebr2d() local
85 tscope = F2C_CharTrans(scope); in Csgebr2d()
86 tscope = Mlowcase(tscope); in Csgebr2d()
88 BI_ArgCheck(Mpval(ConTxt), RT_BR, __FILE__, tscope, 'u', 'u', Mpval(m), in Csgebr2d()
101 switch(tscope) in Csgebr2d()
117 tscope); in Csgebr2d()
|
| H A D | dtrbr2d_.c | 92 char ttop, tscope, tuplo, tdiag; in Cdtrbr2d() local
98 tscope = F2C_CharTrans(scope); in Cdtrbr2d()
99 tscope = Mlowcase(tscope); in Cdtrbr2d()
105 BI_ArgCheck(Mpval(ConTxt), RT_BR, __FILE__, tscope, tuplo, tdiag, Mpval(m), in Cdtrbr2d()
118 switch(tscope) in Cdtrbr2d()
134 tscope); in Cdtrbr2d()
|
| H A D | igebr2d_.c | 79 char ttop, tscope; in Cigebr2d() local
85 tscope = F2C_CharTrans(scope); in Cigebr2d()
86 tscope = Mlowcase(tscope); in Cigebr2d()
88 BI_ArgCheck(Mpval(ConTxt), RT_BR, __FILE__, tscope, 'u', 'u', Mpval(m), in Cigebr2d()
101 switch(tscope) in Cigebr2d()
117 tscope); in Cigebr2d()
|
| H A D | ztrbr2d_.c | 92 char ttop, tscope, tuplo, tdiag; in Cztrbr2d() local
98 tscope = F2C_CharTrans(scope); in Cztrbr2d()
99 tscope = Mlowcase(tscope); in Cztrbr2d()
105 BI_ArgCheck(Mpval(ConTxt), RT_BR, __FILE__, tscope, tuplo, tdiag, Mpval(m), in Cztrbr2d()
118 switch(tscope) in Cztrbr2d()
134 tscope); in Cztrbr2d()
|
| H A D | zgebr2d_.c | 79 char ttop, tscope; in Czgebr2d() local
85 tscope = F2C_CharTrans(scope); in Czgebr2d()
86 tscope = Mlowcase(tscope); in Czgebr2d()
88 BI_ArgCheck(Mpval(ConTxt), RT_BR, __FILE__, tscope, 'u', 'u', Mpval(m), in Czgebr2d()
101 switch(tscope) in Czgebr2d()
117 tscope); in Czgebr2d()
|
| /dports/devel/omniORB/omniORB-4.2.4/src/tool/omniidl/python/omniidl/ |
| H A D | idlutil.py | 84 tscope = target_scope[:]
86 while len(tscope) > 0 and \
88 tscope[0] == our_scope[i]:
89 del tscope[0]
91 return tscope
|
| /dports/devel/omniORB/omniORB-4.2.4/src/tool/omniidl/python3/omniidl/ |
| H A D | idlutil.py | 84 tscope = target_scope[:]
86 while len(tscope) > 0 and \
88 tscope[0] == our_scope[i]:
89 del tscope[0]
91 return tscope
|