Changes between Initial Version and Version 2 of Ticket #496

Timestamp:

2009-07-30T10:59:17+02:00 (15 years ago)

Author:

ctlod

Comment:

actually we could go further with a small clean of routines.
no more call to dia_wri in stpctl.F90 is required to close NecCDF files.
instead the closing sequence (in case of an interrupted run) is move into dia_wri_state under the conditions ninist ≠ 1 and cpp key key_iomput not defined.
In dia_wri subroutine only remains the simplified test on nitend as described above to close files in case of a "normal ending run".
the kindic parameter is removed from dia_wri subroutine sequence.