blob: f4e86180b2dc5fd70ae77a2a6edfcbdd38e5ace6 (
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 <imhdr.h>
include <imio.h>
# MW_OPENIM -- Open an MWCS descriptor on an image, loading the descriptor
# from the image if there is one. The MWCS descriptor is allocated after
# the WCS cards are read in mw_loadim so that the WCS dimensionality can
# be determined when the image header is dataless.
pointer procedure mw_openim (im)
pointer im #I pointer to image descriptor
pointer mw
begin
mw = NULL
call mw_loadim (mw, im)
return (mw)
end
|