bugfix in angle scan processing

This commit is contained in:
muntwiler_m 2020-06-16 14:31:51 +02:00
parent ef9d08e5f5
commit f419e92809
2 changed files with 4 additions and 4 deletions

View File

@ -380,7 +380,7 @@ static function do_crop(check, [force])
endif endif
if ((crop_theta >= 10) && (crop_theta < 90)) if ((crop_theta >= 10) && (crop_theta < 90))
crop_strip_theta(process_data, 0, crop_theta, process_theta, process_tilt, process_phi) crop_strip_theta(process_data, -0.1, crop_theta + 0.1, process_theta, process_tilt, process_phi)
endif endif
if (strlen(crop_rows) > 0) if (strlen(crop_rows) > 0)

View File

@ -714,9 +714,9 @@ function crop_strip_theta(strip, theta_lo, theta_hi, theta, tilt, phi)
variable nx = dimsize(strip, 0) variable nx = dimsize(strip, 0)
variable ny = numpnts(idx) variable ny = numpnts(idx)
theta = theta[idx] theta[0, ny-1] = theta[idx]
tilt = tilt[idx] tilt[0, ny-1] = tilt[idx]
phi = phi[idx] phi[0, ny-1] = phi[idx]
redimension /n=(ny) theta, tilt, phi redimension /n=(ny) theta, tilt, phi
duplicate /free strip, strip_copy duplicate /free strip, strip_copy