/* from Kyrpotin camlib made Smirnov */
#include "cam_ppi2.c"
int naf(int n,int a,int f,long *d){int x,q;
     if(f<7)x=naf_r3(n,a,f,d,&q);  /*read data from camac */
     else   x=naf_w3(n,a,f,*d,&q);  /*write data */
return(q|(x<<1));}

int nafw(int n,int a,int f,long d){return(naf(n,a,f,&d));}

int nafd(int n,int a,int f){int x,q;
x=naf_0(n,a,f,&q);return(q|(x<<1));}


void cam_z (void){camac_z();}
void crate(int n){camac_crate(n);}