get_local_geo Subroutine

public subroutine get_local_geo(nzed, nzgrid, zed_in, zed_equal_arc, dpsipdrho_out, dpsipdrho_psi0_out, dIdrho_out, grho_out, bmag_out, bmag_psi0_out, gds2_out, gds21_out, gds22_out, gds23_out, gds24_out, gradpar_out, gbdrift0_out, gbdrift_out, cvdrift0_out, cvdrift_out, dBdrho_out, d2Bdrdth_out, dgradpardrho_out, btor_out, rmajor_out, dcvdrift0drho_out, dcvdriftdrho_out, dgbdrift0drho_out, dgbdriftdrho_out, dgds2dr_out, dgds21dr_out, dgds22dr_out, djacdrho_out)

Uses

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: nzed
integer, intent(in) :: nzgrid
real, intent(in), dimension(-nzgrid:) :: zed_in
logical, intent(in) :: zed_equal_arc
real, intent(out) :: dpsipdrho_out
real, intent(out) :: dpsipdrho_psi0_out
real, intent(out) :: dIdrho_out
real, intent(out), dimension(-nzgrid:) :: grho_out
real, intent(out), dimension(-nzgrid:) :: bmag_out
real, intent(out), dimension(-nzgrid:) :: bmag_psi0_out
real, intent(out), dimension(-nzgrid:) :: gds2_out
real, intent(out), dimension(-nzgrid:) :: gds21_out
real, intent(out), dimension(-nzgrid:) :: gds22_out
real, intent(out), dimension(-nzgrid:) :: gds23_out
real, intent(out), dimension(-nzgrid:) :: gds24_out
real, intent(out), dimension(-nzgrid:) :: gradpar_out
real, intent(out), dimension(-nzgrid:) :: gbdrift0_out
real, intent(out), dimension(-nzgrid:) :: gbdrift_out
real, intent(out), dimension(-nzgrid:) :: cvdrift0_out
real, intent(out), dimension(-nzgrid:) :: cvdrift_out
real, intent(out), dimension(-nzgrid:) :: dBdrho_out
real, intent(out), dimension(-nzgrid:) :: d2Bdrdth_out
real, intent(out), dimension(-nzgrid:) :: dgradpardrho_out
real, intent(out), dimension(-nzgrid:) :: btor_out
real, intent(out), dimension(-nzgrid:) :: rmajor_out
real, intent(out), dimension(-nzgrid:) :: dcvdrift0drho_out
real, intent(out), dimension(-nzgrid:) :: dcvdriftdrho_out
real, intent(out), dimension(-nzgrid:) :: dgbdrift0drho_out
real, intent(out), dimension(-nzgrid:) :: dgbdriftdrho_out
real, intent(out), dimension(-nzgrid:) :: dgds2dr_out
real, intent(out), dimension(-nzgrid:) :: dgds21dr_out
real, intent(out), dimension(-nzgrid:) :: dgds22dr_out
real, intent(out), dimension(-nzgrid:) :: djacdrho_out