smaller chunk size to save ram
This commit is contained in:
parent
d5956fda51
commit
3094119508
2 changed files with 1 additions and 1 deletions
Binary file not shown.
|
|
@ -2,7 +2,7 @@ program test
|
||||||
implicit none
|
implicit none
|
||||||
1 format(1i10)
|
1 format(1i10)
|
||||||
|
|
||||||
integer (kind = 8), parameter :: base = 2, chunk = 1000000000
|
integer (kind = 8), parameter :: base = 2, chunk = 1000000
|
||||||
double precision :: S
|
double precision :: S
|
||||||
integer (kind = 8) :: i, len
|
integer (kind = 8) :: i, len
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue