Commit c3e6974f authored by thomas.forbriger's avatar thomas.forbriger

ts/wf [TASK]: increase array size in smoos.f

parent ffdb8fed
......@@ -39,7 +39,7 @@ c files
parameter (luin=10, luout=11)
c data
integer msamp, nsamp, i
parameter(msamp=66000)
parameter(msamp=200000)
c calculation
integer nfac, npow, powsamp, newpowsamp
complex*16 spect(msamp)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment