akkri

来自「fortan的mie散射程序,可以计算粒子对电磁场的散射」· 代码 · 共 37 行

 07,       -1,       1,    0,          nc,   khab,   knorm,  kwnmd
----------------------------
fcc                                    xtal,           lattice structure
0.30d0,   0.5d0,     0.50d0,           a0,   lattice constant (filling ratio)
----------------------------
 1,        46,        3,               kp1,  kp2,  kph
 0.0000d0, 0.0000d0,  0.00d0,          Kx,   Ky,   Kz   (units of 2pi/a)
----------------------------
0.200d0,   0.580d0,   760,             omg1, omg2, nomgp,
----------------------------
 1.00d0,         1.0d0,                em, um,    permittivity & permeability
----------------------------
 1.000d0,  1.000d0, -1.000d0           csa, csb, csr, directional cosine of H
----------------------------
 1,                                    na (number of spheres per unit cell)
----------------------------           na<0 if spheres have same \eps and \mu
 0.0d0,    0.0d0,    0.0d0,            rs1, rs2, rs3 (sphere 1)
----------------------------
 0                                     kdisp = 1, if sphere is dispersive
----------------------------
38.440d0,      0.0000d0,               Re(es),   Im(es)
0.5993760d0,   0.0000d0,               Re(epsr), Im(epsr)
0.000d0,       0.0000d0,               Re(epsk), Im(epsk)
----------------------------
 1.00d0,       0.0000d0,               Re(us),   Im(us)
 1.00d0,       0.0000d0,               Re(ur),   Im(ur)
 0.00d0,       0.0000d0,               Re(uk),   Im(uk)
------------------------------------------------------------ end of input



-------------------------------------------------
38.440d0,      0.0000d0,               Re(es),   Im(es)
0.59937565d0,  0.0000d0,               Re(epsr), Im(epsr)
54.73561d0,     45.000d0,              xth, phih  polar & azimuthal angles of