blob: d2482b08aa1801fb758b7f3bca8d33c34873d052 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
include "fitsio.h"
procedure fsgtdm(iunit,colnum,maxdim,naxis,naxes,status)
# read the TDIMnnn keyword
int iunit # i input file pointer
int colnum # i column number
int maxdim # i maximum number of dimensions to return
int naxis # i number of axes
int naxes[ARB] # i dimension of each axis
int status # o error status
begin
call ftgtdm(iunit,colnum,maxdim,naxis,naxes,status)
end
|