Skip to content
Snippets Groups Projects
Commit 28ead18a authored by Antoine Cyril David Hoffmann's avatar Antoine Cyril David Hoffmann :seedling:
Browse files

typo

parent 67e07416
No related branches found
No related tags found
No related merge requests found
...@@ -277,7 +277,7 @@ SUBROUTINE compute_radial_ion_heatflux ...@@ -277,7 +277,7 @@ SUBROUTINE compute_radial_ion_heatflux
+tau_i*sqrt_tau_o_sigma_i*imagu*ky_*CONJG(psi(iky,ikx,izgs:izge))& +tau_i*sqrt_tau_o_sigma_i*imagu*ky_*CONJG(psi(iky,ikx,izgs:izge))&
*kernel_i(in,iky,ikx,izgs:izge,0)*(& *kernel_i(in,iky,ikx,izgs:izge,0)*(&
0.5_dp*SQRT2*SQRT3*moments_i(ip3_i,in ,iky,ikx,izgs:izge,updatetlevel)& 0.5_dp*SQRT2*SQRT3*moments_i(ip3_i,in ,iky,ikx,izgs:izge,updatetlevel)&
+1.5_dp*CONJG(moments_i(ip1_i,in ,iky,ikx,izgs:izge,updatetlevel))& !????? +1.5_dp*moments_i(ip1_i,in ,iky,ikx,izgs:izge,updatetlevel)&
+(2._dp*n_dp+1._dp)*moments_i(ip1_i,in ,iky,ikx,izgs:izge,updatetlevel)& +(2._dp*n_dp+1._dp)*moments_i(ip1_i,in ,iky,ikx,izgs:izge,updatetlevel)&
-(n_dp+1._dp)*moments_i(ip1_i,in+1,iky,ikx,izgs:izge,updatetlevel)& -(n_dp+1._dp)*moments_i(ip1_i,in+1,iky,ikx,izgs:izge,updatetlevel)&
-n_dp*moments_i(ip1_i,in-1,iky,ikx,izgs:izge,updatetlevel)) -n_dp*moments_i(ip1_i,in-1,iky,ikx,izgs:izge,updatetlevel))
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment