Trisurf Monte Carlo simulator
Samo Penic
2019-03-08 a26a909b45161c46d018322b82263ce6764b64fa
src/co_test.c
@@ -1,3 +1,4 @@
/* vim: set ts=4 sts=4 sw=4 noet : */
#include "general.h"
#include "sh.h"
#include <stdlib.h>
@@ -40,8 +41,10 @@
preparationSh(vesicle,r0);
calculateYlmi(vesicle);
/*
ts_coord *coord=(ts_coord *)malloc(sizeof(ts_coord));
ts_double fi, theta;
  for(i=0;i<vesicle->vlist->n;i++){
    cart2sph(coord,vesicle->vlist->vtx[i]->x, vesicle->vlist->vtx[i]->y, vesicle->vlist->vtx[i]->z);
@@ -54,15 +57,15 @@
   }
free(coord);
*/
calculateUlm(vesicle);
for(i=0;i<vesicle->sphHarmonics->l;i++){
    for(j=0;j<2*i+1;j++){
    fprintf(stderr,"ulm(%d,%d)=%e\n",i,j+1,vesicle->sphHarmonics->ulm[i][j]);
    }
}
storeUlm2(vesicle);
sph_free(vesicle->sphHarmonics);
vesicle_free(vesicle);