|
◆ qcspadelete()
subroutine qcspadelete |
( |
type(qcspatype), intent(inout) |
qcspa | ) |
|
Cancellazione.
- Parametri
-
[in,out] | qcspa | Oggetto per il controllo climatico |
Definizione alla linea 653 del file modqcspa.F90.
654 open (grunit, file=filename ,status= 'UNKNOWN', form= 'FORMATTED''APPEND'
657 if (.not. exist) then
658 call l4f_category_log(qcspa%category,l4f_info, "write header in gradient file"
660 qcspa%v7d%level(indlevel), &
661 qcspa%v7d%timerange(indtimerange), &
662 qcspa%v7d%dativar%r(inddativarr)
|