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

procedure fsghsp(ounit,nexist,nmore,status)

# Get Header SPace
# return the number of additional keywords that will fit in the header

int     ounit           # i output file pointer
int     nexist          # o how many exist?
int     nmore           # o this many more will fit
int     status          # o error status

begin

call ftghsp(ounit,nexist,nmore,status)
end