Trisurf Monte Carlo simulator
Samo Penic
2016-05-18 354145cb4c260bdd7ef3dafcdae206e2d00d4d3a
src/initial_distribution.c
@@ -1,3 +1,4 @@
/* vim: set ts=4 sts=4 sw=4 noet : */
#include<stdlib.h>
#include<math.h>
#include<stdio.h>
@@ -39,10 +40,17 @@
ts_vesicle *create_vesicle_from_tape(ts_tape *tape){
   ts_vesicle *vesicle;
   ts_vertex *vtx;
   vesicle=initial_distribution_dipyramid(tape->nshell,tape->ncxmax,tape->ncymax,tape->nczmax,tape->stepsize);
       vesicle->tape=tape;
   set_vesicle_values_from_tape(vesicle);
   return vesicle;
}
ts_bool set_vesicle_values_from_tape(ts_vesicle *vesicle){
   // Nucleus:
   ts_vertex *vtx;
   ts_tape *tape=vesicle->tape;
   vesicle->R_nucleus=tape->R_nucleus*tape->R_nucleus;
   vesicle->clist->dmin_interspecies = tape->dmin_interspecies*tape->dmin_interspecies;
@@ -100,7 +108,7 @@
    else {
        vesicle->sphHarmonics=NULL;
    }
    return vesicle;
    return TS_SUCCESS;
}