runtime schedule adding and injection of c atoms
[physik/posic.git] / sic.c
diff --git a/sic.c b/sic.c
index 7ab3dc9..751cb06 100644 (file)
--- a/sic.c
+++ b/sic.c
 #include <math.h>
  
 #include "moldyn.h"
-
 #include "posic.h"
 
+/* potential */
+#include "potentials/harmonic_oscillator.h"
+#include "potentials/lennard_jones.h"
+#include "potentials/albe.h"
+
+#ifdef TERSOFF_ORIG
+#include "potentials/tersoff_orig.h"
+#else
+#include "potentials/tersoff.h"
+#endif
+
+#define INJECT         160
+#define NR_ATOMS       10
+
+typedef struct s_hp {
+       int a_count;    /* atom count */
+       u8 quit;        /* quit mark */
+} t_hp;
+
+#define TC             50
+
+int hook(void *moldyn,void *hook_params) {
+
+       t_moldyn *md;
+       t_3dvec r,v,dist;
+       double d;
+       unsigned char run;
+       int i,j;
+       t_atom *atom;
+       t_hp *hp;
+
+       md=moldyn;
+       hp=hook_params;
+
+       /* quit */
+       if(hp->quit)
+               return 0;
+
+       /* switch on t scaling */
+       if(md->schedule.count==0)
+               set_pt_scale(md,0,0,T_SCALE_BERENDSEN,100.0);
+
+       /* last schedule add if there is enough carbon inside */
+       if(hp->a_count==(INJECT*NR_ATOMS)) {
+               hp->quit=1;
+               moldyn_add_schedule(md,10000,1.0);
+               return 0;
+       }
+
+       /* more relaxing time for too high temperatures */
+       if(md->t-md->t_ref>TC) {
+               moldyn_add_schedule(md,100,1.0);
+               return 0;
+       }
+
+       /* inject carbon atoms */
+       printf("injecting another 10 carbon atoms ...\n");
+       for(j=0;j<NR_ATOMS;j++) {
+               run=1;
+               while(run) {
+                       r.x=rand_get_double(&(md->random))*md->dim.x*0.37;
+                       r.y=rand_get_double(&(md->random))*md->dim.y*0.37;
+                       r.z=rand_get_double(&(md->random))*md->dim.z*0.37;
+                       for(i=0;i<md->count;i++) {
+                               atom=&(md->atom[i]);
+                               v3_sub(&dist,&(atom->r),&r);
+                               d=v3_absolute_square(&dist);
+                               if(d>1.0)
+                                       run=0;
+                       }
+               }
+               v.x=0; v.y=0; v.z=0;
+               add_atom(md,C,M_C,1,
+                        ATOM_ATTR_1BP|ATOM_ATTR_2BP|ATOM_ATTR_3BP|ATOM_ATTR_HB,
+                        &r,&v);
+       }
+       hp->a_count+=NR_ATOMS;
+
+       /* add schedule for simulating injected atoms ;) */
+       moldyn_add_schedule(md,100,1.0);
+
+       return 0;
+}
+
 int main(int argc,char **argv) {
 
        /* check argv */
-       if(argc!=2) {
-               printf("[sic] error: arg1 (vis/log/save location) ");
-               printf("must be given!\n");
+       if(argc!=3) {
+               printf("[sic] usage: %s <logdir> <temperatur>\n",argv[0]);
                return -1;
        }
 
        /* main moldyn structure */
        t_moldyn md;
 
+       /* hook parameter structure */
+       t_hp hookparam;
+
        /* potential parameters */
-       t_lj_params lj;
-       t_ho_params ho;
        t_tersoff_mult_params tp;
+       t_albe_mult_params ap;
 
-       /* misc parameters */
-       double tau;
+       /* atom injection counter */
+       int inject;
 
        /* testing location & velocity vector */
-       //t_3dvec r,v;
-
-       /* values */
-       tau=1.0e-15;    /* delta t = 1 fs */
+       t_3dvec r,v;
+       memset(&r,0,sizeof(t_3dvec));
+       memset(&v,0,sizeof(t_3dvec));
 
        /* initialize moldyn */
-       printf("[sic] moldyn init\n");
        moldyn_init(&md,argc,argv);
 
        /* choose integration algorithm */
-       printf("[sic] setting integration algorithm\n");
        set_int_alg(&md,MOLDYN_INTEGRATE_VERLET);
 
        /* choose potential */
-       printf("[sic] selecting potential\n");
-       set_potential1b(&md,tersoff_mult_1bp,&tp);
-       set_potential2b(&md,tersoff_mult_2bp,&tp);
-       set_potential2b_post(&md,tersoff_mult_post_2bp,&tp);
-       set_potential3b(&md,tersoff_mult_3bp,&tp);
-       //set_potential2b(&md,lennard_jones,&lj);
+#ifdef ALBE
+       set_potential3b_j1(&md,albe_mult_3bp_j1);
+       set_potential3b_k1(&md,albe_mult_3bp_k1);
+       set_potential3b_j2(&md,albe_mult_3bp_j2);
+       set_potential3b_k2(&md,albe_mult_3bp_k2);
+#else
+       set_potential1b(&md,tersoff_mult_1bp);
+       set_potential3b_j1(&md,tersoff_mult_3bp_j1);
+       set_potential3b_k1(&md,tersoff_mult_3bp_k1);
+       set_potential3b_j2(&md,tersoff_mult_3bp_j2);
+       set_potential3b_k2(&md,tersoff_mult_3bp_k2);
+#endif
+
+#ifdef ALBE
+       set_potential_params(&md,&ap);
+#else
+       set_potential_params(&md,&tp);
+#endif
+
+       /* cutoff radius */
+#ifdef ALBE
+       set_cutoff(&md,ALBE_S_SI);
+#else
+       set_cutoff(&md,TM_S_SI);
+#endif
 
        /*
         * potential parameters
         */
 
-       /* lennard jones */
-       lj.sigma6=LJ_SIGMA_SI*LJ_SIGMA_SI*LJ_SIGMA_SI;
-       lj.sigma6*=lj.sigma6;
-       lj.sigma12=lj.sigma6*lj.sigma6;
-       lj.epsilon4=4.0*LJ_EPSILON_SI;
-
-       /* harmonic oscillator */
-       ho.equilibrium_distance=0.25*sqrt(3.0)*LC_SI;
-       ho.spring_constant=1;
-
        /*
          * tersoff mult potential parameters for SiC
         */
@@ -98,86 +188,190 @@ int main(int argc,char **argv) {
 
        tersoff_mult_complete_params(&tp);
 
-       /* cutoff radius */
-       printf("[sic] setting cutoff radius\n");
-       set_cutoff(&md,TM_S_SI);
-       //set_cutoff(&md,2*LC_SI);
+       /*
+         * albe mult potential parameters for SiC
+        */
+       ap.S[0]=ALBE_S_SI;
+       ap.R[0]=ALBE_R_SI;
+       ap.A[0]=ALBE_A_SI;
+       ap.B[0]=ALBE_B_SI;
+       ap.r0[0]=ALBE_R0_SI;
+       ap.lambda[0]=ALBE_LAMBDA_SI;
+       ap.mu[0]=ALBE_MU_SI;
+       ap.gamma[0]=ALBE_GAMMA_SI;
+       ap.c[0]=ALBE_C_SI;
+       ap.d[0]=ALBE_D_SI;
+       ap.h[0]=ALBE_H_SI;
+
+       ap.S[1]=ALBE_S_C;
+       ap.R[1]=ALBE_R_C;
+       ap.A[1]=ALBE_A_C;
+       ap.B[1]=ALBE_B_C;
+       ap.r0[1]=ALBE_R0_C;
+       ap.lambda[1]=ALBE_LAMBDA_C;
+       ap.mu[1]=ALBE_MU_C;
+       ap.gamma[1]=ALBE_GAMMA_C;
+       ap.c[1]=ALBE_C_C;
+       ap.d[1]=ALBE_D_C;
+       ap.h[1]=ALBE_H_C;
+
+       ap.Smixed=ALBE_S_SIC;
+       ap.Rmixed=ALBE_R_SIC;
+       ap.Amixed=ALBE_A_SIC;
+       ap.Bmixed=ALBE_B_SIC;
+       ap.r0_mixed=ALBE_R0_SIC;
+       ap.lambda_m=ALBE_LAMBDA_SIC;
+       ap.mu_m=ALBE_MU_SIC;
+       ap.gamma_m=ALBE_GAMMA_SIC;
+       ap.c_mixed=ALBE_C_SIC;
+       ap.d_mixed=ALBE_D_SIC;
+       ap.h_mixed=ALBE_H_SIC;
+
+       albe_mult_complete_params(&ap);
 
        /* set (initial) dimensions of simulation volume */
-       printf("[sic] setting dimensions\n");
-       set_dim(&md,5*LC_SI,5*LC_SI,5*LC_SI,TRUE);
+#ifdef ALBE
+       set_dim(&md,20*ALBE_LC_SI,20*ALBE_LC_SI,20*ALBE_LC_SI,TRUE);
+       //set_dim(&md,8*ALBE_LC_C,8*ALBE_LC_C,8*ALBE_LC_C,TRUE);
+       //set_dim(&md,8*ALBE_LC_SIC,8*ALBE_LC_SIC,8*ALBE_LC_SIC,TRUE);
+#else
+       //set_dim(&md,8*LC_SI,8*LC_SI,8*LC_SI,TRUE);
+       //set_dim(&md,8*LC_C,8*LC_C,8*LC_C,TRUE);
+       set_dim(&md,8*TM_LC_SIC,8*TM_LC_SIC,8*TM_LC_SIC,TRUE);
+#endif
 
        /* set periodic boundary conditions in all directions */
-       printf("[sic] setting periodic boundary conditions\n");
        set_pbc(&md,TRUE,TRUE,TRUE);
 
        /* create the lattice / place atoms */
-       printf("[sic] creating atoms\n");
-       create_lattice(&md,DIAMOND,LC_SI,SI,M_SI,
+#ifdef ALBE
+       create_lattice(&md,DIAMOND,ALBE_LC_SI,SI,M_SI,
+       //create_lattice(&md,DIAMOND,ALBE_LC_C,C,M_C,
+#else
+       //create_lattice(&md,DIAMOND,LC_SI,SI,M_SI,
+#endif
                       ATOM_ATTR_1BP|ATOM_ATTR_2BP|ATOM_ATTR_3BP|ATOM_ATTR_HB,
-                      0,5,5,5);
+       //               ATOM_ATTR_2BP|ATOM_ATTR_HB,
+                      0,20,20,20,NULL);
+       //               1,8,8,8,NULL);
+
+       /* create zinkblende structure */
+       /*
+#ifdef ALBE
+       r.x=0.5*0.25*ALBE_LC_SIC; r.y=r.x; r.z=r.x;
+       create_lattice(&md,FCC,ALBE_LC_SIC,SI,M_SI,
+                      ATOM_ATTR_1BP|ATOM_ATTR_2BP|ATOM_ATTR_3BP|ATOM_ATTR_HB,
+                      0,8,8,8,&r);
+       r.x+=0.25*ALBE_LC_SIC; r.y=r.x; r.z=r.x;
+       create_lattice(&md,FCC,ALBE_LC_SIC,C,M_C,
+                      ATOM_ATTR_1BP|ATOM_ATTR_2BP|ATOM_ATTR_3BP|ATOM_ATTR_HB,
+                      1,8,8,8,&r);
+#else
+       r.x=0.5*0.25*TM_LC_SIC; r.y=r.x; r.z=r.x;
+       create_lattice(&md,FCC,TM_LC_SIC,SI,M_SI,
+                      ATOM_ATTR_1BP|ATOM_ATTR_2BP|ATOM_ATTR_3BP|ATOM_ATTR_HB,
+                      0,8,8,8,&r);
+       r.x+=0.25*TM_LC_SIC; r.y=r.x; r.z=r.x;
+       create_lattice(&md,FCC,TM_LC_SIC,C,M_C,
+                      ATOM_ATTR_1BP|ATOM_ATTR_2BP|ATOM_ATTR_3BP|ATOM_ATTR_HB,
+                      1,8,8,8,&r);
+#endif
+       */
+
+       /* check for right atom placing */
        moldyn_bc_check(&md);
 
        /* testing configuration */
-       //r.x=2.45/2;   v.x=0;
+       //r.x=0.27*sqrt(3.0)*LC_SI/2.0; v.x=0;
+       //r.x=(TM_S_SI+TM_R_SI)/4.0;    v.x=0;
        //r.y=0;                v.y=0;
        //r.z=0;                v.z=0;
        //add_atom(&md,SI,M_SI,0,
        //           ATOM_ATTR_1BP|ATOM_ATTR_2BP|ATOM_ATTR_3BP|ATOM_ATTR_HB,
+       //           ATOM_ATTR_2BP|ATOM_ATTR_HB,
        //           &r,&v);
-       //r.x=-2.45/2;  v.x=0;
+       //r.x=-r.x;     v.x=-v.x;
        //r.y=0;                v.y=0;
        //r.z=0;                v.z=0;
        //add_atom(&md,SI,M_SI,0,
        //           ATOM_ATTR_1BP|ATOM_ATTR_2BP|ATOM_ATTR_3BP|ATOM_ATTR_HB,
+       //           ATOM_ATTR_2BP|ATOM_ATTR_HB,
+       //           &r,&v);
+       //r.z=0.27*sqrt(3.0)*LC_SI/2.0; v.z=0;
+       //r.x=(TM_S_SI+TM_R_SI)/4.0;    v.x=0;
+       //r.y=0;                v.y=0;
+       //r.x=0;                v.x=0;
+       //add_atom(&md,SI,M_SI,0,
+       //           ATOM_ATTR_1BP|ATOM_ATTR_2BP|ATOM_ATTR_3BP|ATOM_ATTR_HB,
+       //           ATOM_ATTR_2BP|ATOM_ATTR_HB,
+       //           &r,&v);
+       //r.z=-r.z;     v.z=-v.z;
+       //r.y=0;                v.y=0;
+       //r.x=0;                v.x=0;
+       //add_atom(&md,SI,M_SI,0,
+       //           ATOM_ATTR_1BP|ATOM_ATTR_2BP|ATOM_ATTR_3BP|ATOM_ATTR_HB,
+       //           ATOM_ATTR_2BP|ATOM_ATTR_HB,
        //           &r,&v);
 
-       /* setting a nearest neighbour distance for the moldyn checks */
-       set_nn_dist(&md,0.25*sqrt(3.0)*LC_SI); /* diamond ! */
-
-       /* set temperature */
-       printf("[sic] setting temperature\n");
-       //set_temperature(&md,273.0+1410.0);
-       set_temperature(&md,273.0+450.0);
-       //set_temperature(&md,273.0);
-       //set_temperature(&md,1.0);
-       //set_temperature(&md,0.0);
+       /* set temperature & pressure */
+       set_temperature(&md,atof(argv[2])+273.0);
+       set_pressure(&md,BAR);
 
-       /* set pressure */
-       printf("[sic] setting pressure\n");
-       set_pressure(&md,ATM);
+       /* set amount of steps to skip before average calc */
+       set_avg_skip(&md,500);
 
        /* set p/t scaling */
-       printf("[sic] set p/t scaling\n");
-       //set_pt_scale(&md,P_SCALE_BERENDSEN,100.0,
+       //set_pt_scale(&md,0,0,T_SCALE_BERENDSEN,100.0);
+       //set_pt_scale(&md,P_SCALE_BERENDSEN,0.001,
        //                 T_SCALE_BERENDSEN,100.0);
+       //set_pt_scale(&md,0,0,T_SCALE_DIRECT,1.0);
+       //set_pt_scale(&md,P_SCALE_BERENDSEN,0.001,0,0);
        
        /* initial thermal fluctuations of particles (in equilibrium) */
-       printf("[sic] thermal init\n");
        thermal_init(&md,TRUE);
 
        /* create the simulation schedule */
-       printf("[sic] adding schedule\n");
-       moldyn_add_schedule(&md,30001,1.0);
+       moldyn_add_schedule(&md,1000,1.0);
+       //moldyn_add_schedule(&md,1000,1.0);
+       //moldyn_add_schedule(&md,1000,1.0);
+       //moldyn_add_schedule(&md,1000,1.0);
+       //moldyn_add_schedule(&md,1000,1.0);
+       //moldyn_add_schedule(&md,1000,1.0);
+       /* adding atoms */
+       //for(inject=0;inject<INJECT;inject++) {
+       //      /* injecting atoms */
+       //      moldyn_add_schedule(&md,10,1.0);
+       //}
+
+       /* schedule hook function */
+       memset(&hookparam,0,sizeof(t_hp));
+       moldyn_set_schedule_hook(&md,&hook,&hookparam);
 
        /* activate logging */
-       printf("[sic] activate logging\n");
        moldyn_set_log_dir(&md,argv[1]);
-       moldyn_set_log(&md,LOG_TOTAL_ENERGY,200);
-       moldyn_set_log(&md,VISUAL_STEP,200);
+       moldyn_set_report(&md,"Frank Zirkelbach","Test 1");
+       moldyn_set_log(&md,LOG_TOTAL_ENERGY,1);
+       moldyn_set_log(&md,LOG_TEMPERATURE,1);
+       moldyn_set_log(&md,LOG_PRESSURE,1);
+       moldyn_set_log(&md,VISUAL_STEP,100);
+       moldyn_set_log(&md,SAVE_STEP,100);
+       moldyn_set_log(&md,CREATE_REPORT,0);
 
        /*
         * let's do the actual md algorithm now
         *
         * integration of newtons equations
         */
-
-       printf("[sic] integration start, go get a coffee ...\n");
        moldyn_integrate(&md);
+#ifdef dEBUG
+return 0;
+#endif
 
-       /* close */
+       /*
+        * post processing the data
+        */
 
-       printf("[sic] shutdown\n");
+       /* close */
        moldyn_shutdown(&md);
        
        return 0;