ftp.nice.ch/pub/next/unix/developer/plplot.3.0.s.tar.gz#/plplot/src/plschr.c

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

#include "plplot.h"

void plschr(def,scale)
double def,scale;
{
    double defalt, ht;

    if (def != 0.0)
       schr(def,(scale*def));
    else {
       gchr(&defalt,&ht);
       schr(defalt,(scale*defalt));
    }
}

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