From a97daa5897994a0c02bae1602d58ec1f11ec2ce2 Mon Sep 17 00:00:00 2001
From: Samo Penic <samo.penic@gmail.com>
Date: Tue, 02 Sep 2014 20:33:06 +0000
Subject: [PATCH] Prsecmdline.c in test directory. This file is to show how command line parameters needs to be parsed.
---
src/vertexmove.c | 25 ++++++++++++++++++++-----
1 files changed, 20 insertions(+), 5 deletions(-)
diff --git a/src/vertexmove.c b/src/vertexmove.c
index 9f263c8..af578e2 100644
--- a/src/vertexmove.c
+++ b/src/vertexmove.c
@@ -97,9 +97,9 @@
};
delta_energy=0;
-
-
-// fprintf(stderr,"Success for now.\n");
+
+// vesicle_volume(vesicle);
+// fprintf(stderr,"Volume in the beginning=%1.16e\n", vesicle->volume);
//update the normals of triangles that share bead i.
for(i=0;i<vtx->tristar_no;i++) triangle_normal_vector(vtx->tristar[i]);
@@ -118,17 +118,26 @@
if(vesicle->pswitch==1) delta_energy-=vesicle->pressure*dvol;
};
+// vesicle_volume(vesicle);
+// fprintf(stderr,"Volume before=%1.16e\n", vesicle->volume);
if(vesicle->tape->constvolswitch == 1){
- retval=constvolume(vesicle, vtx, dvol, &delta_energy_cv, &constvol_vtx_moved,&constvol_vtx_backup);
+ retval=constvolume(vesicle, vtx, -dvol, &delta_energy_cv, &constvol_vtx_moved,&constvol_vtx_backup);
if(retval==TS_FAIL){ // if we couldn't move the vertex to assure constant volume
vtx=memcpy((void *)vtx,(void *)&backupvtx[0],sizeof(ts_vertex));
for(i=0;i<vtx->neigh_no;i++){
vtx->neigh[i]=memcpy((void *)vtx->neigh[i],(void *)&backupvtx[i+1],sizeof(ts_vertex));
}
for(i=0;i<vtx->tristar_no;i++) triangle_normal_vector(vtx->tristar[i]);
+ // fprintf(stderr,"fajlam!\n");
return TS_FAIL;
}
+// vesicle_volume(vesicle);
+// fprintf(stderr,"Volume after=%1.16e\n", vesicle->volume);
+// fprintf(stderr,"Volume after-dvol=%1.16e\n", vesicle->volume-dvol);
+// fprintf(stderr,"Denergy before=%e\n",delta_energy);
+
delta_energy+=delta_energy_cv;
+// fprintf(stderr,"Denergy after=%e\n",delta_energy);
}
/* No poly-bond energy for now!
if(vtx->grafted_poly!=NULL){
@@ -141,7 +150,7 @@
//MONTE CARLOOOOOOOO
if(delta_energy>=0){
#ifdef TS_DOUBLE_DOUBLE
- if(exp(-delta_energy)< drand48() )
+ if(exp(-delta_energy)< drand48())
#endif
#ifdef TS_DOUBLE_FLOAT
if(expf(-delta_energy)< (ts_float)drand48())
@@ -160,9 +169,13 @@
//update the normals of triangles that share bead i.
for(i=0;i<vtx->tristar_no;i++) triangle_normal_vector(vtx->tristar[i]);
+// fprintf(stderr, "before vtx(x,y,z)=%e,%e,%e\n",constvol_vtx_moved->x, constvol_vtx_moved->y, constvol_vtx_moved->z);
if(vesicle->tape->constvolswitch == 1){
constvolumerestore(constvol_vtx_moved,constvol_vtx_backup);
}
+// fprintf(stderr, "after vtx(x,y,z)=%e,%e,%e\n",constvol_vtx_moved->x, constvol_vtx_moved->y, constvol_vtx_moved->z);
+// vesicle_volume(vesicle);
+// fprintf(stderr,"Volume after fail=%1.16e\n", vesicle->volume);
return TS_FAIL;
}
}
@@ -181,6 +194,8 @@
}
// if(oldcellidx);
//END MONTE CARLOOOOOOO
+// vesicle_volume(vesicle);
+// fprintf(stderr,"Volume after success=%1.16e\n", vesicle->volume);
return TS_SUCCESS;
}
--
Gitblit v1.9.3