207 plsc->chrht = scale * plsc->chrdef;
224 plsc->minht = scale * plsc->mindef;
239 plsc->majht = scale * plsc->majdef;
254 plsc->symht = scale * plsc->symdef;
268 if ( plsc->level < 1 )
270 plabort(
"pllsty: Please call plinit first" );
273 if ( lin < 1 || lin > 8 )
275 plabort(
"pllsty: Invalid line style" );
279 plsc->line_style = lin;
281 &
line[lin - 1].mark[0], &
line[lin - 1].space[0] );
295 if ( plsc->level < 1 )
297 plabort(
"plpat: Please call plinit first" );
300 if ( nlin < 1 || nlin > 2 )
302 plabort(
"plpat: Only 1 or 2 line styles allowed" );
305 for ( i = 0; i < nlin; i++ )
309 plabort(
"plpat: Line spacing must be greater than 0" );
314 spat( inc, del, nlin );
327 if ( plsc->level < 1 )
329 plabort(
"plpsty: Please call plinit first" );
334 plabort(
"plpsty: Invalid pattern" );
337 if ( patt != plsc->patt )
347 spat( NULL, NULL, 0 );
362 for ( i = 0; i < nlin; i++ )
364 plsc->inclin[i] = inc[i];
365 plsc->delta[i] = del[i];