blob: 32f96fca25476f2ab13432e4251694e76a350332 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
include "fitsio.h"
procedure fsptdm(ounit,colnum,naxis,naxes,status)
# write the TDIMnnn keyword
int ounit # i output file pointer
int colnum # i column number
int naxis # i number of axes
int naxes[ARB] # i dimension of each axis
int status # o error status
begin
call ftptdm(ounit,colnum,naxis,naxes,status)
end
|
