Hello,
Thank you for the reply.
In PBC, I have tried to add some thermal noise by giving a temperature (a little bit of canting in the applied field I already tried, but could not resolve the issue). Hysteresis here is quite different from without PBC. I am not sure what is wrong with the code. Could you please assist with this. Here is the code snippet:
setgridsize(256, 64, 6)
setcellsize(1e-9, 1e-9, 1e-9)
// define layers
defregion(1,Layer(0))
defregion(2,Layer(1).Add(Layer(2)).Add(Layer(3)).Add(Layer(4)))
defregion(3,Layer(5))
save(regions)
SetPBC(1,2,0)
Msat.SetRegion(1, 11e5)
Msat.SetRegion(2,0)
Msat.SetRegion(3, 11e5)
Aex.SetRegion(1, 13e-12)
Aex.SetRegion(2, 0)
Aex.SetRegion(3, 13e-12)
alpha.SetRegion(1, 0.1)
alpha.SetRegion(2, 0)
alpha.SetRegion(3, 0.1)
Ku1.SetRegion(1, 0.5e4)
Ku1.SetRegion(3, 0.66e4)
m.setregion(1,uniform(1,0,0))
m.setregion(2,uniform(0,0,0))
m.setregion(3,uniform(1,0,0))
OutputFormat = OVF2_TEXT
//m = randomMag()
relax() // high-energy states best minimized by relax()
Bmax := 0.05
Bstep := 1.0e-3
MinimizerStop = 1e-9
TableAdd(B_ext)
Save(m)
Temp = 100
for B:=0.0; B<=Bmax; B+=Bstep{
B_ext = vector(B, 0, 0)
run(0.2e-12)
relax()
minimize() // small changes best minimized by minimize()
tablesave()
Save(m)
}
Temp = 100
for B:=Bmax; B>=-Bmax; B-=Bstep{
B_ext = vector(B, 0, 0)
run(0.2e-12)
relax()
minimize() // small changes best minimized by minimize()
tablesave()
Save(m)
}
Temp = 100
for B:=-Bmax; B<=Bmax; B+=Bstep{
B_ext = vector(B, 0, 0)
run(0.2e-12)
relax()
minimize() // small changes best minimized by minimize()
tablesave()
Save(m)
}
Thankyou.
Regards,
Riya