SMH1420@TAMVENUS.BITNET (Steve Hicks, 774-7717/7809) (06/10/87)
The following is a quickie program to return if a typed symbol and/or logical is one or the other, and what the translation actually is. It will not tell you if the variable in question is a DCL verb. $ inquire variable "Symbol/Logical" $ x = f$logical(variable) $ if x.nes."" then write sys$output " Logical: ""''x'""" $ x = "''&variable'" $ if x.nes."" then write sys$output " Symbol: ""''x'""" Stephen Hicks, Texas A&M University 409/696-3864 <SMH1420@TAMVENUS.BITNET>