ELF4(UWVS1ۃ|$$$$|$T$8t$D$D$@|$\xTɉt$PpPI8|$0xHۉt$4ƸD؉$|$X$D$8D$ $D$<8D$l~tt$@D$HT$0cscatter_sym_manycgathercgather_sym_manycgather_sym f_out too small scatter_grid scatter_grid f_in too small gather_grid gather_grid isgn .ne. 2 not implemented maps_sticks_to_3d fft_scatter&p)2ZyAZ-{fu ZgyZ  - \XE g \$h   Z Z H#tvttt $tt$t\t t$X#ts# ts $*tt<S$Rtt0t4$r?$pttwQ$tt tXt At7c$tt<u$tu$GEnGZZyGZZ {GG Z)GZ)G >`'W     _y \^XE_ ) ^\`; )  Z Z $t$t vtwtt$t\t t$Xe#tsq#ts$t(t72$ttvd$1t/t tXt @t7x$Ot(t7u$dtwu$m'yO{p  #1 a     \""Q#' Z Z2$Rt~$gtw$tvt$t st~t~t$tt u %t~tvu$tv %twts u$tsQ#/ts]#Dtsu%bt(t7/%ttu;A%t?t tut ;t7OS%t(t7_u$t~}u$FI y{  -   T R  m  \ $s N H} Z Z $t~ $t~J e%D tvt~t~t $tst$tut ut$wc %b t~tv %t~tsm # tvy # tv w% tit<o u$ tv u$ ts %$ tit twt <t7* %B tit<6 u$Y t~P u$ % t[tJt~t >tA  %t[tut~t >t@ ) y {  ~    F !~ \$! `V Z Z$ t~=$ t~% tvt~t~t $tst$tut ut$w %; t~tv  %t~ts #k tv # tv % tit<u$ tvu$ ts% tit twt <t7Y% tit<eu$2 t~u$%r t[tJt~t >tA 5%t[tut~t >t@NcPwNy*!{K! 6al!\  !  !+ \__e a! x+ Z Z$t~b$tH%tvt$t st~t~t$tut ut$w %t~tv  %tHts#@tv#Utv(&stt;u$tvu$ts'&tt twt ;t7;+&tt;Gu$t~au$&EttutHt =t@ &ttJtHt =tAJ0Hy!{!  "" . /"f  H" \   "N"H  Z Z$Wt~8$ltH=&tvt$t st~t~t$tut ut$w %t~tv  %tHts#tv#&tvO&Dtt;u$Ytvu$ntsa&tt twt ;t7s&tt;u$t~7u$a&ttutHt =t@ a&ttJtHt =tAMkZx yb" Z u"  x 7 i ii h ip ipp it j( mcG   ZM& b$tt04PO 4Z y4"R44 Z 4";""4k4    ]P7]bi]]Tii^\^$ip^ipp^Lit^lj^+k] ]#]Wmc^me]_<^  #BA^znnp^npp^ X #^D]^]-]t*^X`Oh Z Z &ttXtt stXttPtT$O Z Z l$&ttXtt vtXttPtT&tt;J& tvtwt~'$3tt0t4$d &Qtt; &tt t\t ;t7|%&twt~j'&tt; (&tt t\t ;t7,DQnstnspQnswunr14nr28nr3<@JDRHnplLnnpPnnrTnglXnwlpnppippiss)uM$q048<@ 0.u!### 4 0.!### 4 0.!### 4 0.!### 4 0.!### 4 0.)!### 4 0.M!### 4 0.q!### 4 0.!### 4 0.!### 4 0.!### 4  9= #$(n!@XE\itK.! 0.!!### 4 0.E!### 4 0.i!### 4 0.!### 4 0.!### 4 0.!### 4 0.!### 4 0.!### 4 0.A!### 4"_Z#b$%&_y#{&#&#&'&'Y"_##"_#0#9&#b&'#{&;'&O'(_p) 1##"# @(_) 1##"# @&'&_#*&_#*&'(_ ) 1##"# @(_- ) 1##"# @&A '8&_T #Q*A &_m #c*Z & '( ) 1##"# 8( ) 1##"# 8& ' & #* * & !#< * &*!'n (_K!) 1##"# @(_l!) 1##"# @&!' &_!#*!&_!#*!&!'G( !) 1##"# 8( ") 1##"# 8&"'& /"#*"& H"#*5"&b"'&_u"#&_"#&_"#&_"# (") 1##"# 4(") 1##"# 4&##N*"&##* #(#+n+ia#i.,iia#cirjl>"#-.&#-/#01[$2$)/-$03 8$2228$b/OQ$0/hc$0/ u$04$2/W|a$0/-c$0/uO$0/h$0/ $05~$2/7 %06%22/-&/%0/3OA%0/h9S%0/ ;e%0/w%0/-%0/h%0/ %0/%0/-%0/h%0/ %0/W~a&0/-f&0/hd+&0/ =&0/W?aO&0/-'a&0/h%s&0/ C&0/h&04&04-r&03&22&28$*&7/ j&08h0% B : ; :: ; .?: ;n@B: ;I44I4I44: ;I 4I4 4: ;I U 'I 1B1B1I4 4: ;I.?: ; n@B: ; I4: ; I4: ; I4: ; I<$ >   : ; : ; I8  : ; I8  : ; I8 PNI!!"/Q" I#!I/$!I%&I&I'!I" /(PI)!/Q* I+: ;I,4I4-!I/ .!I//.?: ;n<01.?: ; nI<2I3.?I4<4.?: ; n<5.?I<6.?<7&8.?: ; n<}w H`cWcspsyvyspsQ`spsQp1SHsHXSr2$q"s"1sr2$q""2r2$q"s"1sr2$q""2p36P6`u`{3` AGupG` uu`k @A` u2$"`uA`u1lppp1SsSr2$"s"1pwrD-Lw1LPrX\p\}~~ V }}VWLL~}W~-2P2}"&W&)p)LL}{0PpP0ptpt}~~M V pV h u1t x px P ~}  ~M W \ ~} W  ~M O VO h h P }   & W& P ~P e W}  ~  W h h P ~P e }  ~ 0  P  p " P  0 p P ~}  ~ p u1 p ~I~ W ~WI~ V  Il v Wv ~WI~l V  ~VI~ @0@YPY\p\jP:I0 p ~I~pu1pa~$~W~a}W$~Va~a}V$~a~$~Va$(b0bPpP$0pa~$~pu1p7~e~|V~7MVe~|W7~7MWe~7~e~8W87eW:0:YPY\p\jP0p7~e~CN CJPJN 1H#H#1V0 v"1v" v"1pRp 2$@"k1T1HL#v""1L#HL#v""2L#1QR v2$" v2$"vQ #@#D +'X' P  P o t!""%1&+'2'P2'X' X' ((Z(Pr1 H P 1,!t!1t!"@%0%P%%P3Z10s1sS 1!"1"t"S-##1##Wc%%1%%1b&&1& 'W0ss s"1s" s"1t!!0!""_" s"1_"b"s"b"t" s"1t""#\R\ 2$"!"R"y" 2$"&#_#R_## u2$"## u2$"_&&R&' 2$"r1 H P 1,!t!1t!"""D"#1##U%P&1P&+' 1t!"1s"11X"s"21X"'"b"s"1@1"b"t"s"2@1"&##u_&& 1X1Q'"C"1C"_"Q##1##Q&&1&&Q313:S:JsJZS S 1%c%1c%j%Sj%|%s|%%S%%S%%13 ~1 ~13 %c%%%R s2$~" s2$~"'"2"R2"b" s2$~"b"t" s2$~"##R## w2$~"## w2$~"&&R&' w2$~"' ' w2$~"P+'C'J'PJ'(r}P}p 1H P P,!7!P7!?!p?!"L1U(Z(P###+'X'###V+'+'a'Va'( 0 Pj''0''P( (0lQ/ P Q!t!QO(Z(QlrPr ~! ( P( P ~!!P!"~O(U(PU(Z(~ qq#+'X' qq#Pq P o %+'X'qX'(0SP o $%+'j''0''''R''''S'(( (0 ((P+'e'i'Pi''V'(( (P ( (V ((r H P V,!"HU(Z(1P0y {$$0$%P1y~ ~{$$1$%~j''1''V''v''V( (101+''0( (0((d()U)")P")\)U((S((t((tS(t)th))W))t))tW(((|)Q|))q))Q()P)&)S&)_)P((P()d)PF \ d  AHM4 scatter_mod.f90 Jd.<'dfXd.tdttdXJdJNZJzh:04B'J<J+[EAa  t,Z<.tRt.X~Jg.<H01ZQzh:04zP13GMA?G-=?e ,\<J,tTt,X0&J.o.oJt0MZ/Lu-/iz Jt(h< t`o1(iJ,&J<m.mfJ,L>u-/izu-KmT<(=2>\<,fTm(Pt:X,&J<m.mfJ,L>"Lu-/izY-KmT<(=%\<,fTm(Pt:X,&J<m.mfJ,L>$u-/iz-Km*f(_<)fWm<(@t=,&J<m.<m.mfJ.?>"u-/iz-Km*f(_<)fWm(@t=t<ؒ6LKIuv-gGRvX,f7qz3Mt3 M.3hxO^sptg:gK t[_MGg,0#o.Ox"  w;|lSSUxgzJJnXTo B~gE' HPQxgzJJnXT`pv^ug>OnMGgv>o t~*xH>VugHGtzi X]ft/F JM   w;|0FtfJJYh. .Y/v.KK\sV<*XVl?1vxC S gl         )27 JXy2DPeo v z       %<Sh 0EWc    , =B MV_hqv     ( E c ~         % 7 C Z c u                & / 8 A J O  _  j t          < W l           3 < N X s            #( 8 CM X] p,AVht#-FT^x         ). AXm'9EZo%/I P Tc s       .>M[jo z        " / < K ^gl z     -;@ JS\a kz       <Ti 4FRdn   Z f r       * 7 D       # / ; G S _ k w           b  ## *# .#c#|##### # # # $ $ $ $ ;$ @$ G$ R$ Y$ d$ k$ v$ |$ $ $ $ $ $ $ $ $ $ $ $ $ $ % % %% 0% 7% B% I% T% [% f% m% x% % % % % % % % % % % % % % % % & & & !& ,& 3& >& E& P& W& b& i& t& {& & & & & & & & & & & & A t d0