perfect absorber simulation
c 345678901234567890123456789012345678901234567890123456789012345678901234567890
c        1         2         3         4         5         6         7         8
c ==============================================================================
c                                  cell cards
c ==============================================================================
1001     1   1.0  101 -102
1002     1   1.0  102 -103
1003     1   1.0  103 -104
1004     1   1.0  104 -105
c 
9999     0         -101:105

c ==============================================================================
c                                surface cards
c ==============================================================================
101   py   0.0
102   py   1.25
103   py   2.5
104   py   3.75
105   py   5.0

c ==============================================================================
c                                  data cards
c ==============================================================================
mode n
cut:n  2j  0  0
imp:n 1 1 1 1 0
sdef  pos = 0.0 0.000000001 0.0
      erg = 75.0
c 
f1:n  105
e1  50  100
c sd2  1
c
wwp:n  5  3  5  0  0  0
wwe:n  50  100
c non-optimized
c wwn1:n   2.29280E-02 2.29267E-02 2.29255E-02 2.29243E-02 -1
c wwn2:n   5.00000E-01 3.70177E-01 2.19849E-01 5.83791E-02 -1
c optimized
c wwn1:n   1.44589E-01    1.44582E-01    1.44574E-01    1.44566E-01   -1
c wwn2:n   2.91225E-02    2.15610E-02    1.28051E-02    3.40029E-03   -1
wwn1:n   5.26638E-02    5.26609E-02    5.26581E-02    5.26553E-02   -1
wwn2:n   2.90346E-02    2.14959E-02    1.27664E-02    3.39002E-03   -1
c 
mgopt f 2 2
xs1 92250.90m 1.0 iw2gxs 0 1 1 22
m1  92250.90m  1.0
c 
print
rand gen=2 stride=80000
nps 5000000
