Magnetite 20 C 
Set MaxMeshNumber 1

ReadMesh 1 7grains_120nm_5.pat


!subdomain nonmagnetic
SetSubDomain 2 Ms  0.0
SetSubDomain 2 K1  0.0
SetSubDomain 2 Aex  0.0

External Field Direction 1.01 0.01 0.01 
External Field Strength 0 mT 

Randomize All Moments
Energylog 7grains_120nm_5_Z 

Loop field 100 -100 -1
    External Field Strength %field mT
    Minimize
    WriteHyst 7grains_120nm_5_Z
    ZoneName DECREASING %field
    AppendTecplotZone 7grains_120nm_5_Z
    AppendDemagZone 7grains_120nm_5_Z
EndLoop 


Loop field -99 100 1
    External Field Strength %field mT
    Minimize
    WriteHyst 7grains_120nm_5_Z
    ZoneName INCREASING %field 
    AppendTecplotZone 7grains_120nm_5_Z
    AppendDemagZone 7grains_120nm_5_Z
EndLoop

end
