\documentclass[nocolor,memo]{j3}
\renewcommand{\hdate}{6 January 2004}
\renewcommand{\vers}{J3/04-178}
\usepackage{lineno}
\usepackage{longtable}
\usepackage{xr}
\externaldocument{007}
\input pdftest
\begin{document}
\vspace{-10pt}
\begin{tabbing}
Subject: \hspace*{0.25in}\=Disassociated or deallocated actual argument
associated with nonpointer nonallocatable\\
\phantom{Subject: }\hspace*{0.25in}\=optional dummy argument is considered not to be
present\\
From: \>Van Snyder\\
Reference: \>03-258r1, section 2.4.3.1\\
\end{tabbing}
\pagewiselinenumbers
\leftlinenumbers
\linenumbers*
\section*{Number}
TBD
\section*{Title}
Disassociated or deallocated actual argument associated with nonpointer
nonallocatable optional dummy argument is considered not to be present.
\section*{Submitted By}
J3
\section*{Status}
For consideration.
\section*{Basic Functionality}
A disassociated or deallocated actual argument associated with optional
dummy argument is considered not to be present.
\section*{Rationale}
I have a procedure that has numerous pointers that are associated, or
not, depending on input parameters. These are in turn passed to some
subroutines that do (or do not do) some computations depending on
whether the dummy arguments are associated. This, of course, requires
the dummy arguments to be pointers, which degrades the generality of the
procedure, and may have undesirable implications for optimization.
It would be better if I could use optional nonpointer dummy arguments to
decide whether to do these computations. In order to achieve this effect
by using optional $n$ dummy arguments I need an IF ELSE IF \dots\ ENDIF
construct with $2^n$ branches.
\section*{Estimated Impact}
Nearly trivial --- a minor change in defintion of ``present''.
\section*{Detailed Specification}
Allow to associate a deallocated allocatable actual argument, or a
disassociated pointer actual argument, with an optional nonpointer
nonallocatable dummy argument, in which case the dummy argument is
considered to be absent instead of an error.
\section*{History}
\label{lastpage}
\end{document}