21 lines
419 B
FortranFixed
21 lines
419 B
FortranFixed
|
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
|