From efc4f14dd59a6ddde166c02c21b6c206734acfd2 Mon Sep 17 00:00:00 2001
From: kamischi <karl-michael.schindler@web.de>
Date: Wed, 10 Apr 2024 18:50:22 +0200
Subject: [PATCH] Cleanup and minor modernization

---
 libhreels/myBoson.o    | Bin 20031 -> 0 bytes
 libhreels/myEels20.f90 |   2 +-
 2 files changed, 1 insertion(+), 1 deletion(-)
 delete mode 100644 libhreels/myBoson.o

diff --git a/libhreels/myBoson.o b/libhreels/myBoson.o
deleted file mode 100644
index 8aaef3186670162ebc34fdb704dadb9da7a833bf..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 20031
zcmeZaWMcq<K2HV)T@ZtTg;B30wW0*fh7cFb7#LU>85qvkLilQo3=9ek1_^p8i6w~;
zA)KTGgTVp4q~c;^1quu-$XqbHfg$05UJ<H+9V`qCSIoiEaKeGX!9m{y&IL0Z7#J90
zY`{!7;lN<vpl@gj=Ytpqj0_BOY#10kJV87L26hGp29UbY&ZpsF!HsWtm>3vtzPlUy
zpxafTo1ygpe@iL{14Fl~$X$k;@9uxRdxO7e8v_Hw@m7I<|Nn!GINmDq@Bja8Odv6i
zfB*kCfMt39{r?XN)ZSK*SSO3h3$R)j6%GxMyo(A84+8@OrYr{o*s@L+6&6fMR;X5x
z*HL9rdB<E-I2ew*sDMNGIExC%YOwtvKM8bRIQT=}@K9&y5>3}7-L6YOb{%I?VParl
z04wTrT>w(Y(0ZUwyxW!IF2h~c1<VW#_fCR15-(?iUC42lq1%<`F2lW-;GlwY527gU
z4qb5E^$N&j%g`(Q^AGTEJJ5QdRKMHxO0UO%kZ~+0x?LA&gSd<!<3L=H)V+fsNtqMP
zu2&deADI9#hLM4R0ofQ4m@zyz-`$0(y+5JbbwTH$gRkTnFI@c5={l#|bwTqB#!lB6
z$6YUg4CoG>aoqI^h=pVnf9p!Hr><DLUZ~CKcD(?1-QCy;AX_5-BMIJsxD6x@@r3Jy
zyD}$W3V80aoVXj?0g^@N;<?Lm1LQxDGLZj3Y}XF3t~s5qXS!W4Si7D9h4vXu*9+aQ
zXF3lad@0X(0_1};uOCk6c0I%BdI1y|FWvtC|Bn<Nofn#4FkXDodWpYp0>}%Y9NoTG
z?y{T$xjXbquh;+XP>#DSr|zUq=!Qtioa#mrhp_Lsf@JT4q<CQ3J0Mcsp*&#i9o?Z|
zDUce7u^@4Xnmeu_*}F2Qnq99jbslPd!Pt7Kg!N?s$feD-OBnfER9GQ->IOJn9sD8R
z8^CCIp|h3c-~a!&!Q|c89middfD#HQL4t*jyPg2^!5mB16R_mN-};-0f#I&}jk~c8
zcU>Fq#;&;Qy5sKLivR!r-)#kxu^T|L&_oMOj|Xr5x*L1ruIr5(2Oz5MeY_jHqucdJ
zXKTs-|NpzeB;$cj*CXAr3%Y%eKod#p$x7wU8@oX1Me|VSh0ar**S_D|1<Fs~zcv46
z<nO=0z`*cYtn&sak)4M~d~dzY-?sx48?jfqr-Dppywy1s6dc`PvNsA6E4QGL1mnVG
zA+dE=<`yV?;j*DudZYfsqUsi0F*t^9fl?e;0fY;ey^{)w8@N$CcUhopShU?@^u2<J
zH4jj%K|-UmmEqt2|HoY~K%xP}v2?wFh=wdi28M3m3*Ds)x?_)Y`d(?hU8&r8s`EqV
zb<N|QH@@HKJk<H4^Exz4EYI=xGcqzTyq4_z)Oi9NmiG}-J<mYF<qHe0Qz*d&PsF|}
zp#B1hfYRR`-wmMhX9AKiIJNt3KoWr{TygIpG>kx+L8{<NV8M+)XCS3|NGy8&hXpQN
zBgiUHoO%6+1@0-vSfs#}0tN0}*A;hTC){<NaL2dduIq+7y`VG;^2Q2~7?=kV_H6*U
zctf-61;&^4|Nj4<(Cm7G@#VWepzIH-jPAxla#QPpia>C3UjZtke}aXfrLhF0+yq4*
zQejuB2rY6W7(s;;qzHo*PoOg9^`!}*5{}`HFSw+W02Njc4$obQ+pY_4vTgub_3`f9
z3~-(UlQNJB4wNTbQ3N0v)Ah#9Uw7vwz}4T`3TA^%0M)iPZoar1y8^`8(CrGZGhDCm
z&p*V!?NaL{{?^+J;7or9Vmc@*LxQp4j_(9Wj)ta&6)@g}yRHo&v4eL(1;U0qr8n-z
zcHDLCxN!oS@!%-|Tq54_g_nXzagC7T0T+-0-9oLG>OJndKDhbr{>!^Js<`3I5+g|5
zgR|hNyRIwl_;%cF1^M&d!#lnYz-7<9pAa?oUV>DCi%iCsBA{e3;Wgug#v`ECM|50#
z?BUSPr_FB!!0~YN0Ho?=Ack?{#9h`Mpy>H_m-PUMK6dl$y)SoJPk`7*Zl1pP=`QO9
z5c|+w)*B%D<6YJVAo?Ik<^_m#=;q0LpKiXmcj(?nu>JRb-i`fn*Y(Fqh@(8ff}lXW
z0A^vj>MrXCkU6LCvi<<khi{&`ck(VPsJ(aZ;JuTu_QG9wlDTo$^#Y7{$M?pa+y{4K
zKiqZw0JYEpoB;2#a<G6JA$MaxfUUh#`r&Tui<>WQKDg`p;^s+E%dD6m;<vl5FF@QP
zE>L=U@Ny9Y1H;W1P{A^Dkn$JzULJQ*;a~=(DX24U{<?YK-od-90w7xs-gSL(msJA9
zJPFF04_+tSe1~iTrf#UtlMpA|dx&hp!Mm{!Udur&K8UIH#(}%B5AM1?0Q(o*2=!qC
zwE_juo17Q^!kU~{{{H_DDu0i+p7;xEa-R7MYjT3bur)bB&EsCM4rEzKlT!fH48)WK
zH6cMQ$rNyF71>}^wRoDGJfLQDDNna6$IW+lC0-_ho6|hq3^NTcXo8wAovv%TUDtrD
zM{R|!Xs%ts$loH%3JQxANR7HB-L5M@^)0BNxB;q~!R6c?5X&<34x)lO3aV6G?^wIu
z;O}jLut7EaoNm_}AbLi(>kQO}-ke@glMOBiF8)AGwmDE`;D%mv?i|ME+!>6hx;wgE
z3F?M4_?C3KUg>tdVeNVa)Zn|K>3XBv^$Jph?+UoVcZJdQMziZ3#+O>4!l65K#c@}#
z2ay_lD?nZfy~B8^GjvXO=$u|JMo421T)NGHxBVbeNR=F#6ueDw3gk10YM4PCU@oM&
zath351Xp?-;Ia_Ypbn5mP^oqYsUa8v@<DU$8b<z>KxRlo@Byf}KXBaj45)4bMSkm%
zzer6D5C^5HA;AnP{2zd77uN&OwjQYIw*gYt-;LdI*YyFkrFRlagIj!{Y<1(nUDpGk
z=H3BN%NpF!gEVkJiQr6k?22yRGtkf_*xY-7qq%niIWA)7bcde7*XEl8ZvsLaAyNNf
z@pB6l%7``}NF}_@2a2EOwV;M1BU~RSz*!*8Kag4o7cL8nEUczNBI_2T?;S+*&jJ)z
zkkILDJphiA8{jwsb1YqNAaYj~xcPUZyL3f&?3qsAI|Q45g1DQ1-;jgP7aV+OZNPtE
zpPjmc(zF9L<L>zG0F}@kP(Q=!bR>mvtvf(1stKR~hN*&Uf(1V$ks~K~)a(HZeo%IU
zsX}QE637{hu}Fc<1qy6PTko#x4n#w+1H?ma93BKG@Q%B&8=75jFuu%(GzTv*zPt!&
z4uacz9CsZ!?!AOpL*S;>ZPyiu)*7fK0xCHVFm}40xR|=4x%LDTe@h@}yyL~)*ax7>
z@&Kg00;`Pg&IRRNbg=+Xf5~-4Gsv7P-JvIryMh`L44{&U`QnS_UrhXc*^CSf&AC^Y
zK)G@*s7rCT6-3_Y1)Jx3;7%{d5Kz25fXRRa?t)}MN<a~HpgZ&iQXvLulYwIV-od+b
z9YAgX^=NP0WjO`y+OnLw_ww#sPzuJW^W|NzYrq;%bsoGs*8to)1-sMtz};35_m1xa
zkZl@Z8Hm6EsDphUfNWFv|NsBZ7k5%0+-(Ip=}s$1Da87FCqYS8=G5I*kdyATf|TCz
zJpi>^<`k&i_~PC{sK%ubjUZnlG=jA(1#5?DyaMiK-#{u|r-Bnh?g>UnOn@@0WhgwG
zmYSeccK<+4C(s}ZypB83?Rulv<3D1+<p$&H{S&a8r2<k5sv%c2A7Ii3>jRqyttUZg
z^YwXfKc(CCL~j6ifCtiCm$}gG3T_5e#DkLA14xp(aiH5(;4Z_xpOBsbxRL{xHpm{(
zz3ckm4!9K!Za9J*3$_&M@H?dsKwQx9&ke@c$3Q(7P%C3X;}K9B3f7bkZhUhDR9v}&
z9f4?z*fE3J78vcU2>8%m%)kHt4ZuTt0q~){5ctp@NDR3p1smGS05_J<Wl`E$=#r@I
zEM(c<R%9NYb{1lUvJEmqiRukgqP?LC9cBcLD52U8YP&+bAp&ZzVM<cL8?crk$O6;`
z;T2HY`2Ze@1t*-ltO}qO`cFvfzf2M=2$sJ0^X3D1Ar|`qltVv&hkrhR`Yk8G3h%ON
zfOMa{8+!n(2f^Rb9ed@t>l1K$GWH3g#)FJ}KCyPaQmfqU`UIN7SwP*O?$9T9K@5-}
zG%sDa>w4gB?2EguH*UUw^%SAZ5(7|=9n>rRaL4z=U1SH|xKp|T=JGqfJMOxIiip@3
zsMdjOx#Rl+obWF+yFOuj83L+GK<!A^2i?9P$AilOU%2B-b(?b^Fm}5>Ky~y3u%khO
zFh_$-17{;xG<?4SZl8m?2OPbSW_q_P2PoD1fBye}LgNuo#)<}aSixNv8*rA==w|42
z-O%m2q4mJ=)-CYtGy%%G%WA;Fz;HKqMYpR8XdqbuG?3iws?p5=YS*`3_yZaj1d*V!
zfdN$3yDHpexZ4V1-urnMGPHN_=H5qt{{QFS-U^}`&hVslwm$gt|NqUkAo6zXo||hy
z61QFV++?)?MfFRl0Vlgbrh&SMWh~9Edl+%4xChhl^KR?{uuGu^AY1^oY7WGzZdZxB
z3^yO%Wpw~qce2}62AO;N<IR)&(+}`(yKwsj|18j0IOm1d10^hXZ@gx@dlO<ls|Q#o
zex;xWJ}9g@U3-qV-uU<bKPa+~x88xWy1}gGAAGQsTN=;}R>pXs6HG&Rok+n9_18&|
zBP2kC>x8=upa9};)&Z595EBnDc7hqN=T3mw#s?}Wz(z7SFfb4_)&SHI<ZrnJ*7e~J
ztS|fJ&;S4KV6hi}V13y)e_(xCkQgYnfyP`x#g7C?rHcy7R&W`ME(<GvK*O@Vt?06#
z2^mml_6lCTcks%BdH|><qw>04!QL#XKi-P!MGug}!A^qA5aITsCP<}=3d<9$4uO=v
zDxl&K)n-&4)E)dSGK`>^DO9(B=Dv;-<rdH^6)4Df89}pE=m83HOD{NAVmb#DS>S}}
zqQWAHRW~TIdcnyDyKd0b9LR2IJi0-N9=mRk+d#UNFm$5^)bZ9m&{FAm>j60H2%H6y
z1(|iM6(q)Zto7)>|NogGi5)zG-Fl$&BERQ}){`YtJO2OwUqAEv&(;I=>^ng9$7>$Y
zL;%BURxs6hs`1zV|NrI7*ugUjuUWzR84p1WYdyd}4^%3&9w=c4D}T+}dE(#$=GIFk
zJjYp7Kp7D{Ki54KRG_wADv<#NaXu(|T~t^~Ks1ZW8b;_W9@vJ~1N<(BV7aFgTo8AI
z$<_m<AT!UvR3C4>@bCYBkc%O1>1@3M8vAcO0~I~qy5rw}FgV^i10FPU;H(937DyHn
zTp%&VW33AZJh(u$4lKAnf`SPVTwh=TfGxN{`np>|BxZ1}fd&jLxHf=;YXwyFc<U5s
zaCJ`w70}0B4}ikfGV}nvOqPK}ME6`!z;^o{V7v*P#XP|H`uYS=UC05`<%`gz*6n(r
zx8Og-Ro!zzwseOcV7%NNs&kj+(_NVx&8`O+U!R?D+!YkH4Ber7x?SgV_k!GDd7_RD
z>e|o)maYe2L+hm}-BUq+gqr4ihVdq-PX!U{1=|pNrui@<vM|JAsM32c@Axi&BuXUT
z+&c*Fs+?g2yQqHx#1UA$q>rN2^+2x)Gt_%~A(kIt{Eg(dBcLWeXiho+TvOhi3u@&;
z!m@WNh}{{Y!qYny)KcgSQQ_#F3N9f+R9HaS;Nxe|R3FH<xKvcV`v3o~>k3fUL<Q0{
zdGPQ5e{h2lGW}mJ*zGEC^98heZ2Q5&z|ajX@{`bu{47vGPE;{#3{vT$!Xm<iUd*Bv
zR*;Gs*2%v)_X()I(+VQNgXA}-f|xhK0{1^*ZEgtMy@9L^)bzMJmjm3y;sG_WKumDW
z-?kPsC<E~tf6D@p1JP=<T(B6ZP9RjH$%9n7sIYiocn?&Bfr^XXR*=QmOL9;>0V>G}
zRlTsliGZXGu!)eq0e_nWs2KzCObJFj6@Z*aR6K#!l7O6&f#DI<c!DMg?BP~Ov~~O-
zl`bkQb1|$#gc~@egO`hdVgi)PVNE4rsO~iwx=|gA2>atKDhHSt7+$nI`~Uy0EXbU@
zpfx89AT|?2_gqjp0v)xrj6DM@%lKOx!Aa!|TH_rOANNk)om&9TLuYym{v+(_Z3T&f
z+$#pMP39}uI<Vl)2Y2U!I=$Vl=vqLcAT5ud{{Md$q=kv0+4T(L%RF%Z2i!XSextM1
z=imST@OBALFPPuyqQU`+ItB(N2H2Vy_B;RoLwyJtQiAyqTv{Xh5IjN&t~$GW!6kO+
z8OBq0SuP;@nRm8=Mu0#)1#p$o4JkUI%3xi(yRHjB;Q<=#f);Z4l!3;gx?MrRdY1(>
znZW=VH$xI)Vz|=_R)y{~Q1J^|Nz(j+5v&)a5Ns=|aS*+r0ujl*_g>zWxd0B<pP<2|
zyWorjo!9yaDJ))QvoS#XV~E}k&s_!r9TzeSnto71CMti@r=S7#kl?GL?v$>8gb=9I
zER%!}(0~VnSX4lZSisFTh$3j;^&})1VPXlO66@#P*aq-O#LXA?9>RhfQuDmH_Yjn9
zKr01cDh^^*0h%0u%!xp2E55s}ATbCJ$#q7cAZ1bc0Lty4j0ZFJA;d`_+d$L!FyVs;
zVel|AB)Lrm<%H%#j5lB0mAL>-&r?B_Hc0FpNDP*rKpg>;5(Bh`2a=9a`=OxP7Gyc7
zYyb`STmTUd;9dgFxC<fk_*+0rx9)<AjXS*{C*Pf$@ei~V2u!kOurPo-vPIH&TR|d-
z{0cDzG#`Bd!i0nrc&G+y1wy364Wj)nYXRKAUa*0n(&)(pkcFVw0U7t;wIo8y1XT)R
zB6R715HgRyWfN#N8tM^HAm5#v0QLx&M0iB*ZYxLx;gLJNpcuaEdI2<QegR@8#78i{
zfaSq!qd+1hJ`fX-{36#2HWTC*i3k7x!%Tc|?;&XBS_UDTdLLaDl0e_xe_6!^@m5LD
zYo@z5ATe^+wE+~FpdtOctzeQBR5^okN|821<OXy!ZZ2rJ2ia2~KHO8T4?x*0_5q}!
zhpPytdf|K5^#Y{G1r0*uDQLmcpyCy*fk2@O8t<3@8vTEGm$ib0fq|$d%4tx3C8`Ld
zN)zP_(bmzYi307SfQy~pUQi*?>7&Ba+Y4^o`>1eqLL2yIS3o(D13X^?Y8ZhA3qdLF
z-cS64g>&zK8q(nL!tPcOyY)alE4T;W*=hrB9NQcR6_X6zt`axjK^y<=;-E$)xPu29
z`2&xI-1`X~g2XTtyzb5Q2&5a<9eM=J$2txt0kH!#KzW3*+w};f`_$=r#?lw5-8Bu=
z?gEdXXuF>2bUo1RdSK@Fy&wm7UT8f~UvS&?0IU%PYEyv<Rq&uBBzJ<cA%A;0$P=zM
z-3+|}jNPs_odVqu&VPuaZdVgfK@MrtfD8BT*aM*M;N|X6n{J`zSB&7btrmA>F1%)(
z0B$uzf*WJ5G7zgF9^r4|2iqe9>SI7+23H_~Cl*h1yPm+&oCNy-l4;6VnsZMuHrJkD
z<nLP#3Jc#8u;wXpFii$Yfg3)^p;Lyf{sB7;-eQ%2gaO10<*v|>!52)Rp&4i|IP?st
zUydV;VnAVp-d_YYG9klqptN?p6*NQ$8e>ImuEYBlo57hBb!6{5SPaw?Ak-&g0SAf=
z_AVD_$vCL7tip`mAH5CE50Iz@mF*6ofe#lI4oD{s#KSZZi~E~DFt#4xZ)Ig?z}<cR
zO|)O6K`KH0OAP0tT7C1~-MI~*z6iJ=>4vpm?y_6}t(!zj<IRT{L4tEXfE9z=$KbTz
ze257o-U<>2XP-7uu>h@=pvIxASPBkk@Tf3<%M6f9(fZL0pfRadnZN)4Co_Y_Y8C$e
z{|}0GXi^XWiGh*=X!sh{KZsr+$XA#FkB|pB7*ihAw7Xz$-DPb6wMI|EqZl;z0h-r9
z8f>`v5RwTWk~!c2D<<(y;9!)V%?Fq|T~Bn!!t*$C2W=;4LWz}ufrSA&lh4WlW`pL{
zL9=bLU@3?XWkFKV_9|-sEA|F7E>SvpcfskPx%Lbbe+y`W=C~_(eD=8O7EnILSB!w7
z<t}(B0jQhF0&a@(H|+tn^jvQs3xQj)VCUai3R-9Yk-L+61GN4Cv<~2|>w>%BH3Xn!
zS5ym?M^y`7vIyUWad)l+xGn^dceaAfnJWMm0Tpz2dLe9(D?zInI>7BskXl$b1)}1P
z>y5i}e}FQ&E4WU)3tr}M7aYPM=kPa`f|le%0vAa%9wZ9p-vO_0fariEvwJVG`i#Fx
z3$G?pya@6ZBo#xv0rFx64lhC-b@1-o7hr#G0gV7O*KT3pZ<z^N%u>69fxqPya!zgn
z=UUX#R~ak@%E^WBoGc2?@t_i!fvB7eav^3;MdW0V`|!zwA`zcFC>}B8QA>iC1j{T{
zxKGJ1v&i!)s!N-}5d*3TyIr?HDwP(3j@O1ez6~Bt;K4F*1Dm*LqDC--TT5oY|Noyb
z0a6;Z9w?E3us~fgP~mbMTq%KAkb()K0@TVtr~vUmDjJV~Cf~tpUM5V)t#ryS&d<|J
zvov5((9+UU$V*L6EXgcORVXe=El?=VtV&hL%u}!_N={45w9`?@P_R`1t7Bk*sL#wx
z&MzuTO)f#xP@I`pQUuaq1yK(&8@Jlz{1T8_1zWJ$2z8lx1*Iim2NY*Q)KnNK*eYmi
zYb)d_WF!_VB&DY2DWqjqq^2k&g7+ahFfb_CDi~>LF))BCN3hc5oW$bd%;dxzh2nzL
z<dUM&T!o_4l+?7$ywnthw4(f61p_?;g_3+EFWBlRC}@Dq(NrkN&&(?+W?=BlD@jdH
zEmFuYOD#&v$uCzZ&q&QvNKVX2F3m|S$;?YvD9K1wNX*SI%_~vJPgBTE&CM^W1eu$d
zlarsESdz+6V93D0;8;?Unp*(TkgoufQ%KAyN=;0ugbSo7lqD8rCMM;iDyXX#tAq3@
z<YeZhDwvysOi#<qNmW3OJ_bjKEt&aw3g!8wIVlRM70IcoDKK~BWaeg;FccUuIF>-o
zF~e?-t*xCxad~D*at7G#3Z=!VMY_eM1qC^osVNGXdBva*OwB7v%uy&xEiTB<D^6tq
zhjV#mN=XJHT2k|J5{uGPQxr<_85H#N^b`v6^NSRUQVWVwi$U5;KrYQs1BV*SAceHj
zykxM1o}L~kI1$NELsOwR1MIJ)R8ahtCZ~dyn}d=x0|O{|L9EX#Rw&8OR{&eBqmY+h
zk^zdDl>EF@P}%~i%gifF%*h1#1eCa}6cURobCHbB%u~?NHPlhiHq->^U|>)vOUx-v
zEmkNm$}A~K%~QzFQ%K1y&elOrE(!&yiP;L^SO)n@K|vugw;(68q%<W}BhAoQ&qzlh
z)zDbaL{q~Eg|DMvTA`__VQgHXqky6g;w>ooz#g>y^tU3X!!3SK&=yvZ_yM`tOb}aP
zonkMDPS|nJ1w@17K(qtb^9B%|uwzy!h*n_vW(1-cv>wj~nRlRX)h!VH;051n5WQgL
z%$FdVfq_8)td4<!14<h}=?ftF1duxz7#KiokX;N63_qZ336Q!41-9Ryd=(Hs!E4Dc
zC_fU!KXB&E7ZCq}Z&Cn=ZrJ+cik-W&vz3BIrkRDAZb5!=W`%A_d16tTZc%EPfsTSx
zX=YA|LQ<uIZ)To*xNf+ai9$h9epYI7iKc>uo}r!r1A_?EC5%-;42(4#jM6+TEFFvt
z3_1)93^EL$MjZn~KdAHJ$j8yj<iyMB+0NX?(#*<S&vDrCnB#HBqdY92t`1184+8_k
zWDW*~sUS09>X{~jRe<Dk7#J8dI2jl~6EqBP`CPbs4+8_kOil)d4=DQIfaO8%S;N4<
z(8<NX5XuQE4A9);%8BA0P!9{V(&U~n149~UBMQtu_hx41DCWa3cZ19Y?YnjnXJF_9
z4R6EL!Teb#k76!p_y-hbYz&}X*`SV*2-rUmv3h8zi7?DzU|;~v@Q5&gTn&*0Ek^)_
zg9rm?J-ZwODD)pPFff3u6=7fl@Aw9Z$ufdS1_m|;FF5NGGfeCjoOO^5CZ@v<V>z)i
zFerje4rXUyPy(|~bHHRT!&&#?tk-bXXE^IOoW;rs)9VXofx;i+qeQq^DJKJiGT63e
zP6h^0=!-Bcg3BI<v;J^0Fi3&bad5#*7KXE|xL~qQa4|19D-_Nug{xZu7rVm6zyOJl
zCvdS(T#!^O!obfBiw}8jn7z8(Fj;GE1_nrcgmA;+qlX)`10SUJ2rq~P#m5;q>!bio
z>=v9QAP5V46+u|o3y8qf*@(d0=K~ju5`np(Tm<I6cDU?Rxa?vPnEUpKz}$Bou8vt0
zX0os-%r-?)n8|jcFq8e@vN3SkEK!)r&7v@q=ZeC7z7?+Hswe{kXyK{|!)Le{vlz^_
zelb{_=ZnL{*1}o$;4B6Sn5;gW<qK!Uz*+5ZR*57`#{x;1FE_x&_DRBgc@8diN0Na-
z4V=Q>z{P&S)p1F|%#)CUsndXqnMuLSbCH6DOE_G%SqkQY$#AiSa2@-kVBvfQuJ<uq
z9ltb8ue>zO1-jBO+kB;AdSl_T*>KrzX_!lA!(~^(WlzFoZ^C7t!)3op!~C&O24?Rv
z83qP*a0u;yiyeToj>B1JWEdDg(`+IP_hc9tK+EPt7{0<~f5|W~Xn{?+APY13sw~Xp
z=Wwz2aMm|C>$fb-WL`O#$trR%Q#9pZCU2C7iFql&SY-;ZkZgmCO;Lb_<RS%_f7iif
zH5FlcLlt3qQ{iI8iZH#C6=AWk7%saJF1ue5X7Xvc>?b%&P6=kRo)XM98zq>@UP>^%
ziE!CoxQ@ASvDI)Lr<GuCxeb?n377p2H;+RZW}C1w1A`C)sFad~v*h8dCOB&=ob?jU
z`T%GBhO=x{U^zZX1y-(gs=&&%g(@)Hw!m3;;j9mEmXa#Web#W+BsgoIDlF8_!Nu;V
z!b0tjDl80m)L^DasljA5)L>z143~|7vtrd?rCBCitQO9i2xo1Ev%bMuzu|hXtHbPl
zs}2hd4Goys0yt}%22Az~Tr5KqrmkBPCVK$Rx~~ZfQ#LJFn3ie5bWDY_4r;+d=ptO~
zz7{MD-fF?ZfJGao*FYPl!vQYlrw!AQrwt3!I=E~PTy~Z=%)DE0*(yDl$;<Q@7_`AT
zelJ|?r5?;SHhowrC8iJ4p`s77H$op~Z<;>Lj!w9`t@<!ij>5$*!}UId>nMb_SlJj_
z;jE1YFufNIV0L_jv;G^vY~wbBx$2l9EbU%`vmU}(Z{e&YBbd5UII9)Tnh0lYgtPX-
zS;vfEwq1a;1dL%~CdM$6z2K}UI4cd#>W8yt!&xigrfi0@KEqkoCNMkv;jC&CSP0EF
zfrZd+IO{f?^&8IOG=+tlswvDoOE@dl6lPwlDa^d3aMotH-bZj9-{34IGnif{Gnn2a
zIIF-6X76M(NFPLmVJn=azyKMW5Mc;_vp{RhK;so644~~a5Y`5`ENDp^M2v$GrdJO%
z008P?FfcIu`_I6T&WJJ?0G5dd58K3p*^CSd3{0TmN-z(VkYs@Lj=*ZbQlK`l3MT^t
zL?j;4J&&J?5CM<x#51&V!PS6AXyO@e3ByD{27%6rauA1!#1|RrnHU%vfMh_O8D@s~
zA|sH95ooy;L<A&f0U{V!7!V>(3=9mQ;dqD$@~KlGFEKNoGh<)?oizp42qutEoC2*Y
zVFoD#%OD8k)26^CGYWvtA3!KzU|>K#X$sUsWM%}NHHD%C%mMWpK@8AJIA%sr#}>px
z#o<scXo`lJ5p>2BXz@B!5K4jiV-ThS1IXPB450odst9P(4pn3cgbNy#gX%hrAp+`0
zLIhzZe}-_Oy5f`bk<Q)%sfjPn%!4Zdr5^^62x#9LL=>zhCqEs+1Cd~n)Cy2?263S#
zgP5R{3!*`7a)`gQ;4uQy1(I_{5sA+QkBxyOkj#lkQ3H}JMiGfmD@siT34<}n<aS0_
zEUHvhRWazLX2hozCFZ6w#DfN#;`5E-VJyRVhWM2HB+!VcF-S1iP|w)X%#<NMtpLoj
zgr){`bK>I*^2;+*(u^45<I~gfi%N<T^Wuw3;>(LNOHz@=KoZ4isYUV08Hq)S$t9^p
zc+?c7CgxyD!;Fmw4QU~pU0jl15MNwUl$n=~EL@OZ9-nCvpJ{?D2zN&&WK0v&nxfLY
klFZ!H_|&4J{32wnC=&6BCCGC5#hB`gOX8Dr@{3a$0Cf2R{{R30

diff --git a/libhreels/myEels20.f90 b/libhreels/myEels20.f90
index 9089640..28d9539 100755
--- a/libhreels/myEels20.f90
+++ b/libhreels/myEels20.f90
@@ -22,7 +22,7 @@ subroutine doeels (e0, theta, phia, phib, wmin, wmax, dw,  &
   double precision, intent(in) :: e0, theta, phia, phib, wmin, wmax, dw
   integer, intent(in) :: name_size, osc_size, neps
   double precision, intent(in) :: thick(name_size), epsinf(name_size), osc(3, osc_size)
-  character*10, intent(in) :: name(name_size)
+  character, intent(in) :: name(10, name_size)
   character, intent(in) :: contrl(10), mode(10)
   integer, intent(in) :: wn_array_size
   integer, intent(in) :: layers, nper, nos(name_size)
-- 
GitLab