Advances Ohm's law in time and solves for parallel elctromagnetic potential and parallel current
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(comm_handler_t), | intent(in) | :: | comm_handler |
Communicators |
||
| class(equilibrium_t), | intent(inout) | :: | equi |
Equilibrium |
||
| type(mesh_cart_t), | intent(in) | :: | mesh_stag |
Mesh (staggered) |
||
| class(helmholtz_solver_t), | intent(inout) | :: | hsolver_stag |
Elliptic (2D) solver on staggered mesh |
||
| type(parallel_map_t), | intent(in) | :: | map |
Parallel map |
||
| type(penalisation_t), | intent(in) | :: | penalisation_stag |
Penalisation (staggered) |
||
| type(boundaries_braginskii_t), | intent(inout) | :: | boundaries |
Boundary information for the BRAGINSKII model |
||
| type(karniadakis_t), | intent(inout) | :: | tstep_ohm |
Time-step integrator for Ohm's law |
||
| real(kind=GP), | intent(in), | dimension(mesh_stag%get_n_points()) | :: | nev_stag |
Values of density on staggered grid at time t |
|
| real(kind=GP), | intent(in), | dimension(mesh_stag%get_n_points()) | :: | nev_adv_stag |
Values of density on staggered grid at time t+1 |
|
| real(kind=GP), | intent(in), | dimension(mesh_stag%get_n_points()) | :: | tev_adv_stag |
Values of electron temperature on staggered grid at time t+1 |
|
| real(kind=GP), | intent(in), | dimension(mesh_stag%get_n_points()) | :: | aparv |
Values of parallel electromagnetic potential at time t |
|
| real(kind=GP), | intent(in), | dimension(mesh_stag%get_n_points()) | :: | jparv |
Values of parallel current at time t |
|
| real(kind=GP), | intent(in), | dimension(mesh_stag%get_n_points()) | :: | dohm |
Right hand side of Ohm's law |
|
| real(kind=GP), | intent(inout), | dimension(mesh_stag%get_n_points()) | :: | apar_adv |
Values of parallel electromagnetic potential at time t+1, on input values for initial guess |
|
| real(kind=GP), | intent(out), | dimension(mesh_stag%get_n_points()) | :: | jpar_adv |
Values of parallel current at time t+1 |
|
| integer, | intent(out) | :: | sinfo |
Info from solver |
||
| real(kind=GP), | intent(out) | :: | res |
Residual of solution |