ELF>H!@@AWAVAUATMUSHHmAH|$HT$LHL$8LL$H@@&@31Ht Ht 1HfOtHcL|$HHLAtHt$(HH1HcHHHLD$0HH1D$@ID$HL$D$0H$HHD$ HD$\^D$(AAH$H1$D$\L$o;A 1M$IHD$ HL$MH$LH(1LM9t!LMtLL;HH HcIJ(SLHt$ILCYЃ^L,`|KGH4HIH 1AYHYAHH9uHIŬ I`mHKH$1HHcHH$oHHD$HH1T$HD$HL$@\\ʃ8^\AL$A$Ff(f(H\$8L$o1f1ff(4fA(,0fYfYfXf3fT3H9w9ȍQt/HcH\$8HQoԀYYXӋ9}:H|$8Ht$HcH)D$ HL$HHL$D$ ffYD$`fAD$fA$HĈm[]A\A]A^A_úZA 1H$HDŽ$DŽ$\HDŽ$DŽ$`DŽ$$H$mH$HcHH$HHH4ºAD$ Ht$pH$YXD$pH$H$HDŽ$DŽ$`HDŽ$DŽ$DŽ$$H$(H$H$HDŽ$DŽ$aHDŽ$DŽ$DŽ$$HcHHt$pHD$0H$HYº^D$(D$pHt$pH$1ɺHDŽ$HDŽ$HDŽ$HDŽ$Ld$pHD$xHcHHt$pHH$Hºf(D$AYL$L$pD$H$Ht$pAYD$ D$pH$A$AL$IxA?@1Hfw@Hproblems with find_qicompute_phius(5x, ' Wfc-us ',a3,' rcutus=',f6.3, ' Estimated cut-off energy= ', f8.2,' Ry')high(5x,a)rc*logder, xc(1), xc(2), rc*q(1),rc*q(2)(7f12.5)compute_phius.f90? x rr28rab,hsqrPrm1trm2rm3(X`hdxp 0. # #(#8 0., # #(#8 0.P # #(#8 0.t # #(#8 0. # #(#8 0. # #(#8 0. # #(#8     + lam ik    xc   ;bm-@!#.@rfae iok(rj1/Prn6nc7N|;;hUrTrQsRؤrX Y wr!;yU T Q R=XEUTsUTs\UrTQrv"RؤrX~~tTUUrTsUtTs,Ur UrTQ2! 8UrQ8! _UrTrQ8: yUrI U4Q4R ,Ur UrT Q(: Ur,Ur! DUrTrQ8k pUrTrQ8R0! UrTrQ8! UrTrQ8: Ur. .  7  ; !P."h. .#Cy$#E$%>$%?$&5'5#J$('5'5#'5)5'5''%*$+(;';*A, - .rec.(- 0- 8- @- H-P-T- X- `-h-l- p.u x/id x/pos.0 000 0 000 /pad 000 0 01( --- --- - * **.  2%(! ';'5'(: ';'5'(I ';&k '' '' 3';'5''% B $ >   : ;  : ; I8  : ; I8  : ; I8 : ; I8 POI !"/Q .?: ; n@B : ;  : ; I: ; II44: ; I4: ; I4: ; I4: ; I4: ; I 'I1B11I!I/!I/  < 4: ; nI?<!&I" I#.?: ; n<$%.?: ; nI<&.?I<'I(.?<).?I4<* I+&, - I8 . I8 / I80 I81 2!I" / 3.?<(u(GؤrGYUYaؤraUQtQNsN6T6s7q7GФrGYQYaФraQSrSYRYrx/|/6X6Y|Y]u]xyYYYyGYaGYar a Yrr#A1"b1p6@112 3 2@3fY3,6 compute_phius.f90 0fPJ0P<0O㟁g!gxNEXJ?;;c UhV:Kug f.g>2s ^&wX=format_lensign_lenGNU Fortran 4.8.5 -mtune=generic -march=x86-64 -g -O3 -fopenmp -fintrinsic-modules-path /usr/lib/gcc/x86_64-linux-gnu/4.8/fincludederiv_7pts_iflagsizetypeiomsgxmin__ld1inc_MOD_verbosityerrorefilenamememcpy__ld1inc_MOD_grid_gfortran_transfer_array_writeinteger(kind=4)find_qi__gfortran_transfer_character_writedeliminteger(kind=8)verbositydelim_lenfreecompute_phius_gfortran_transfer_real_writeiomsg_lenmeshphi_outiostat_gfortran_st_write_donezmeshderiv_7ptslineasynchronousradial_grid_typecharacter(kind=1)advance_lenld1incrmaxdecimal_leninternal_unit_lennamelist_name_els_inroundflags__io_global_MOD_stdoutnamelist_name_lenformat_gfortran_internal_packasynchronous_len__st_parameter_commongridf2aeadvance/mit/espresso_v6.1/amd64_ubuntu1404/qe-6.1/atomic/src_gfortran_compare_stringpsi_inround_leninternal_unit_descderiv2_7pts_pad_lenfind_qif1ae__builtin_free_gfortran_internal_unpackc_charsignfactcommonels_inblank_lensizesph_bessph_bes__gfortran_st_writeiolengthcompute_phius.f90internal_unitreal(kind=8)unitcompute_phius_errore_deriv2_7ptsblank__st_parameter_dtdecimalstdoutio_globalGCC: (Ubuntu 4.8.5-2ubuntu1~14.04.1) 4.8.5zRx LBBB B(D0A8J  8A0A(B BBBA .symtab.strtab.shstrtab.rela.text.data.bss.rodata.rodata.str1.1.rodata.cst8.rela.debug_info.debug_abbrev.debug_loc.rela.debug_aranges.rela.debug_line.debug_str.comment.note.GNU-stack.rela.eh_frame @@,&,192HZ U3 fN~t\(0 @0 XP@030,  hh@p H'x *|   '9ER[s|-D]compute_phius.f90.LC4compute_phius___ld1inc_MOD_gridderiv_7pts_deriv2_7pts_find_qi__gfortran_internal_packsph_bes__gfortran_internal_unpackfreememcpyerrore___io_global_MOD_stdout_gfortran_st_write_gfortran_transfer_character_write_gfortran_transfer_real_write_gfortran_st_write_done__ld1inc_MOD_verbosity_gfortran_compare_string_gfortran_transfer_array_write p  p * 0 Gw |   p p L Q V ]h|  0  * 7!< F "P#^r   !  ",9N i $  6 C!  ! * 1 ^8 E  B   A  S! / |4 W> C M Y[ ` j /o y |~ s       M s  +K\i}@a ]u9.`;zT&mEq:G ;   n # , 2 i o ,z  b   j {       ( - B |M a k u h   /  3 S  e    v # G. x9 XO Z ^e {p {   N      5" ; J >l  C