istp/gray
2
0
Fork 0
Code Issues Pull Requests Packages Projects Releases 1 Wiki Activity

src/gray_tables.f90: kinetic_profiles increase points

Browse Source
This commit is contained in:
Michele Guerini Rocco 2025-02-10 10:31:20 +01:00
parent 7cd8d1a597
commit 82f6f928a5
Signed by: rnhmjoj
GPG Key ID: BFBAF4C975F76450
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/gray_tables.f90
View File

@ -115,7 +115,7 @@ contains
type(table) :: tbl type(table) :: tbl
! local variables ! local variables
integer, parameter :: n_grid = 100 integer, parameter :: n_grid = 400
integer :: i, n_tail integer :: i, n_tail
real(wp_) :: rho_t, J_phi, dens, ddens real(wp_) :: rho_t, J_phi, dens, ddens