blob: 6f3fed2561208807ed1c863780a043c906239c2f (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
# Copyright(c) 1986 Association of Universities for Research in Astronomy Inc.
include <mach.h>
include <fset.h>
include "../lib/ids.h"
include "iis.h"
# ZSEEK -- Seek for an image frame
procedure zseek (fd, x, y)
int fd # file to write
int x, y # device coordinates
long offset
begin
offset = max (1, 1 + (x + y * IIS_XDIM) * SZ_SHORT)
call seek (fd, offset)
end
|
