ftp.nice.ch/pub/next/unix/audio/cmix.s.tar.gz#/cmix/sys/m_pitch.c

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

#include "../H/ugens.h"

double m_boost(p)
float *p;
{ return(boost(p[0])); }

double m_cpspch(p)
float *p;
{ return(cpspch(p[0])); }

double m_pchcps(p)
float *p;
{ return(pchcps(p[0])); }

double m_cpsoct(p)
float *p;
{ return(cpsoct(p[0])); }

double m_octcps(p)
float *p;
{ return(octcps(p[0])); }

double m_rand()
{ float rrand(); return(rrand()); }

double m_random()
{ float rrand(); return(rrand()*.5+.5); }

double m_srand(p)
float *p;
{ srrand(p[0]); }

double m_time_beat(p)
float *p;
{ float time_beat(); return(time_beat(p[0])); }

double m_beat_time(p)
float *p;
{ float beat_time(); return(beat_time(p[0])); }

double m_trunc(p)
float *p;
{ return((int)(p[0])); }

double m_ampdb(p)
float *p;
{ return(ampdb(p[0])); }

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