anchor.diff:        write(lerr,"(a)")      "CHEBY> ERROR R2 cannot be lower than zero!"
         goto 10
       end if
  -    if (cheby_I (jj)<=zero) then
  -      cheby_I (jj)=cheby_refI(cheby_itable(jj))
  +    if (cheby_I(jj)<=zero) then
  +      call cheby_resetI( jj )
       else
         call cheby_setScaleKick(jj)
       end if
  
positive.code:   ! last modified: 02-04-2020
    ! dump map of potential
  
    use mod_common, only : bez
    use mod_common_main
    use mathlib_bouncer
  
negative.code: end subroutine cheby_expand_arrays_lenses
  
  subroutine cheby_expand_arrays_map_echo(ncheby_mapEchoes_new)
    use parpro, only : mFileName
    use mod_alloc, only : alloc
    implicit none
    integer, intent(in) :: ncheby_mapEchoes_new
    ! map
  