From 3dda5c0e8e33a6c28ccc19fddd7ac719a8c81f70 Mon Sep 17 00:00:00 2001
From: Antoine Hoffmann <antoine.hoffmann@epfl.ch>
Date: Thu, 19 Oct 2023 11:58:48 +0200
Subject: [PATCH] comment correction
---
src/solve_EM_fields.F90 | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/src/solve_EM_fields.F90 b/src/solve_EM_fields.F90
index 936ac1ee..2c1e20b7 100644
--- a/src/solve_EM_fields.F90
+++ b/src/solve_EM_fields.F90
@@ -51,7 +51,7 @@ CONTAINS
! Adiabatic charge density (linked to flux surface averaged phi)
! We compute the flux surface average solving a flux surface averaged
! Poisson equation, i.e.
- ! [qi^2(1-sum_j K_j^2)/tau_i] <phi>_psi = <q_i n_i >_psi
+ ! [qi^2/taui (1-sum_j K_j^2)/tau_i] <phi>_psi = <q_i n_i >_psi
! inv_pol_ion^-1 fsa_phi = simpson(Jacobian rho_i ) * iInt_Jacobian
IF (ADIAB_E) THEN
fsa_phi = 0._xp
--
GitLab