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

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

#include "plplot.h"

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

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

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