anchor.diff:    else
       write(lineNm,"(i2)") lineNo
     end if
  -  write(lout,"(a)") "INPUT> DEBUG "//blockName//":"//lineNm//" "//chr_rpad(varName,10)//" = '"//varVal//"'"
  +  write(lout,"(a)") "INPUT> DEBUG "//blockName//":"//lineNm//" "//chr_rpad(varName,16)//" = '"//varVal//"'"
   
   end subroutine sixin_echoVal_char
   
  
positive.code:     write(lineNm,"(i2)") lineNo
    end if
  #ifdef SINGLE_MATH
    write(lout,"(a,1pe13.6)")  "INPUT> DEBUG "//blockName//":"//lineNm//" "//chr_rpad(varName,10)//" = ",varVal
  #endif
  #ifdef DOUBLE_MATH
    write(lout,"(a,1pe22.15)") "INPUT> DEBUG "//blockName//":"//lineNm//" "//chr_rpad(varName,10)//" = ",varVal
  #endif
  #ifdef QUAD_MATH
    write(lout,"(a,1pe41.34)") "INPUT> DEBUG "//blockName//":"//lineNm//" "//chr_rpad(varName,10)//" = ",varVal
  #endif
  
  end subroutine sixin_echoVal_real
  
negative.code:     write(lineNm,"(i2)") lineNo
    end if
    if(varVal) then
      write(lout,"(a)") "INPUT> DEBUG "//blockName//":"//lineNm//" "//chr_rpad(varName,16)//" = True"
    else
      write(lout,"(a)") "INPUT> DEBUG "//blockName//":"//lineNm//" "//chr_rpad(varName,16)//" = False"
    end if
  
  end subroutine sixin_echoVal_logical
  