Komplot  fonts demo

								
/* program to test KOMPLOT functions in C  */

#include <stdio.h>
#include <math.h>
#include "komplot.h"

int main()
{
 float x[] = {-25, -23.2, -22, -20};
 float y[] = {-8.6,   -7, -6.6,  -5.7};
 float x2 [] = {-18,  -21, -22, -23.4};
 float y2 [] = {-2.5,  -3.5, -4.3,   -9};

 scale_annotations(1.5);
 x_margins(3,2);
 y_margins(2,2);

 font_switch_character('&');
 ps_define_font("A","Helvetica-Bold");
 frame(14, -18, -25, 16, -9, -1, " ", " ", "&AOptical luminosity functions");
 ps_define_font("B","Helvetica");
 ps_define_font("C","Symbol");
 gstrng(-1.3,  4,  -0.5, 90, "&BLog &CF&B(Mpc-3 mag-1)"); 
 gstrng( 7,-1.4,  -0.5,  0., "&BMBC(0)" );
 polyline(" ", 4,x,y);
 ps_define_font("D","Times-Bold_Italic");
 gstrng(-18.5, -6.6, 0.35, 0, "&DOptically selected");
 gstrng(-18.5, -7 , 0.35, 0, "quasars (local)");
 curve(" ", 4, x2, y2);
 gstrng(-21, -3, 0.35, 0, "Field galaxies");

 return 0;

}