XGCa
|
#include "adios_macro.h"
Functions/Subroutines | |
subroutine | xgc_read_eq_m3dc1_dims (mpsi, mr, mz, min_r, max_r, min_z, max_z) |
subroutine | xgc_read_eq_m3dc1 (mpsi, mr, mz, min_r, max_r, min_z, max_z, axis_r, axis_z, axis_b, x_psi, x_r, x_z, psi_grid, rgrid, zgrid, eq_I, psi_rz) |
subroutine | set_fortran_equil_vals (min_r, max_r, min_z, max_z, xpt_psi, xpt_r, xpt_z, axis_r, axis_z, psi_norm) |
subroutine set_fortran_equil_vals | ( | real(8) | min_r, |
real(8) | max_r, | ||
real(8) | min_z, | ||
real(8) | max_z, | ||
real(8) | xpt_psi, | ||
real(8) | xpt_r, | ||
real(8) | xpt_z, | ||
real(8) | axis_r, | ||
real(8) | axis_z, | ||
real(8) | psi_norm | ||
) |
subroutine xgc_read_eq_m3dc1 | ( | integer | mpsi, |
integer | mr, | ||
integer | mz, | ||
real(8) | min_r, | ||
real(8) | max_r, | ||
real(8) | min_z, | ||
real(8) | max_z, | ||
real(8) | axis_r, | ||
real(8) | axis_z, | ||
real(8) | axis_b, | ||
real(8) | x_psi, | ||
real(8) | x_r, | ||
real(8) | x_z, | ||
real(8), dimension(mpsi) | psi_grid, | ||
real(8), dimension(mr) | rgrid, | ||
real(8), dimension(mz) | zgrid, | ||
real(8), dimension(mpsi) | eq_I, | ||
real(8), dimension(mr,mz) | psi_rz | ||
) |
subroutine xgc_read_eq_m3dc1_dims | ( | integer | mpsi, |
integer | mr, | ||
integer | mz, | ||
real(8) | min_r, | ||
real(8) | max_r, | ||
real(8) | min_z, | ||
real(8) | max_z | ||
) |