Home
last modified time | relevance | path

Searched refs:n_extnt (Results 1 – 10 of 10) sorted by relevance

/dports/math/libpgmath/flang-d07daf3/runtime/flang/
H A Dmmul_real4str1_t.F9522 k_extnt,m_extnt,n_extnt, & argument
26 DESC_INT n_extnt,m_extnt,k_extnt
30 REAL*4 dest(d_d1_extnt,n_extnt*d_d1_lstride)
36 do n = 1, n_extnt
42 do n = 1, n_extnt
49 do n = 1, n_extnt
55 do n = 1, n_extnt
H A Dmmul_cplx8str1_t.F9522 k_extnt,m_extnt,n_extnt, & argument
26 DESC_INT n_extnt,m_extnt,k_extnt
30 COMPLEX*8 dest(d_d1_extnt,n_extnt*d_d1_lstride)
36 do n = 1, n_extnt
42 do n = 1, n_extnt
49 do n = 1, n_extnt
55 do n = 1, n_extnt
H A Dmmul_real8str1.F9522 k_extnt,m_extnt,n_extnt, & argument
26 DESC_INT n_extnt,m_extnt,k_extnt
63 mmod4 = mod (n_extnt, 4)
65 nn = n_extnt - mmod4
68 do ii=1,n_extnt,bs
317 do i=nn+1,min(n_extnt,ii+bs-1)
345 do i=nn+1,min(n_extnt,ii+bs-1)
376 do i=nn+1,min(n_extnt,ii+bs-1)
393 do i=nn+1,min(n_extnt,ii+bs-1)
416 do n = 1, n_extnt
[all …]
H A Dmmul_int4str1.F9522 k_extnt,m_extnt,n_extnt, & argument
26 DESC_INT n_extnt,m_extnt,k_extnt
49 mmod4 = mod (n_extnt, 4)
51 nn = n_extnt - mmod4
54 do ii=1,n_extnt,bs
303 do i=nn+1,min(n_extnt,ii+bs-1)
331 do i=nn+1,min(n_extnt,ii+bs-1)
362 do i=nn+1,min(n_extnt,ii+bs-1)
379 do i=nn+1,min(n_extnt,ii+bs-1)
401 do n = 1, n_extnt
[all …]
H A Dmmul_real4str1.F9522 k_extnt,m_extnt,n_extnt, & argument
26 DESC_INT n_extnt,m_extnt,k_extnt
49 mmod4 = mod (n_extnt, 4)
51 nn = n_extnt - mmod4
54 do ii=1,n_extnt,bs
303 do i=nn+1,min(n_extnt,ii+bs-1)
331 do i=nn+1,min(n_extnt,ii+bs-1)
362 do i=nn+1,min(n_extnt,ii+bs-1)
379 do i=nn+1,min(n_extnt,ii+bs-1)
401 do n = 1, n_extnt
[all …]
H A Dmmul_int1str1.F9522 k_extnt,m_extnt,n_extnt, & argument
26 DESC_INT n_extnt,m_extnt,k_extnt
49 mmod4 = mod (n_extnt, 4)
51 nn = n_extnt - mmod4
54 do ii=1,n_extnt,bs
303 do i=nn+1,min(n_extnt,ii+bs-1)
331 do i=nn+1,min(n_extnt,ii+bs-1)
362 do i=nn+1,min(n_extnt,ii+bs-1)
379 do i=nn+1,min(n_extnt,ii+bs-1)
401 do n = 1, n_extnt
[all …]
H A Dmmul_int8str1.F9522 k_extnt,m_extnt,n_extnt, & argument
26 DESC_INT n_extnt,m_extnt,k_extnt
49 mmod4 = mod (n_extnt, 4)
51 nn = n_extnt - mmod4
54 do ii=1,n_extnt,bs
303 do i=nn+1,min(n_extnt,ii+bs-1)
331 do i=nn+1,min(n_extnt,ii+bs-1)
362 do i=nn+1,min(n_extnt,ii+bs-1)
379 do i=nn+1,min(n_extnt,ii+bs-1)
401 do n = 1, n_extnt
[all …]
H A Dmmul_cplx16str1.F9522 k_extnt,m_extnt,n_extnt, & argument
26 DESC_INT n_extnt,m_extnt,k_extnt
49 mmod4 = mod (n_extnt, 4)
51 nn = n_extnt - mmod4
54 do ii=1,n_extnt,bs
303 do i=nn+1,min(n_extnt,ii+bs-1)
331 do i=nn+1,min(n_extnt,ii+bs-1)
362 do i=nn+1,min(n_extnt,ii+bs-1)
379 do i=nn+1,min(n_extnt,ii+bs-1)
401 do n = 1, n_extnt
[all …]
H A Dmmul_cplx8str1.F9522 k_extnt,m_extnt,n_extnt, & argument
26 DESC_INT n_extnt,m_extnt,k_extnt
49 mmod4 = mod (n_extnt, 4)
51 nn = n_extnt - mmod4
54 do ii=1,n_extnt,bs
303 do i=nn+1,min(n_extnt,ii+bs-1)
331 do i=nn+1,min(n_extnt,ii+bs-1)
362 do i=nn+1,min(n_extnt,ii+bs-1)
379 do i=nn+1,min(n_extnt,ii+bs-1)
401 do n = 1, n_extnt
[all …]
H A Dmmul_int2str1.F9522 k_extnt,m_extnt,n_extnt, & argument
26 DESC_INT n_extnt,m_extnt,k_extnt
49 mmod4 = mod (n_extnt, 4)
51 nn = n_extnt - mmod4
54 do ii=1,n_extnt,bs
303 do i=nn+1,min(n_extnt,ii+bs-1)
331 do i=nn+1,min(n_extnt,ii+bs-1)
362 do i=nn+1,min(n_extnt,ii+bs-1)
379 do i=nn+1,min(n_extnt,ii+bs-1)
401 do n = 1, n_extnt
[all …]