2.9BSD - /usr/src/lib/libF77/i_inot.c

   1: /* INOT fortran callable.    PLW 8/7/79.*/
   2: long int i_inot(x)
   3:     long int *x;
   4: {
   5:     return(~*x);
   6: }

Defined functions