From 3006183b769f2e126b1a96e6bf697c2b7f657df7 Mon Sep 17 00:00:00 2001
From: Samo Penic <samo.penic@gmail.com>
Date: Sun, 26 Apr 2020 17:35:26 +0000
Subject: [PATCH] Code for incremental adding of inclusions done

---
 src/initial_distribution.c |   34 +++++++++++++++++++++++-----------
 1 files changed, 23 insertions(+), 11 deletions(-)

diff --git a/src/initial_distribution.c b/src/initial_distribution.c
index 0274038..23c5827 100644
--- a/src/initial_distribution.c
+++ b/src/initial_distribution.c
@@ -43,6 +43,8 @@
 
 	vesicle=initial_distribution_dipyramid(tape->nshell,tape->ncxmax,tape->ncymax,tape->nczmax,tape->stepsize);
     	vesicle->tape=tape;
+	vesicle->clist->dmin_interspecies = tape->dmin_interspecies*tape->dmin_interspecies;
+	vesicle->poly_list=init_poly_list(tape->npoly,tape->nmono, vesicle->vlist, vesicle);
 	set_vesicle_values_from_tape(vesicle);
 		initial_population_with_c0(vesicle,tape);
 	return vesicle;
@@ -59,7 +61,7 @@
 	vesicle->clist->dmin_interspecies = tape->dmin_interspecies*tape->dmin_interspecies;
 
 	//Initialize grafted polymers (brush):
-	vesicle->poly_list=init_poly_list(tape->npoly,tape->nmono, vesicle->vlist, vesicle);
+	//vesicle->poly_list=init_poly_list(tape->npoly,tape->nmono, vesicle->vlist, vesicle);
 	vesicle->spring_constant=tape->kspring;
 	poly_assign_spring_const(vesicle);
 
@@ -101,7 +103,8 @@
 	vesicle->clist->ncmax[0]=tape->ncxmax;
 	vesicle->clist->ncmax[1]=tape->ncymax;
 	vesicle->clist->ncmax[2]=tape->nczmax;
-	vesicle->clist->max_occupancy=16; /* hard coded max occupancy? */
+//THIS IS NOW HARDCODED IN CELL.C
+//	vesicle->clist->max_occupancy=16; /* hard coded max occupancy? */
 
 	vesicle->pressure= tape->pressure;
 	vesicle->pswitch=tape->pswitch;
@@ -112,20 +115,30 @@
         vesicle->sphHarmonics=NULL;
     }
 
-    
+	vesicle->tlist->a0=sqrt(3)/4*pow((vesicle->tape->dmax+1.0)/2.0,2);  
     return TS_SUCCESS;
 
 }
 
 
 ts_bool initial_population_with_c0(ts_vesicle *vesicle, ts_tape *tape){
-	int rndvtx,i,j;
+// OVERRIDE! JUST FOR TEST BRANCH!!!
+// WARNING !!!!
+// WARNING !!!!
+// WARNING !!!!
+	return TS_SUCCESS;
 	if(tape->number_of_vertices_with_c0>0){
 //		ts_fprintf(stderr,"Setting values for spontaneous curvature as defined in tape\n");
-		j=0;
-		for(i=0;i<tape->number_of_vertices_with_c0;i++){
+		add_vertices_with_c0(vesicle, tape->number_of_vertices_with_c0, tape->c0, tape->w);
+	}
+	return TS_SUCCESS;
+}
+
+ts_bool add_vertices_with_c0(ts_vesicle *vesicle, ts_int n, ts_double c0, ts_double w){
+		ts_int rndvtx,i,j=0;
+		for(i=0;i<n;i++){
 			rndvtx=rand() % vesicle->vlist->n;
-			if(fabs(vesicle->vlist->vtx[rndvtx]->c-tape->c0)<1e-15){
+			if(fabs(vesicle->vlist->vtx[rndvtx]->c-c0)<1e-15){
 				j++;
 				i--;
 				if(j>10*vesicle->vlist->n){
@@ -133,17 +146,16 @@
 				}
 				continue;
 			}
-			vesicle->vlist->vtx[rndvtx]->c=tape->c0;
+			vesicle->vlist->vtx[rndvtx]->c=c0;
 		}
 		mean_curvature_and_energy(vesicle);
-		if(fabs(tape->w)>1e-16){ //if nonzero energy
+		if(fabs(w)>1e-16){ //if nonzero energy
 //			ts_fprintf(stderr,"Setting attraction between vertices with spontaneous curvature\n");
 			sweep_attraction_bond_energy(vesicle);
 		}
-	}
 	return TS_SUCCESS;
-}
 
+}
 
 ts_bool pentagonal_dipyramid_vertex_distribution(ts_vertex_list *vlist){
 	/* Some often used relations */

--
Gitblit v1.9.3