PlasCom2  1.0
XPACC Multi-physics simluation application
FD1.f90 File Reference

Go to the source code of this file.

Functions/Subroutines

subroutine fd1load
 
subroutine fd1interior (N1, N2, N3, S1, E1, S2, E2, S3, E3, DX, U, KN)
 
subroutine fd1interiorx (N1, N2, N3, S1, E1, S2, E2, S3, E3, DX, U, KN)
 
subroutine fd1interiory (N1, N2, N3, S1, E1, S2, E2, S3, E3, DY, U, KN)
 
subroutine fd1interiorz (N1, N2, N3, S1, E1, S2, E2, S3, E3, DZ, U, KN)
 
subroutine fd1interior2 (N1, N2, N3, S1, E1, S2, E2, S3, E3, DX, DY, U, KX, KY)
 
subroutine fd1interior3 (N1, N2, N3, S1, E1, S2, E2, S3, E3, DX, DY, DZ, U, KX, KY, KZ)
 
subroutine fd1grad3 (N1, N2, N3, S1, E1, S2, E2, S3, E3, DX, DY, DZ, U, GRADU)
 
subroutine fd1div3 (N1, N2, N3, S1, E1, S2, E2, S3, E3, DX, DY, DZ, UVEC, DIVU)
 
subroutine fd1div3all (N1, N2, N3, OPINTERVAL, DX, DY, DZ, UVHLEFT, UVHRIGHT, UVHFRONT, UVHBACK, UVHBOTTOM, UVHTOP, UVEC, DIVU)
 
subroutine fd1leftboundary (N1, N2, N3, S1, E1, S2, E2, S3, E3, DX, u0, Tau, U, KN)
 
subroutine fd1rightboundary (N1, N2, N3, S1, E1, S2, E2, S3, E3, DX, u0, Tau, U, KN)
 
subroutine fd1haloleft (N1, N2, N3, S1, E1, S2, E2, S3, E3, DX, U, KN, HL)
 
subroutine fd1haloright (N1, N2, N3, S1, E1, S2, E2, S3, E3, DX, U, KN, HR)
 
subroutine fd1halofront (N1, N2, N3, S1, E1, S2, E2, S3, E3, DY, U, KN, HL)
 
subroutine fd1haloback (N1, N2, N3, S1, E1, S2, E2, S3, E3, DY, U, KN, HL)
 
subroutine fd1halotop (N1, N2, N3, S1, E1, S2, E2, S3, E3, DZ, U, KN, HL)
 
subroutine fd1halobottom (N1, N2, N3, S1, E1, S2, E2, S3, E3, DZ, U, KN, HL)
 

Function/Subroutine Documentation

◆ fd1div3()

subroutine fd1div3 ( integer(kind=8), intent(in)  N1,
integer(kind=8), intent(in)  N2,
integer(kind=8), intent(in)  N3,
integer(kind=8), intent(in)  S1,
integer(kind=8), intent(in)  E1,
integer(kind=8), intent(in)  S2,
integer(kind=8), intent(in)  E2,
integer(kind=8), intent(in)  S3,
integer(kind=8), intent(in)  E3,
real(kind=8), intent(in)  DX,
real(kind=8), intent(in)  DY,
real(kind=8), intent(in)  DZ,
real(kind=8), dimension(3*n1*n2*n3), intent(in)  UVEC,
real(kind=8), dimension(n1*n2*n3), intent(out)  DIVU 
)

Definition at line 374 of file FD1.f90.

◆ fd1div3all()

subroutine fd1div3all ( integer(kind=8), intent(in)  N1,
integer(kind=8), intent(in)  N2,
integer(kind=8), intent(in)  N3,
integer(kind=8), dimension(6), intent(in)  OPINTERVAL,
real(kind=8), intent(in)  DX,
real(kind=8), intent(in)  DY,
real(kind=8), intent(in)  DZ,
real(kind=8), dimension(3*n2*n3), intent(in)  UVHLEFT,
real(kind=8), dimension(3*n2*n3), intent(in)  UVHRIGHT,
real(kind=8), dimension(3*n1*n3), intent(in)  UVHFRONT,
real(kind=8), dimension(3*n1*n3), intent(in)  UVHBACK,
real(kind=8), dimension(3*n1*n2), intent(in)  UVHBOTTOM,
real(kind=8), dimension(3*n1*n2), intent(in)  UVHTOP,
real(kind=8), dimension(3*n1*n2*n3), intent(in)  UVEC,
real(kind=8), dimension(n1*n2*n3), intent(out)  DIVU 
)

