Back to index

plt-scheme  4.2.1
Classes | Functions | Variables
plsdef.c File Reference
#include "plplotP.h"

Go to the source code of this file.

Classes

struct  line
struct  pattern

Functions

static void spat (PLINT inc[], PLINT del[], PLINT nlin)
void c_plschr (PLFLT def, PLFLT scale)
void c_plsmin (PLFLT def, PLFLT scale)
void c_plsmaj (PLFLT def, PLFLT scale)
void c_plssym (PLFLT def, PLFLT scale)
void c_pllsty (PLINT lin)
void c_plpat (PLINT nlin, PLINT *inc, PLINT *del)
void c_plpsty (PLINT patt)

Variables

static struct line line []
static struct pattern pattern []

Class Documentation

struct line

Definition at line 11 of file plsdef.c.

Class Members
PLINT mark
PLINT nels
PLINT space
struct pattern

Definition at line 93 of file plsdef.c.

Class Members
PLINT del
PLINT inc
PLINT nlines

Function Documentation

void c_pllsty ( PLINT  lin)

Definition at line 245 of file plsdef.c.

{
    if (plsc->level < 1) {
       plabort("pllsty: Please call plinit first");
       return;
    }
    if (lin < 1 || lin > 8) {
       plabort("pllsty: Invalid line style");
       return;
    }

    plstyl(line[lin - 1].nels,
          &line[lin - 1].mark[0], &line[lin - 1].space[0]);
}

Here is the call graph for this function:

void c_plpat ( PLINT  nlin,
PLINT inc,
PLINT del 
)

Definition at line 267 of file plsdef.c.

{
    PLINT i;

    if (plsc->level < 1) {
       plabort("plpat: Please call plinit first");
       return;
    }
    if (nlin < 1 || nlin > 2) {
       plabort("plpat: Only 1 or 2 line styles allowed");
       return;
    }
    for (i = 0; i < nlin; i++) {
       if (del[i] < 0) {
           plabort("plpat: Line spacing must be greater than 0");
           return;
       }
    }
    spat(inc, del, nlin);
}

Here is the call graph for this function:

void c_plpsty ( PLINT  patt)

Definition at line 296 of file plsdef.c.

{
    if (plsc->level < 1) {
       plabort("plpsty: Please call plinit first");
       return;
    }
    if (patt > 8) {
       plabort("plpsty: Invalid pattern");
       return;
    }
    if (patt != plsc->patt) {
       plsc->patt = patt;

       if (plsc->level > 0) {
           plP_state(PLSTATE_FILL);
       }
    }
    if (patt > 0) {
       spat(&pattern[patt - 1].inc[0], &pattern[patt - 1].del[0],
            pattern[patt - 1].nlines);
    }
}

Here is the call graph for this function:

void c_plschr ( PLFLT  def,
PLFLT  scale 
)

Definition at line 185 of file plsdef.c.

{
    if (def != 0.0) 
       plsc->chrdef = def;

    plsc->chrht = scale * plsc->chrdef;
}
void c_plsmaj ( PLFLT  def,
PLFLT  scale 
)

Definition at line 215 of file plsdef.c.

{
    if (def != 0.0) 
       plsc->majdef = def;

    plsc->majht = scale * plsc->majdef;
}
void c_plsmin ( PLFLT  def,
PLFLT  scale 
)

Definition at line 200 of file plsdef.c.

{
    if (def != 0.0) 
       plsc->mindef = def;

    plsc->minht = scale * plsc->mindef;
}
void c_plssym ( PLFLT  def,
PLFLT  scale 
)

Definition at line 230 of file plsdef.c.

{
    if (def != 0.0) 
       plsc->symdef = def;

    plsc->symht = scale * plsc->symdef;
}
static void spat ( PLINT  inc[],
PLINT  del[],
PLINT  nlin 
) [static]

Definition at line 326 of file plsdef.c.

{
    PLINT i;

    plsc->nps = nlin;
    for (i = 0; i < nlin; i++) {
       plsc->inclin[i] = inc[i];
       plsc->delta[i] = del[i];
    }
}

Here is the caller graph for this function:


Variable Documentation

struct line line[] [static]
struct pattern pattern[] [static]