%N lognopen %F $MIR/src/subs/log.for
%D Helper function for logging usage in LogOpen
%P rjs
%: text-i/o, log-file
%B
        integer function lognopen(val)

        implicit none
        integer val

   This functions aids the logging usage of LogOpen/LogWrite/LogClose,
   since variables cannot appear in both a DATA and COMMON.
