Add 15 minute and 30 minute TRperiod option for FST240.

This commit is contained in:
Steven Franke 2020-07-17 10:52:27 -05:00
parent 5b705d54d2
commit 02b66241d2
2 changed files with 12 additions and 0 deletions

View File

@ -52,6 +52,8 @@ program fst240sim
if(nsec.eq.60) nsps=3888
if(nsec.eq.120) nsps=8200
if(nsec.eq.300) nsps=21504
if(nsec.eq.900) nsps=65536
if(nsec.eq.1800) nsps=131072
if(nsps.eq.0) then
print*,'Invalid TR sequence length.'
go to 999

View File

@ -201,6 +201,16 @@ contains
nmax=300*12000
ndown=512/hmod !nss=42,84,168,336
nfft1=int((nmax-200)/ndown)*ndown
else if(ntrperiod.eq.900) then
nsps=65536
nmax=900*12000
ndown=1024/hmod !nss=64,128,256,512
nfft1=int((nmax-200)/ndown)*ndown
else if(ntrperiod.eq.1800) then
nsps=131072
nmax=1800*12000
ndown=2048/hmod !nss=64,128,256,512
nfft1=int((nmax-200)/ndown)*ndown
end if
nss=nsps/ndown
fs=12000.0 !Sample rate