|
||||
File indexing completed on 2018-03-02 18:43:08 UTC
view on githubraw file Latest commit add29e06 on 2018-01-31 20:35:05 UTC92a862e67a Jean*0001 #include "CPP_EEOPTIONS.h" 090cc462c0 Alis*0002 0003 SUBROUTINE SET_WRITE_GLOBAL_FLD ( flag ) 0004 IMPLICIT NONE 0005 C SET_WRITE_GLOBAL_FLD( flag ) sets an internal logical state to 0006 C indicate whether files written by subsequent call to the 0007 C READ_WRITE_FLD package should create "global" or "tiled" files. 0008 C flag = .TRUE. indicates "global" files 0009 C flag = .FALSE. indicates "tiled" files 0010 C 92a862e67a Jean*0011 C Arguments (input) 090cc462c0 Alis*0012 LOGICAL flag 0013 C Common 0014 COMMON /RD_WR_FLD/ globalFile 0015 LOGICAL globalFile 0016 C 0017 globalFile=flag 0018 C 0019 RETURN 0020 END
[ Source navigation ] | [ Diff markup ] | [ Identifier search ] | [ general search ] |
This page was automatically generated from https://github.com/MITgcm/MITgcm by the 2.2.1-MITgcm-0.1 LXR engine. The LXR team |