Home
last modified time | relevance | path

Searched refs:yvel0 (Results 1 – 22 of 22) sorted by relevance

/dports/science/ascent/ascent-0.7.1-66-gbcf2742a/src/examples/proxies/cloverleaf3d-ref/
H A Dviscosity_kernel.f9039 yvel0, & argument
54 REAL(KIND=8), DIMENSION(x_min-2:x_max+3,y_min-2:y_max+3,z_min-2:z_max+3) :: xvel0,yvel0,zvel0 local
81 vgradx1=yvel0(j ,k ,l )+yvel0(j ,k+1,l )+yvel0(j ,k ,l+1)+yvel0(j ,k+1,l+1)
82 vgradx2=yvel0(j+1,k ,l )+yvel0(j+1,k+1,l )+yvel0(j+1,k ,l+1)+yvel0(j+1,k+1,l+1)
83 vgrady1=yvel0(j ,k ,l )+yvel0(j+1,k ,l )+yvel0(j ,k ,l+1)+yvel0(j+1,k ,l+1)
84 vgrady2=yvel0(j ,k+1,l )+yvel0(j+1,k+1,l )+yvel0(j ,k+1,l+1)+yvel0(j+1,k+1,l+1)
85 vgradz1=yvel0(j ,k ,l )+yvel0(j+1,k ,l )+yvel0(j ,k+1,l )+yvel0(j+1,k+1,l )
86 vgradz2=yvel0(j ,k ,l+1)+yvel0(j+1,k ,l+1)+yvel0(j ,k+1,l+1)+yvel0(j+1,k+1,l+1)
H A DPdV_kernel.f9043 yvel0, & argument
63 REAL(KIND=8), DIMENSION(x_min-2:x_max+3,y_min-2:y_max+3,z_min-2:z_max+3) :: xvel0,yvel0,zvel0 local
88 …bottom_flux=(yarea(j ,k ,l )*(yvel0(j ,k ,l )+yvel0(j+1,k ,l )+yvel0(j ,k ,l+1)+yvel0(j+…
89 … +yvel0(j ,k ,l )+yvel0(j+1,k ,l )+yvel0(j ,k ,l+1)+yvel0(j+1,k ,l+1))) &
91 …top_flux= (yarea(j ,k+1,l )*(yvel0(j ,k+1,l )+yvel0(j+1,k+1,l )+yvel0(j ,k+1,l+1)+yvel0(j+…
92 … +yvel0(j ,k+1,l )+yvel0(j+1,k+1,l )+yvel0(j ,k+1,l+1)+yvel0(j+1,k+1,l+1))) &
136 …bottom_flux=(yarea(j ,k ,l )*(yvel0(j ,k ,l )+yvel0(j+1,k ,l )+yvel0(j ,k ,l+1)+yvel0(j+…
139 …top_flux= (yarea(j ,k+1,l )*(yvel0(j ,k+1,l )+yvel0(j+1,k+1,l )+yvel0(j ,k+1,l+1)+yvel0(j+…
H A Dcalc_dt_kernel.f9050 xvel0,yvel0,zvel0, & argument
82 REAL(KIND=8), DIMENSION(x_min-2:x_max+3,y_min-2:y_max+3,z_min-2:z_max+3) :: xvel0,yvel0,zvel0 local
119 … dv1=(yvel0(j ,k ,l )+yvel0(j+1,k ,l )+yvel0(j ,k ,l+1)+yvel0(j+1,k ,l+1))*yarea(j,k,l)
120 … dv2=(yvel0(j ,k+1,l )+yvel0(j+1,k+1,l )+yvel0(j ,k+1,l+1)+yvel0(j+1,k+1,l+1))*yarea(j,k,l)
171 WRITE(0,*) xvel0(jldt ,kldt ,lldt ),yvel0(jldt ,kldt ,lldt ),zvel0(jldt ,kldt ,lldt )
172 WRITE(0,*) xvel0(jldt+1,kldt ,lldt ),yvel0(jldt+1,kldt ,lldt ),zvel0(jldt ,kldt ,lldt )
173 WRITE(0,*) xvel0(jldt+1,kldt+1,lldt ),yvel0(jldt+1,kldt+1,lldt ),zvel0(jldt ,kldt ,lldt )
174 WRITE(0,*) xvel0(jldt ,kldt+1,lldt ),yvel0(jldt ,kldt+1,lldt ),zvel0(jldt ,kldt ,lldt )
175 WRITE(0,*) xvel0(jldt ,kldt ,lldt+1),yvel0(jldt ,kldt ,lldt+1),zvel0(jldt ,kldt ,lldt+1)
176 WRITE(0,*) xvel0(jldt+1,kldt ,lldt+1),yvel0(jldt+1,kldt ,lldt+1),zvel0(jldt ,kldt ,lldt+1)
[all …]
H A Dflux_calc_kernel.f9031 yvel0, & argument
47 REAL(KIND=8), DIMENSION(x_min-2:x_max+3,y_min-2:y_max+3,z_min-2:z_max+3) :: xvel0,yvel0,zvel0 local
74 *(yvel0(j,k,l)+yvel0(j+1,k,l)+yvel0(j,k,l+1)+yvel0(j+1,k,l+1) &
H A Dgenerate_chunk_kernel.f9040 yvel0, & argument
70 REAL(KIND=8), DIMENSION(x_min-2:x_max+3,y_min-2:y_max+3,z_min-2:z_max+3) :: xvel0,yvel0,zvel0 local
128 yvel0(j,k,l)=state_yvel(1)
164 yvel0(jt,kt,lt)=state_yvel(state)
181 yvel0(jt,kt,lt)=state_yvel(state)
195 yvel0(jt,kt,lt)=state_yvel(state)
H A Dfield_summary_kernel.f9033 yvel0, & argument
43 REAL(KIND=8), DIMENSION(x_min-2:x_max+3,y_min-2:y_max+3,z_min-2:z_max+2) :: xvel0,yvel0,zvel0 local
64 vsqrd=vsqrd+0.125*(xvel0(jv,kv,lv)**2+yvel0(jv,kv,lv)**2+zvel0(jv,kv,lv)**2)
H A Dreset_field_kernel.f9034 yvel0, & argument
44 REAL(KIND=8), DIMENSION(x_min-2:x_max+3,y_min-2:y_max+3,z_min-2:z_max+3) :: xvel0,yvel0,zvel0 local
84 yvel0(j,k,l)=yvel1(j,k,l)
H A Dupdate_halo_kernel.f9042 yvel0, & argument
62 REAL(KIND=8), DIMENSION(x_min-2:x_max+3,y_min-2:y_max+3,z_min-2:z_max+3) :: xvel0,yvel0,zvel0 local
733 yvel0(j,1-k,l)=-yvel0(j,1+k,l)
744 yvel0(j,y_max+1+k,l)=-yvel0(j,y_max+1-k,l)
755 yvel0(1-j,k,l)=yvel0(1+j,k,l)
766 yvel0(x_max+1+j,k,l)=yvel0(x_max+1-j,k,l)
777 yvel0(j,k,1-l)=yvel0(j,k,1+l)
788 yvel0(j,k,z_max+1+l)=yvel0(j,k,z_max+1-l)
H A Daccelerate_kernel.f9034 yvel0, & argument
53 REAL(KIND=8), DIMENSION(x_min-2:x_max+3 ,y_min-2:y_max+3 ,z_min-2:z_max+3) :: xvel0,yvel0,zvel0 local
103 …yvel1(j,k,l)=yvel0(j,k,l)-stepbymass(j,k,l)*(yarea(j ,k ,l )*(pressure(j ,k ,l )-pressure(j …
H A Dviscosity.f9057 chunks(c)%field%yvel0, &
H A Dreset_field.f9055 chunks(c)%field%yvel0, &
H A Dflux_calc.f9054 chunks(c)%field%yvel0, &
H A Dvisit.F90190 …e_set_path_external_float64_ptr(sim_data,"fields/velocity/values/y", chunks(c)%field%yvel0, nnodes)
297 … IF(ABS(chunks(c)%field%yvel0(j,k,l)).GT.0.00000001) temp_var=chunks(c)%field%yvel0(j,k,l)
H A Daccelerate.f9058 chunks(c)%field%yvel0, &
H A Dupdate_halo.f9058 chunks(c)%field%yvel0, &
H A Dcalc_dt.f9080 chunks(chunk)%field%yvel0, &
H A DPdV.f9074 chunks(c)%field%yvel0, &
H A Ddefinitions.f90133 REAL(KIND=8), DIMENSION(:,:,:), ALLOCATABLE :: yvel0,yvel1 component
H A Dfield_summary.f9071 chunks(c)%field%yvel0, &
H A Dgenerate_chunk.f9068 chunks(chunk)%field%yvel0, &
H A Dbuild_field.f9071 ALLOCATE(chunks(chunk)%field%yvel0(chunks(chunk)%field%x_min-2:chunks(chunk)%field%x_max+3, &
173 chunks(chunk)%field%yvel0=0.0
H A Dclover.F90592 chunks(chunk)%field%yvel0, &
914 chunks(chunk)%field%yvel0, &
1210 chunks(chunk)%field%yvel0, &
1532 chunks(chunk)%field%yvel0, &
1827 chunks(chunk)%field%yvel0, &
2149 chunks(chunk)%field%yvel0, &
2444 chunks(chunk)%field%yvel0, &
3060 chunks(chunk)%field%yvel0, &
3381 chunks(chunk)%field%yvel0, &
3676 chunks(chunk)%field%yvel0, &
[all …]