blob: 61479f04033f4d451bc97ef947018128b14886d2 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
include "fitsio.h"
procedure fsmahd(iunit,extno,xtend,status)
# Move to Absolute Header Data unit
# move the i/o pointer to the specified HDU and initialize all
# the common block parameters which describe the extension
int iunit # i input file pointer
int extno # i extension number
int xtend # o type of extension
int status # o error status
begin
call ftmahd(iunit,extno,xtend,status)
end
|