Definition at line 459 of file FD1.f90.

◆ fd1grad3()

subroutine fd1grad3 ( integer(kind=8), intent(in)  N1,
integer(kind=8), intent(in)  N2,
integer(kind=8), intent(in)  N3,
integer(kind=8), intent(in)  S1,
integer(kind=8), intent(in)  E1,
integer(kind=8), intent(in)  S2,
integer(kind=8), intent(in)  E2,
integer(kind=8), intent(in)  S3,
integer(kind=8), intent(in)  E3,
real(kind=8), intent(in)  DX,
real(kind=8), intent(in)  DY,
real(kind=8), intent(in)  DZ,
real(kind=8), dimension(n1*n2*n3), intent(in)  U,
real(kind=8), dimension(3*n1*n2*n3), intent(out)  GRADU 
)

Definition at line 292 of file FD1.f90.

◆ fd1haloback()

subroutine fd1haloback ( integer(kind=8), intent(in)  N1,
integer(kind=8), intent(in)  N2,
integer(kind=8), intent(in)  N3,
integer(kind=8), intent(in)  S1,
integer(kind=8), intent(in)  E1,
integer(kind=8), intent(in)  S2,
integer(kind=8), intent(in)  E2,
integer(kind=8), intent(in)  S3,
integer(kind=8), intent(in)  E3,
real(kind=8), intent(in)  DY,
real(kind=8), dimension(n1*n2*n3), intent(in)  U,
real(kind=8), dimension(n1*n2*n3), intent(out)  KN,
real(kind=8), dimension(n1*n3), intent(in)  HL 
)

Definition at line 847 of file FD1.f90.

◆ fd1halobottom()

subroutine fd1halobottom ( integer(kind=8), intent(in)  N1,
integer(kind=8), intent(in)  N2,
integer(kind=8), intent(in)  N3,
integer(kind=8), intent(in)  S1,
integer(kind=8), intent(in)  E1,
integer(kind=8), intent(in)  S2,
integer(kind=8), intent(in)  E2,
integer(kind=8), intent(in)  S3,
integer(kind=8), intent(in)  E3,
real(kind=8), intent(in)  DZ,
real(kind=8), dimension(n1*n2*n3), intent(in)  U,
real(kind=8), dimension(n1*n2*n3), intent(out)  KN,
real(kind=8), dimension(n1*n2), intent(in)  HL 
)

Definition at line 903 of file FD1.f90.

◆ fd1halofront()

subroutine fd1halofront ( integer(kind=8), intent(in)  N1,
integer(kind=8), intent(in)  N2,
integer(kind=8), intent(in)  N3,
integer(kind=8), intent(in)  S1,
integer(kind=8), intent(in)  E1,
integer(kind=8), intent(in)  S2,
integer(kind=8), intent(in)  E2,
integer(kind=8), intent(in)  S3,
integer(kind=8), intent(in)  E3,
real(kind=8), intent(in)  DY,
real(kind=8), dimension(n1*n2*n3), intent(in)  U,
real(kind=8), dimension(n1*n2*n3), intent(out)  KN,
real(kind=8), dimension(n1*n3), intent(in)  HL 
)

Definition at line 820 of file FD1.f90.

◆ fd1haloleft()

subroutine fd1haloleft ( integer(kind=8), intent(in)  N1,
integer(kind=8), intent(in)  N2,
integer(kind=8), intent(in)  N3,
integer(kind=8), intent(in)  S1,
integer(kind=8), intent(in)  E1,
integer(kind=8), intent(in)  S2,
integer(kind=8), intent(in)  E2,
integer(kind=8), intent(in)  S3,
integer(kind=8), intent(in)  E3,
real(kind=8), intent(in)  DX,
real(kind=8), dimension(n1*n2*n3), intent(in)  U,
real(kind=8), dimension(n1*n2*n3), intent(out)  KN,
real(kind=8), dimension(n2*n3), intent(in)  HL 
)

