<div dir="ltr">DearĀ <span style="color:rgb(102,102,102);text-decoration-line:none;font-family:helvetica,arial,sans-serif;font-size:13px"><span><a href="https://www.mail-archive.com/search?l=wien@zeus.theochem.tuwien.ac.at&q=from:%22Xavier+Rocquefelte%22" rel="nofollow" style="color:rgb(102,102,102);text-decoration-line:none;font-family:helvetica,arial,sans-serif;font-size:13px">Xavier Rocquefelte</a></span></span><div><span style="color:rgb(102,102,102);text-decoration-line:none;font-family:helvetica,arial,sans-serif;font-size:13px"><br></span></div><div><span style="color:rgb(102,102,102);text-decoration-line:none;font-family:helvetica,arial,sans-serif;font-size:13px">I have just modified as you said</span></div><div><pre style="font-family:courier,"courier new",monospace;font-size:14px;white-space:pre-wrap;word-wrap:break-word;margin:0em;color:rgb(0,0,0)">...

      read(4,*) screened
      if ((screened .neqv. .true.) .and. (screened .neqv. .false.)) &
        stop 'error in case.inhf: screening should be true or false'
      if (screened .eqv. .true.) then
        read(4,*) smu
        if ((smu .lt. 1d-4) .or. (smu .gt. 5d0)) &
          stop 'error in case.inhf: to avoid numerical instabilities, &
          do not use lambda smaller than 0.0001 or larger than 5'
      elseif (screened .eqv. .false.) then
*        read(4,*) smu*
        smu = 0d0
      endif

....</pre><pre style="font-family:courier,"courier new",monospace;font-size:14px;white-space:pre-wrap;word-wrap:break-word;margin:0em;color:rgb(0,0,0)"><br></pre><pre style="font-family:courier,"courier new",monospace;font-size:14px;white-space:pre-wrap;word-wrap:break-word;margin:0em;color:rgb(0,0,0)">but got same error. Thank you</pre><pre style="font-family:courier,"courier new",monospace;font-size:14px;white-space:pre-wrap;word-wrap:break-word;margin:0em;color:rgb(0,0,0)"><br></pre><pre style="font-family:courier,"courier new",monospace;font-size:14px;white-space:pre-wrap;word-wrap:break-word;margin:0em;color:rgb(0,0,0)">==================================</pre><pre style="font-family:courier,"courier new",monospace;font-size:14px;white-space:pre-wrap;word-wrap:break-word;margin:0em;color:rgb(0,0,0)"><br></pre><pre style="font-family:courier,"courier new",monospace;font-size:14px;white-space:pre-wrap;word-wrap:break-word;margin:0em;color:rgb(0,0,0)">Dear Tran,</pre><pre style="font-family:courier,"courier new",monospace;font-size:14px;white-space:pre-wrap;word-wrap:break-word;margin:0em;color:rgb(0,0,0)">I have just removed line to specify the screening lambda and got error "error in read_weight: wrong case.weighhf"</pre><pre style="font-family:courier,"courier new",monospace;font-size:14px;white-space:pre-wrap;word-wrap:break-word;margin:0em;color:rgb(0,0,0)"><br></pre><pre style="font-family:courier,"courier new",monospace;font-size:14px;white-space:pre-wrap;word-wrap:break-word;margin:0em;color:rgb(0,0,0)">How i can relsove this problem. I can ask you in my case nband = 34 i right? Thank you.</pre></div></div>