gkowal/amun-code
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

INTEGRALS: Extend the exponent to 3 digits in reconnection rate.

Browse Source 
Signed-off-by: Grzegorz Kowal <grzegorz@amuncode.org>
This commit is contained in:
Grzegorz Kowal 2014-09-27 14:13:38 -03:00
parent d59975b463
commit b2d256aef8
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/integrals.F90
View File

@ -519,7 +519,7 @@ module integrals
, avarr(5), mnarr(5), mxarr(5) &
, avarr(6), mnarr(6), mxarr(6) &
, avarr(7), mnarr(7), mxarr(7)
write(runit,"(i9, 3(1x,1e18.8))") step, time, inarr(10:11)
write(runit,"(i9, 3(1x,1e18.8e3))") step, time, inarr(10:11)
end if
#ifdef PROFILE