aboutsummaryrefslogtreecommitdiff
path: root/pkg/tbtables/fitsio/fitssppb/fshdef.x
blob: 56ceab7469071e8b9a5c34842e178165a6d94b88 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
include "fitsio.h"

procedure fshdef(ounit,moreky,status)

# Header DEFinition
# define the size of the current header unit; this simply lets
# us determine where the data unit will start

int     ounit           # i output file pointer
int     moreky          # i reserve space for this many more keywords
int     status          # o error status

begin

call fthdef(ounit,moreky,status)
end