#%Module -*- tcl -*-
#
## SEACAS modulefile
#
## written by greg sjaardema, 2020-03-07
#
proc ModulesHelp { } {
 puts stderr "\tThis module loads SEACAS (aka ACCESS) paths and environments."
 puts stderr " "
}

proc GetPath { } {
    if { [ info exists ::env(SNLSYSTEM) ] } {
	set cluster $::env(SNLSYSTEM)
	if { $cluster == "cee" } {
	    set cluster $::env(SNLCLUSTER)
	}
    } else {
	set cluster $::env(HOSTNAME)
    }
    return $cluster
}

# Try to determine the path used on this system...
set cluster [GetPath]
set seacas_path  /projects/seacas/$cluster/current

setenv ACCESS $seacas_path
prepend-path PATH $seacas_path/bin
prepend-path PYTHONPATH $seacas_path/lib

prepend-path LD_LIBRARY_PATH $seacas_path/lib
