Changeset 9390 for trunk/ppShutter/test/tests.pro

Timestamp:

Oct 6, 2006, 5:59:06 PM (20 years ago)

Author:

eugene

Message:

shutter residual test

File:

• trunk/ppShutter/test/tests.pro (modified) (2 diffs)

trunk/ppShutter/test/tests.pro

@@ +1 @@
+
+macro shresid
+  if ($0 != 3)
+    echo "USAGE shresid (input) (output)"
+    break
+  end
+  rd A $1 
+  extract A a 0 0 2048 2048 0 0 2048 2048
+  keyword a EXPTIME time
+  echo "dt: $time"
+  set t = ($time + dt)
+  set da = a / t / pattern
+  stats da - - - -
+  tv da {$MEDIAN*0.95} {$MEDIAN*0.1}
+end
 
 # make a simple shutter offset map : off = Ax((x-Nx/2)/Nx)^2 + Ay((y-Ny/2)/Ny)^2
@@ -33 +48 @@
  set $1 = $1 + noisem*sqrt($1)
  keyword $1 EXPTIME -wf $2
+end
+
+macro mkshutter.pattern
+ if ($0 != 3)
+   echo "USAGE: mkshutter.pattern (model) (pattern)"
+   break
+ end
+
+ set $2 = (20/$Nx)*xramp($1)
 end