Definition at line 765 of file FD1.f90.

◆ fd1haloright()

subroutine fd1haloright ( integer(kind=8), intent(in)  N1,
integer(kind=8), intent(in)  N2,
integer(kind=8), intent(in)  N3,
integer(kind=8), intent(in)  S1,
integer(kind=8), intent(in)  E1,
integer(kind=8), intent(in)  S2,
integer(kind=8), intent(in)  E2,
integer(kind=8), intent(in)  S3,
integer(kind=8), intent(in)  E3,
real(kind=8), intent(in)  DX,
real(kind=8), dimension(n1*n2*n3), intent(in)  U,
real(kind=8), dimension(n1*n2*n3), intent(out)  KN,
real(kind=8), dimension(n2*n3), intent(in)  HR 
)

Definition at line 793 of file FD1.f90.

◆ fd1halotop()

subroutine fd1halotop ( integer(kind=8), intent(in)  N1,
integer(kind=8), intent(in)  N2,
integer(kind=8), intent(in)  N3,
integer(kind=8), intent(in)  S1,
integer(kind=8), intent(in)  E1,
integer(kind=8), intent(in)  S2,
integer(kind=8), intent(in)  E2,
integer(kind=8), intent(in)  S3,
integer(kind=8), intent(in)  E3,
real(kind=8), intent(in)  DZ,
real(kind=8), dimension(n1*n2*n3), intent(in)  U,
real(kind=8), dimension(n1*n2*n3), intent(out)  KN,
real(kind=8), dimension(n1*n2), intent(in)  HL 
)

Definition at line 875 of file FD1.f90.

◆ fd1interior()

subroutine fd1interior ( integer(kind=8), intent(in)  N1,
integer(kind=8), intent(in)  N2,
integer(kind=8), intent(in)  N3,
integer(kind=8), intent(in)  S1,
integer(kind=8), intent(in)  E1,
integer(kind=8), intent(in)  S2,
integer(kind=8), intent(in)  E2,
integer(kind=8), intent(in)  S3,
integer(kind=8), intent(in)  E3,
real(kind=8), intent(in)  DX,
real(kind=8), dimension(n1*n2*n3), intent(in)  U,
real(kind=8), dimension(n1*n2*n3), intent(out)  KN 
)

Definition at line 7 of file FD1.f90.

◆ fd1interior2()

subroutine fd1interior2 ( integer(kind=8), intent(in)  N1,
integer(kind=8), intent(in)  N2,
integer(kind=8), intent(in)  N3,
integer(kind=8), intent(in)  S1,
integer(kind=8), intent(in)  E1,
integer(kind=8), intent(in)  S2,
integer(kind=8), intent(in)  E2,
integer(kind=8), intent(in)  S3,
integer(kind=8), intent(in)  E3,
real(kind=8), intent(in)  DX,
real(kind=8), intent(in)  DY,
real(kind=8), dimension(n1*n2*n3), intent(in)  U,
real(kind=8), dimension(n1*n2*n3), intent(out)  KX,
real(kind=8), dimension(n1*n2*n3), intent(out)  KY 
)

Definition at line 158 of file FD1.f90.

◆ fd1interior3()

subroutine fd1interior3 ( integer(kind=8), intent(in)  N1,
integer(kind=8), intent(in)  N2,
integer(kind=8), intent(in)  N3,
integer(kind=8), intent(in)  S1,
integer(kind=8), intent(in)  E1,
integer(kind=8), intent(in)  S2,
integer(kind=8), intent(in)  E2,
integer(kind=8), intent(in)  S3,
integer(kind=8), intent(in)  E3,
real(kind=8), intent(in)  DX,
real(kind=8), intent(in)  DY,
real(kind=8), intent(in)  DZ,
real(kind=8), dimension(n1*n2*n3), intent(in)  U,
real(kind=8), dimension(n1*n2*n3), intent(out)  KX,
real(kind=8), dimension(n1*n2*n3), intent(out)  KY,
real(kind=8), dimension(n1*n2*n3), intent(out)  KZ 
)

