XGCa
 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Macros Pages
Macros | Functions/Subroutines
collisionf2.F90 File Reference
#include <petscversion.h>
#include <petsc/finclude/petsc.h>
Include dependency graph for collisionf2.F90:

Macros

#define ASYNC(istream)   async(istream)
 

Functions/Subroutines

subroutine col_f_angle_avg_m (c1, c2, M1, M2)
 
subroutine col_f_convergence_eval (cs, dist_n, dist_iter, vpic_dn, vpic_dw, vpic_dp)
 
subroutine col_f_picard_step (iter_inter, LU_values, dist_col, dist_iter, col_f_mat, col_f_ksp, col_f_vecb, col_f_vecx)
 
subroutine col_f_lu_matrix_ftn (op_mode, cell_I, cell_J, cs, mat_pos_rel_indx, mat_pos, coeff1, coeff2, EDs_comp, LU_values)
 
subroutine col_f_lu_matrix (op_mode, cs, EDs, iter_inter, LU_values)
 
subroutine col_f_e_and_d_m (cs1, cs2, f_half, dfdr, dfdz, Ms, EDs)
 
subroutine col_f_angle_avg_s (cs, Ms)
 
subroutine col_f_e_and_d_s (cs, f_half, dfdr, dfdz, Ms, EDs)
 

Macro Definition Documentation

#define ASYNC (   istream)    async(istream)

Function/Subroutine Documentation

subroutine col_f_angle_avg_m ( type(col_f_core_type)  c1,
type(col_f_core_type)  c2,
real (8), dimension((col_f_nvr-1)*(col_f_nvz-1),3,(col_f_nvr-1)*(col_f_nvz-1))  M1,
real (8), dimension((col_f_nvr-1)*(col_f_nvz-1),3,(col_f_nvr-1)*(col_f_nvz-1))  M2 
)

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine col_f_angle_avg_s ( type(col_f_core_type)  cs,
real (8), dimension((col_f_nvr-1), 5, (col_f_nvr-1)*(col_f_nvz-1))  Ms 
)

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine col_f_convergence_eval ( type(col_f_core_type)  cs,
real (kind=8), dimension(col_f_nvr, col_f_nvz)  dist_n,
real (kind=8), dimension(col_f_nvr, col_f_nvz)  dist_iter,
real (8)  vpic_dn,
real (8)  vpic_dw,
real (8)  vpic_dp 
)

Here is the caller graph for this function:

subroutine col_f_e_and_d_m ( type(col_f_core_type)  cs1,
type(col_f_core_type)  cs2,
real (8), dimension(col_f_nvr-1,col_f_nvz-1)  f_half,
real (8), dimension(col_f_nvr-1,col_f_nvz-1)  dfdr,
real (8), dimension(col_f_nvr-1,col_f_nvz-1)  dfdz,
real (8), dimension((col_f_nvr-1)*(col_f_nvz-1),3,(col_f_nvr-1)*(col_f_nvz-1))  Ms,
real (8), dimension(5,col_f_nvr-1, col_f_nvz-1)  EDs 
)

Here is the caller graph for this function:

subroutine col_f_e_and_d_s ( type(col_f_core_type)  cs,
real (8), dimension((col_f_nvr-1),(col_f_nvz-1))  f_half,
real (8), dimension((col_f_nvr-1),(col_f_nvz-1))  dfdr,
real (8), dimension((col_f_nvr-1),(col_f_nvz-1))  dfdz,
real (8), dimension((col_f_nvr-1),5, (col_f_nvr-1)*(col_f_nvz-1))  Ms,
real (8), dimension(5,(col_f_nvr-1), (col_f_nvz-1))  EDs 
)

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine col_f_lu_matrix ( integer  op_mode,
type(col_f_core_type)  cs,
real (8), dimension(5,col_f_nvr-1, col_f_nvz-1)  EDs,
integer  iter_inter,
real (kind=8), dimension(lu_nnz)  LU_values 
)

Here is the call graph for this function:

Here is the caller graph for this function:

subroutine col_f_lu_matrix_ftn ( integer  op_mode,
integer  cell_I,
integer  cell_J,
type(col_f_core_type)  cs,
integer, dimension(4)  mat_pos_rel_indx,
integer  mat_pos,
real (8)  coeff1,
real (8)  coeff2,
real (8), dimension(5)  EDs_comp,
real (kind=8), dimension(lu_nnz)  LU_values 
)

Here is the caller graph for this function:

subroutine col_f_picard_step ( integer  iter_inter,
real (kind=8), dimension(lu_nnz)  LU_values,
real (kind=8), dimension(col_f_ntotal_v)  dist_col,
real (kind=8), dimension(col_f_nvr,col_f_nvz)  dist_iter,
integer  col_f_mat,
integer  col_f_ksp,
integer  col_f_vecb,
integer  col_f_vecx 
)

Here is the call graph for this function:

Here is the caller graph for this function: