libsim
Versione 7.1.7
modqccli
delete
qcclidelete
◆
qcclidelete()
subroutine qcclidelete
(
type(
qcclitype
), intent(inout)
qccli
)
Cancellazione.
Parametri
[in,out]
qccli
Oggetto per l controllo climatico
Definizione alla linea
762
del file
modqccli.F90
.
763
764
765
if
(qccli%height2level)
then
766
k=iclv(indana)
767
else
768
k=0
769
end if
770
771
if
(.not. c_e(k))
then
772
qccli%v7d%voldatir (indana ,indtime ,indlevel ,indtimerange
,&
773
inddativarr, indnetwork ) = rmiss
774
cycle
Generated with
Doxygen
.