closedatafile.f90

Path: src/io/closedatafile.f90
Last Update: Sat Apr 23 00:01:52 JST 2005

    Copyright (C) GFD Dennou Club, 2004. All rights reserved.

begin

Subroutine CloseDataFile

  * Developer: SUGIYAMA Ko-ichiro (sugiyama@gfd-dennou.org)
  * Version: $Id: closedatafile.f90,v 1.2 2005/04/22 15:01:52 sugiyama Exp $
  * Tag Name: $Name:  $
  * Change History:

Overview

$B=PNO%U%!%$%k$N%/%m!<%:(B.

Error Handling

Known Bugs

Note

Future Plans

end

Methods

Included Modules

gt4_history dc_trace

Public Instance methods

[Source]

subroutine CloseDataFile
                                                                 !=begin
  !== Dependency

                                                                 !=end  
  !== $B0EL[$N7?@k8@6X
_(B
  implicit none

  call BeginSub("CloseDataFile",          fmt="%c",                     c1="Close output file.")

  !=== $B%U%!%$%k$rJD$8$k(B
  call HistoryClose
  
  call EndSub("CloseDataFile")
  
end subroutine CloseDataFile

[Validate]