ftp.nice.ch/pub/next/unix/audio/cmusic.bs.N.tar.gz#/src/cmusic/ug.signum.c

This is ug.signum.c in view mode; [Download] [Up]

/* Signum unit generator */

#include "ug.head.h"

#define IN 1

signum

UGHEAD{
    UGINIT;
    UGLOOP{
	if( VAL(IN) >= 0. )
	    VAL(OUT)++ = 1.0 ;
	else
	    VAL(OUT)++ = -1.0 ;
	UGEND(1);
    }
}

These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.