TABLE OF CONTENTS

::pwtk::turbo_lanczos

SYNOPSIS

proc ::pwtk::turbo_lanczos {turbo_lanczos} {

PURPOSE

Explicitly set the full pathname/filename for turbo_lanczos.x executable (i.e. /full/path/to/turbo_lanczos.x).

RETURN VALUE

The value of the turbo_lanczos.

SOURCE

    variable QEprog

    if { ! [file executable $turbo_lanczos] } {
        ::pwtk::error "specified turbo_lanczos.x program \"$turbo_lanczos\" is not executable."
    }
    return [set QEprog(TURBO_LANCZOS) $turbo_lanczos]
}