Fixes in a0 calculation and calculation of stretching energy in vertexmove

Samo Penic

2018-05-21 699ac44864e75549fb3d238d36f0bc1dd645ddac

 src/general.h

@@ -156,7 +156,8 @@
        ts_double projArea;
        ts_double relR;
        ts_double solAngle;
   struct ts_poly *grafted_poly;
      struct ts_poly *grafted_poly;
      struct ts_cluster *cluster;
};
typedef struct ts_vertex ts_vertex;

@@ -194,11 +195,13 @@
   ts_double znorm;
    ts_double area; // firstly needed for sh.c
    ts_double volume; // firstly needed for sh.c
   ts_double energy;
};
typedef struct ts_triangle ts_triangle;

struct ts_triangle_list{
    ts_uint n;
   ts_double a0;
    ts_triangle **tria;
};
typedef struct ts_triangle_list ts_triangle_list;
@@ -257,6 +260,7 @@
   long int nczmax;
   long int npoly;
   long int nmono;
   long int internal_poly;
   long int nfil;
   long int nfono;
   long int R_nucleus;
@@ -266,6 +270,8 @@
   long int pswitch;
    long int constvolswitch;
    long int constareaswitch;
   long int stretchswitch;
   ts_double xkA0;
    ts_double constvolprecision;
       char *multiprocessing;
      long int brezveze0;
@@ -283,6 +289,10 @@
   long int mcsweeps;
   long int quiet;
   long int shc;
   long int number_of_vertices_with_c0;
   ts_double c0;
   ts_double w;
   ts_double F;
} ts_tape;


@@ -319,11 +329,13 @@



typedef struct{
struct ts_cluster{
   ts_uint nvtx;
   ts_uint idx;
   ts_vertex **vtx;
} ts_cluster;
};

typedef struct ts_cluster ts_cluster;

typedef struct{
   ts_uint n;
@@ -365,4 +377,5 @@
int createPidFile(const char *progName, const char *pidFile, int flags);

int lockRegion(int fd, int type, int whence, int start, int len);
char *libVersion();
#endif