X-Git-Url: https://hackdaworld.org/gitweb/?p=physik%2Fposic.git;a=blobdiff_plain;f=posic.c;h=6b92a5e51b0428de417e34392189a6aa246abffb;hp=236e208bcce0bea5516bbe1a70d5efe1decda416;hb=HEAD;hpb=e6f456c0fa807b86e1b25996e70efcdcfe390ea5 diff --git a/posic.c b/posic.c index 236e208..6b92a5e 100644 --- a/posic.c +++ b/posic.c @@ -5,133 +5,38 @@ * */ -#include - -#include "moldyn.h" -#include "math/math.h" -#include "init/init.h" -#include "visual/visual.h" +/* main include file */ #include "posic.h" +/* functions */ + + + +/* main code */ + +int parse_config_file() { + + return 0; +} + int main(int argc,char **argv) { t_moldyn md; - t_atom *si; - t_visual vis; - t_random random; - - int a,b,c; - double e; - double help; - t_3dvec p; - - t_lj_params lj; - t_ho_params ho; - - /* parse arguments */ - a=moldyn_parse_argv(&md,argc,argv); - if(a<0) return -1; - - /* init */ - moldyn_log_init(&md,&vis); - rand_init(&random,NULL,1); - random.status|=RAND_STAT_VERBOSE; - - /* testing random numbers */ - //for(a=0;a<1000000;a++) - // printf("%f %f\n",rand_get_gauss(&random), - // rand_get_gauss(&random)); - - a=LEN_X; - b=LEN_Y; - c=LEN_Z; - - /* set for 'bounding atoms' */ - vis.dim.x=a*LC_SI; - vis.dim.y=b*LC_SI; - vis.dim.z=c*LC_SI; - - /* init lattice - printf("placing silicon atoms ... "); - md.count=create_lattice(DIAMOND,SI,M_SI,LC_SI,a,b,c,&si); - printf("(%d) ok!\n",md.count); - testing purpose */ - md.count=2; - si=malloc(2*sizeof(t_atom)); - si[0].r.x=0.13*sqrt(3.0)*LC_SI/2.0; - si[0].r.y=0; - si[0].r.z=0; - si[0].element=SI; - si[0].mass=M_SI; - si[1].r.x=-si[0].r.x; - si[1].r.y=0; - si[1].r.z=0; - si[1].element=SI; - si[1].mass=M_SI; - /* */ - - /* moldyn init (now si is a valid address) */ - md.atom=si; - md.potential_force_function=lennard_jones; - //md.potential_force_function=harmonic_oscillator; - md.cutoff=R_CUTOFF*LC_SI; - md.pot_params=&lj; - //md.pot_params=&ho; - md.status=0; - md.visual=&vis; - /* dimensions of the simulation cell */ - md.dim.x=a*LC_SI; - md.dim.y=b*LC_SI; - md.dim.z=c*LC_SI; - - printf("setting thermal fluctuations (T=%f K)\n",md.t); - // thermal_init(&md,&random); - for(a=0;a