grid_fields Module


Uses

  • module~~grid_fields~~UsesGraph module~grid_fields grid_fields module~parallel parallel module~grid_fields->module~parallel module~grid_field_param grid_field_param module~grid_fields->module~grid_field_param module~common_param common_param module~parallel->module~common_param module~mpi_var mpi_var module~parallel->module~mpi_var module~util util module~parallel->module~util mpi mpi module~parallel->mpi module~grid_field_param->module~common_param module~grid_field_param->module~mpi_var module~grid_param grid_param module~grid_field_param->module~grid_param module~precision_def precision_def module~common_param->module~precision_def module~mpi_var->module~precision_def module~util->module~precision_def module~code_util code_util module~util->module~code_util module~grid_param->module~precision_def module~struct_def struct_def module~grid_param->module~struct_def module~code_util->module~precision_def module~struct_def->module~precision_def

Used by

  • module~~grid_fields~~UsedByGraph module~grid_fields grid_fields module~fluid_density_momenta fluid_density_momenta module~fluid_density_momenta->module~grid_fields module~curr_and_fields_util curr_and_fields_util module~curr_and_fields_util->module~grid_fields module~psolve psolve module~psolve->module~grid_fields module~init_laser_field init_laser_field module~init_laser_field->module~grid_fields module~pic_evolve pic_evolve module~pic_evolve->module~fluid_density_momenta module~pic_evolve->module~curr_and_fields_util module~pic_out_util pic_out_util module~pic_out_util->module~psolve module~init_beam_part_distrib init_beam_part_distrib module~init_beam_part_distrib->module~psolve module~env_evolve env_evolve module~env_evolve->module~fluid_density_momenta module~env_evolve->module~curr_and_fields_util module~pic_in pic_in module~pic_in->module~init_laser_field program~aladyn aladyn program~aladyn->module~pic_evolve program~aladyn->module~pic_out_util program~aladyn->module~init_beam_part_distrib program~aladyn->module~env_evolve module~start_all start_all program~aladyn->module~start_all module~start_all->module~pic_in

Contents


Variables

TypeVisibility AttributesNameInitial
integer, private, parameter:: x_parity(6) =[-1, 1, 1, -1, 1, 1]
integer, private, parameter:: y_parity(6) =[1, -1, 1, 1, -1, 1]
integer, private, parameter:: z_parity(6) =[1, 1, -1, 1, 1, -1]
integer, private, dimension(2, 3):: COEFF_2
integer, private, dimension(2, 2):: COEFF_1
integer, private, dimension(2, 1):: COEFF_0

Subroutines

public subroutine trid_der1(a, b, c, b1, c1, an, bn, n, ic1, ic2, ord)

Arguments

Type IntentOptional AttributesName
real(kind=dp), intent(in) :: a
real(kind=dp), intent(in) :: b
real(kind=dp), intent(in) :: c
real(kind=dp), intent(in) :: b1
real(kind=dp), intent(in) :: c1
real(kind=dp), intent(in) :: an
real(kind=dp), intent(in) :: bn
integer, intent(in) :: n
integer, intent(in) :: ic1
integer, intent(in) :: ic2
integer, intent(in) :: ord

public subroutine unif_to_str_field_interp(unif_field, str_field, ic)

Arguments

Type IntentOptional AttributesName
real(kind=dp), intent(in) :: unif_field(:,:,:)
real(kind=dp), intent(inout) :: str_field(:,:,:,:)
integer, intent(in) :: ic

public subroutine enforce_continuity(curr)

Arguments

Type IntentOptional AttributesName
real(kind=dp), intent(inout) :: curr(:,:,:,:)

public subroutine field_xadvect(ef, dth, v_adv, ic1, ic2, isch)

Arguments

Type IntentOptional AttributesName
real(kind=dp), intent(inout) :: ef(:,:,:,:)
real(kind=dp), intent(in) :: dth
real(kind=dp), intent(in) :: v_adv
integer, intent(in) :: ic1
integer, intent(in) :: ic2
integer, intent(in) :: isch

public subroutine pp_lapl(av, source, ic1, ic2)

Arguments

Type IntentOptional AttributesName
real(kind=dp), intent(inout) :: av(:,:,:,:)
real(kind=dp), intent(inout) :: source(:,:,:,:)
integer, intent(in) :: ic1
integer, intent(in) :: ic2

public subroutine env_grad(envg)

Arguments

Type IntentOptional AttributesName
real(kind=dp), intent(inout) :: envg(:,:,:,:)

public subroutine env_maxw_solve(curr, evf, om0, dtl)

Arguments

Type IntentOptional AttributesName
real(kind=dp), intent(inout) :: curr(:,:,:,:)
real(kind=dp), intent(inout) :: evf(:,:,:,:)
real(kind=dp), intent(in) :: om0
real(kind=dp), intent(in) :: dtl

public subroutine env_lpf_solve(curr, evf, ib, om0, dtl)

Arguments

Type IntentOptional AttributesName
real(kind=dp), intent(inout) :: curr(:,:,:,:)
real(kind=dp), intent(inout) :: evf(:,:,:,:)
integer, intent(in) :: ib
real(kind=dp), intent(in) :: om0
real(kind=dp), intent(in) :: dtl

public subroutine env_bds(ef, ptrght, ptlft, init_ic, end_ic)

Boundary conditions for the envelope field. Empirically set to be continuous with continuous first derivative.

Arguments

Type IntentOptional AttributesName
real(kind=dp), intent(inout) :: ef(:,:,:,:)
integer, intent(in) :: ptrght
integer, intent(in) :: ptlft
integer, intent(in), optional :: init_ic
integer, intent(in), optional :: end_ic

public subroutine bf_bds(ef, dtl, imbd)

Arguments

Type IntentOptional AttributesName
real(kind=dp), intent(inout) :: ef(:,:,:,:)
real(kind=dp), intent(in) :: dtl
integer, intent(in) :: imbd

public subroutine ef_bds(ef, dtl, imbd)

Arguments

Type IntentOptional AttributesName
real(kind=dp), intent(inout) :: ef(:,:,:,:)
real(kind=dp), intent(in) :: dtl
integer, intent(in) :: imbd

public subroutine potential_lapl(apf, curr, ic1, ic2)

Arguments

Type IntentOptional AttributesName
real(kind=dp), intent(inout) :: apf(:,:,:,:)
real(kind=dp), intent(inout) :: curr(:,:,:,:)
integer, intent(in) :: ic1
integer, intent(in) :: ic2

public subroutine rote(ef, dtf)

Arguments

Type IntentOptional AttributesName
real(kind=dp), intent(inout) :: ef(:,:,:,:)
real(kind=dp), intent(in) :: dtf

public subroutine rotb(ef, dtf)

Arguments

Type IntentOptional AttributesName
real(kind=dp), intent(inout) :: ef(:,:,:,:)
real(kind=dp), intent(in) :: dtf

public subroutine nc_fluid_density_momenta(flx, ef, dt_step, fcomp)

Arguments

Type IntentOptional AttributesName
real(kind=dp), intent(in) :: flx(:,:,:,:)
real(kind=dp), intent(inout) :: ef(:,:,:,:)
real(kind=dp), intent(in) :: dt_step
integer, intent(in) :: fcomp