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

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
c calculation
integer nfac, npow, powsamp, newpowsamp
complex*16 spect(msamp)
Supports Markdown
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