21 lines
419 B
Fortran
21 lines
419 B
Fortran
subroutine setSamples(varInt)
|
|
use dopplerState
|
|
implicit none
|
|
integer varInt
|
|
i_samples = varInt
|
|
end
|
|
|
|
subroutine setStartLine(varInt)
|
|
use dopplerState
|
|
implicit none
|
|
integer varInt
|
|
i_strtline = varInt
|
|
end
|
|
|
|
subroutine setLines(varInt)
|
|
use dopplerState
|
|
implicit none
|
|
integer varInt
|
|
i_nlines = varInt
|
|
end
|