From fa080de7afc95aa1c19a6e6fc0e0708ced2eadc4 Mon Sep 17 00:00:00 2001 From: Joseph Hunkeler Date: Wed, 8 Jul 2015 20:46:52 -0400 Subject: Initial commit --- noao/imred/vtel/numeric.h | 12 ++++++++++++ 1 file changed, 12 insertions(+) create mode 100644 noao/imred/vtel/numeric.h (limited to 'noao/imred/vtel/numeric.h') diff --git a/noao/imred/vtel/numeric.h b/noao/imred/vtel/numeric.h new file mode 100644 index 00000000..765fac03 --- /dev/null +++ b/noao/imred/vtel/numeric.h @@ -0,0 +1,12 @@ +# Structure for argument list to subroutine 'numeric'. + +define VT_LENNUMSTRUCT 8 # Length of VT num structure + +define VT_DLODX Memr[P2R($1)] # deriv longitude wrt x +define VT_DLATDY Memr[P2R($1+1)] # deriv latitude wrt y +define VT_LATTOP Memr[P2R($1+2)] # latitude of top of output pixel +define VT_LATBOT Memr[P2R($1+3)] # latitude of bottom of output pixel +define VT_LOLEFT Memr[P2R($1+4)] # longitude of left side of out pixel +define VT_LORITE Memr[P2R($1+5)] # longitude of right side of out pixel +define VT_LATMID Memr[P2R($1+6)] # latitude of middle of output pixel +define VT_LOMID Memr[P2R($1+7)] # longitude of middle of output pixel -- cgit