anchor.diff:      write(*,'(1x,"rmsd(mean error)     : ",ES15.8)') rmsd_err
       write(*,'(1x,"(bias                : ",ES15.8,")")') bias
       write(*,*)
  -  
  +
       select case(ftype)
       case('csplines')
          call print_results_csplines()
  
positive.code:           write(*,*) trim(files(ntrain+i))
         end do
      end if
    
      !--------------------------------------------!
      ! additional (for now undocumented) switches !
      !--------------------------------------------!
     
      call args_switch('--nodepos',   value=nodepos,    default='uniform')
      call args_switch('--opttarget', value=opt_target, default='relative')
      call args_switch('--optderiv',  value=optderiv)
    
      call tbio_final()
  
    end subroutine parse_command_arguments
  
negative.code:     call tbio_args('tol',     tol,      default=1.0d-10)
      call tbio_args('nnodes',  nnodes)
      call tbio_args('funct',   ftype,    default='csplines')
  
      ! potential range / interval:
      call args_switch('--range', pos=ipos)
      if (ipos /= 0) then
  