#include <stdio.h>
#include "ppropath.h"

void main (int argc, char *argv[])
{
   int kpa = 1, mes = 1;
   float t, ts, p, h, hd, hdd, tc, pc;

   KPAMES( kpa, mes );

   p = 1e0;
   ts = TSP( p );
   printf( "ts = %10.5f\n", ts );

   hd = HPD( p );
   hdd = HPDD( p );
   printf( "hd = %10.5f\n", hd * 1e-3 );
   printf( "hdd = %10.5f\n", hdd * 1e-3 );

   t = 2e2;
   h = HPT( p, t );
   printf( "h = %10.5f\n", h * 1e-3 );

   tc = CRP( "T" );
   pc = CRP( "P" );
   printf( "tc = %10.5f\n", tc );
   printf( "pc = %10.5f\n", pc );

}