Definition at line 214 of file FD1.f90.

◆ fd1interiorx()

subroutine fd1interiorx ( integer(kind=8), intent(in)  N1,
integer(kind=8), intent(in)  N2,
integer(kind=8), intent(in)  N3,
integer(kind=8), intent(in)  S1,
integer(kind=8), intent(in)  E1,
integer(kind=8), intent(in)  S2,
integer(kind=8), intent(in)  E2,
integer(kind=8), intent(in)  S3,
integer(kind=8), intent(in)  E3,
real(kind=8), intent(in)  DX,
real(kind=8), dimension(n1*n2*n3), intent(in)  U,
real(kind=8), dimension(n1*n2*n3), intent(out)  KN 
)

Definition at line 42 of file FD1.f90.

◆ fd1interiory()

subroutine fd1interiory ( integer(kind=8), intent(in)  N1,
integer(kind=8), intent(in)  N2,
integer(kind=8), intent(in)  N3,
integer(kind=8), intent(in)  S1,
integer(kind=8), intent(in)  E1,
integer(kind=8), intent(in)  S2,
integer(kind=8), intent(in)  E2,
integer(kind=8), intent(in)  S3,
integer(kind=8), intent(in)  E3,
real(kind=8), intent(in)  DY,
real(kind=8), dimension(n1*n2*n3), intent(in)  U,
real(kind=8), dimension(n1*n2*n3), intent(out)  KN 
)

Definition at line 76 of file FD1.f90.

◆ fd1interiorz()

subroutine fd1interiorz ( integer(kind=8), intent(in)  N1,
integer(kind=8), intent(in)  N2,
integer(kind=8), intent(in)  N3,
integer(kind=8), intent(in)  S1,
integer(kind=8), intent(in)  E1,
integer(kind=8), intent(in)  S2,
integer(kind=8), intent(in)  E2,
integer(kind=8), intent(in)  S3,
integer(kind=8), intent(in)  E3,
real(kind=8), intent(in)  DZ,
real(kind=8), dimension(n1*n2*n3), intent(in)  U,
real(kind=8), dimension(n1*n2*n3), intent(out)  KN 
)

Definition at line 117 of file FD1.f90.

◆ fd1leftboundary()

subroutine fd1leftboundary ( integer(kind=8), intent(in)  N1,
integer(kind=8), intent(in)  N2,
integer(kind=8), intent(in)  N3,
integer(kind=8), intent(in)  S1,
integer(kind=8), intent(in)  E1,
integer(kind=8), intent(in)  S2,
integer(kind=8), intent(in)  E2,
integer(kind=8), intent(in)  S3,
integer(kind=8), intent(in)  E3,
real(kind=8), intent(in)  DX,
real(kind=8), intent(in)  u0,
real(kind=8), intent(in)  Tau,
real(kind=8), dimension(n1*n2*n3), intent(in)  U,
real(kind=8), dimension(n1*n2*n3), intent(out)  KN 
)

Definition at line 710 of file FD1.f90.

◆ fd1load()

subroutine fd1load ( )

Definition at line 2 of file FD1.f90.

◆ fd1rightboundary()

subroutine fd1rightboundary ( integer(kind=8), intent(in)  N1,
integer(kind=8), intent(in)  N2,
integer(kind=8), intent(in)  N3,
integer(kind=8), intent(in)  S1,
integer(kind=8), intent(in)  E1,
integer(kind=8), intent(in)  S2,
integer(kind=8), intent(in)  E2,
integer(kind=8), intent(in)  S3,
integer(kind=8), intent(in)  E3,
real(kind=8), intent(in)  DX,
real(kind=8), intent(in)  u0,
real(kind=8), intent(in)  Tau,
real(kind=8), dimension(n1*n2*n3), intent(in)  U,
real(kind=8), dimension(n1*n2*n3), intent(out)  KN 
)

Definition at line 738 of file FD1.f90.