blob: ca1561f138044ed1f895c13515f938d8f7626182 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
include "fitsio.h"
procedure fspdes(ounit,colnum,rownum,nelem,offset,status)
# write the descriptor values to a binary table. This is only
# used for column which have TFORMn = 'P', i.e., for variable
# length arrays.
int ounit # i output file pointer
int colnum # i column number
int rownum # i row number
int nelem # i number of elements
int offset # i offset
int status # o error status
begin
call ftpdes(ounit,colnum,rownum,nelem,offset,status)
end
|
