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

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

#include <stdio.h>
#include <math.h>

main() {
 float x, y;
 long i;
    y = 3.1415926535 ;
    for(i=0; i<10000; i++)
	x = sqrt( (double) y ) ;
}

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