/*  
 *  This file is part of abc2ps, Copyright (C) 1996,1997 Michael Methfessel
 *  See file abc2ps.c for details.
 */

/*   Global style parameters for the note spacing and Knuthian glue. */

/*   Parameters here are used to set spaces around notes.
     Names ending in p: prefered natural spacings
     Names ending in x: expanded spacings  
     Units: everything is based on a staff which is 24 points high
     (ie. 6 pt between two staff lines). */

/* name for this set of parameters */
#define STYLE "std"

/* ----- Parameters for the length-to-width mapping ----- */
/* f0p, f5p, f1p are the return values for notes of zero duration, 
   half notes, and whole notes. A simple parabolic interpolation is 
   used for other note durations. The aim is to permit a non-linear 
   relation between the note duration and the spacing on the paper. */

float f0p = (float)0.10;
float f5p = (float)0.60; 
float f1p = (float)1.0;  

float f0x = (float)0.15;    
float f5x = (float)0.7;
float f1x = (float)1.0;


/* ----- Parameters for the note-note spacing ----- */
/* That is: the internote spacing between two notes that follow 
   each other without a bar in between.  

   -- lnn is an overall multiplier, i.e. the final note width in points
      is the return value of function nwidth times lnn.
   -- bnn determines how strongly the first note enters into the spacing.
      For bnn=1, the spacing is calculated using the first note.
      For bnn=0, the spacing is the average for the two notes. 
   -- fnn multiplies the spacing under a beam, to compress the notes a bit 
   -- gnn multiplies the spacing a second time within an n-tuplet */
   
float lnnp = (float)40;        
float bnnp = (float)0.9;
float fnnp = (float)0.9;
float gnnp = (float)0.8;

float lnnx = (float)90;     
float bnnx = (float)0.9;
float fnnx = (float)0.9;
float gnnx = (float)0.85;


/* ---- Parameters for the bar-note spacing ----- */
/* That is: the spacing between a bar and note at the measure start.

   -- lbn is the overall multiplier for the return values from nwidth.
   -- vbn is the note duration which defines the default spacing.
   -- bbn determines how strongly the note duration enters into the spacing.
      For bbn=1, the spacing is lbn times the return value of nwidth.
      For bbn=0, the spacing is lbn times the width of rbn times timesig. */

float lbnp = (float)30;   
float bbnp = (float)0.2;
float rbnp = (float)0.1;

float lbnx = (float)75;     
float bbnx = (float)0.2;
float rbnx = (float)0.08;


/* ---- Parameters for the note-bar spacing ----- */
/* That is: the spacing between a note at the measure end and the bar.

   -- lnb is the overall multiplier for the return values from nwidth.
   -- vnb is the note duration which defines the default spacing.
   -- bnb determines how strongly the note duration enters into the spacing.
      For bnb=1, the spacing is lnb times the return value of nwidth.
      For bnb=0, the spacing is lnb times the width of rbn times timesig. */

float lnbp = (float)30;    
float bnbp = (float)0.7;
float rnbp = (float)0.125;

float lnbx = (float)75;    
float bnbx = (float)0.6;
float rnbx = (float)0.125;  


/* ---- Parameters for centered single note in a measure ----- */
/* That is: the total length = bar-note + note-bar spacings

   -- ln0 is the overall multiplier for the return values from nwidth.
   -- bn0 interpolates between two limiting cases
      For bn0=0, this case is treated like bar-note and note-bar cases
      For bn0=1, the note is centered in the measure.  */

float ln0p = (float)30;
float bn0p = (float)0;

float ln0x = (float)90;
float bn0x = (float)0;