subroutine pckbt(a,b,n,ibits)
integer a(1),b(1),n,ibits
subroutine unpkbt(a,b,n,ibits)
integer a(1),b(1),n,ibits
#include <inrimage/image.h>
pckbt_(a,b,n,ibits)
char *a, *b;Fort_int *n, *ibits;
c_pckbt(a,b,n,ibits)
char *a, *b;int n, ibits;
unpkbt_(a,b,n,ibits)
char *a, *b;Fort_int *n, *ibits;
c_unpkbt(a,b,n,ibits)
char *a, *b;int n, ibits;
unpkbt (c_unpkbt)
fait le traitement inverse.
a et b peuvent être identiques car l'opération commence
par la fin du tableau.