TABLE OF CONTENTS

::pwtk::wfcdir_prefix

SYNOPSIS

proc ::pwtk::wfcdir_prefix {{prefix {}}} {

PURPOSE

Set (or query) the wfcdir's root (top) directory, e.g., /scratch/$env(USER)/pwscf. This routine is typically used in configuration file, ~/.pwtk/pwtk.tcl. The full wfcdir is then constructed by subsequent call to ::pwtk::wfcdir_postfix, and the wfcdir is: $wfcdir_prefix/$wfcdir_postfix.

IMPORTANT

To make ::pwtk::wfcdir_prefix effective, ::pwtk::wfcdir_postfix must be called in set mode after ::pwtk::wfcdir_prefix_append

RETURN VALUE

The value of the wfcdir_prefix.

SOURCE

    variable QEdir

    if { $prefix == "" } {
        return [varvalue QEdir(wfcdirPrefix)]
    }
    return [set QEdir(wfcdirPrefix) $prefix]
}