&INPUT
 iall=-1,
 iswap=2,
 k21max=0.,
 k22max=-1.,
 k23max=0.,
 exmax=0.,
 eymax=0.,
 ezmax=0.,
 epmax=0.,
 emmax=0.,
 ejmax=0.,
 pabsmax=0.,
 psmax=0.,
 sxmax=0.,
 denmax=0.,
 tmax=0.,
 bzmax=0.,
 kzmax=0.,
 /
 k21max=500.,
 k22max=200.,
 k22max=100.,
 k21max=1.e3,
 k22max=1.e2,
 ejmax=-1.,
 pabsmax=-1.,
 psmax=-1.,
 sxmax=-1.,
 denmax=0.,
 tmax=0.,
 bzmax=0.,
 idev=3,