Parent Directory | Revision Log | Revision Graph
Implemented new I/O package (mdsio.F). This package does parallel I/O in much the same way as dfile.F used to except it uses "direct access" rather than (f77) unformatted sequential access. Problems with dfile.F package included: o unnecessary memory use (each process had two global sized buffers) o inability to read the files it had written without post-processing o "tiled" files were tiled by process/thread rather than actual tiles o created huge numbers of files with no alternatives Features of the mdsio.F package: o direct-access binary writes o no excessive memory use o ability to read/write from multiple record files o "tiled" files are based on "WRAPPER" tiles so that the number and content of files is independent of the number of threads and/or processes o option to create single "global" files rather than "tiled" files o ability to read both "global" and "tiled" files [Caveat: the tiling of files must match the model tiles] o checkpoints now use a single file per model section ie. one file for the hydrostatic model core, one file for the non-hydrostatic extensions and one file for the C-D extensions o the mid-level I/O routines now is broken into more source files read_write_fld.F supplies basic I/O routines with the same interface as the original I/O package read_write_rec.F supplies I/O routines which allow multiple records write_state.F writes the model state checkpoint.F supplies the read/write checkpoint routines All the example input data has had to be modified to be direct-access. Otherwise only routines that used I/O have been affected and not all of those have been due to the continuity of arguments in the read_write_fld.F routines. What needs to be done? We have to create a suite of conversion utilities for users with old-style data. Also supply the option for using old-style I/O, not just for die-hards but for reading data too extensive to be converted. And more...
1 | adcroft | 1.2 | ?&? wI?4i?A?$q?7*?i? V9?!,?7 ?5FGI? p2?%?<_?8H(?#R?&QZ@&?%pG?r?$1\?_ɹ0?t.?!N1? gg:6?`_P?N%2}?#?9E?&'?${_? (=?FD?;,='?&*ȶw?N 7?%ۛ?"FR[Z??L[?GH:?"TO/? k)Q?tZ?%?"n?`?XĨJ?C-9?z%D?ĩ?EΆ?li?f?/ܮ?.??J?#9B?"9 |
2 | ?OO?V'?$}%?!g?j`!o$?!&? | ||
3 | ?cwV?? ?9rE?U?$sg?"XD?D毕?,Qv?1?c6Æ?84?s3:?rU? MM/?'1;:?g\q?$w;?Db?(!d|?T? | ||
4 | Unһ?#?367n?S? {G?$3M?(-?<Vz?ef(?=~?8,Y?G\?({qe??X`?Ro? -?Z˙? AA?9`a?%Hl?o?<h:v?@h?,? O?/eM?K/?B? | ||
5 | ?lW?a?Jt?f?~$v?#g? b?t!?' | ||
6 | ,?(ĸ? O{? ?i,8??Ñq:?[uB? 4:?'S]R?IKx?ߤy?V? | ||
7 | l?ӑY?&;3&NI?B=B? | ||
8 | ;?"`S?H?z|,?{b?Ao ?Q?,(J?ܐ8[?}Jν?F?E?νU? ߶?0W}?vL?͆?rQ?nZ?? @h? ~p?? | ||
9 | IF?[?:$?>Ay?d;O?_*?|?q?BQob?ʹ?xx>x?J1?ҧ?|?|r!?9KaS??E^?ve?R?$q2?/}? | ||
10 | os]?#t? ^? "?%5=^? ? _? A?5??oā?ї<V%?"?y?w?(Js?W? C?Ϋ?,r?jaw?:`ư?`?5?ȿČ?#8c<?&D.F? | ||
11 | S5?Mf?#I\? [?t?'F[?<O!}L?#F? hg*? u?!F?2 >?$w-_?5?'7(?-?='? ?_T.4?*9?M ?#K?Ɩ?!k7?߅?Pm?u*S?n1?$qo? :E=?.J],?A?dPV?z?(C_3|?2P?c*?$rޚB?7vi? H?eq#? g?27?-a? YQ?%sR?"?+ ?m0?uo? | ||
12 | V?%{^?P?-n? |[?ze@?&(\@? ?ٽأ? iG?O?b?DƎ?6[?g=?"Na"?8D?kAP?[U3?,2nW?Y}Y?}7E?("6q?(w?Yvd?>Z?(@rڂ3?! | ||
13 | 5w^?q ?6G?r?;?9?x{?7&x?!?r?(6?'c}j?i6?"G?wm? | ||
14 | V?w]A?h"?c ?OX?'jR? ?Oc?JL?¶Kj? WkD?o]?&X?%ZQ`?Kb? | ||
15 | b~?#˧?ew?fbw?K]ܟ?'` ?B?3؇?^)?#$fD? k]?tNv?0gƬ??i6r?pp? ?A?ta?$'?lį? g(m?!adL?q?:WjP?/s??LK?om?I?U?o"ޥ?jT5?%;q>8?l\? yXW?;c#?u^?鳐d?!A?')L?d?-re?!C+?)-?ܧ?ƿLU?gI?b4n?@w<?" 9Z?"YP?-ç?'.G"?v?#m\? ?1_B,?ks%?&/u?6Y? | ||
16 | !k?rY5;V?#1?k?Íih?ki?5?AeY?w.?]pf4?+897?oҸ? | ||
17 | v?c?Zy"? lmF?-0_9?&? d?u9Q?W:?ۚT ?JHIJ?$@:?}:Y?~?N(?+7?(;l?\/sy? vU?3x?VYx?$rM? | ||
18 | ^)c?r?k? [?(d4u?c[Q?$ȧ?yx? ]&z?!F"?w)?"ga?TSO?j\?Pbz?'?=b<?1F?*B0? s?dL ?"=23?D?&?h? >v?k^?!nl?(Qy|? \?Ҩv1?b4=6?&6"w ?8@ڷ? W)Dع?jՃs? J?'?%?Ku?L?$ʸ?yx? | ||
19 | JT?&4r??]sce?&5:~?vU(?"1X?_Hk?tj?R?"ܪLL:?C? x?[?#V ?>?<?/th??6aX?yB?b?v&L?.-?\?!1?,a?}0?&0?CK?$h`?)3p?K:? ώ?&8>?? | ||
20 | ҅?(h]?ڕv?j4?u?W^?'=CƵ?e`8?HJ?]T0?z]$? &??!t(6?(]'J? ͅ?!'n?ql$?Z? )<?!_щ? | ||
21 | #W?nL?n?ĜmH?D?9;?_? ?P? P? j??@??|d$?#:}p? *M?͡?<;O?;?%&?0?Q=;?*? }G;? M^?%Kf ?Ğ(?͟p/?>?is? | ||
22 | ?:ǖ?p?Rr ?H,?fr?#u?(hB1??&c??!zW?%H=?Zދ?!C?%3?g? tR?=#7C?P?P)?.r?)Y?$0N?%.i?.d?f-?uJ?S(1?"Ҽ? JA?=?%m? \3?#O2(?$9?$ ?Gt?(=?J0ܠ?ςI?m=Po?DK?K2? M,?ÈFe?'6US?۰|?0Zd?%S?'q? <?#a?M?G4%?RZ?P'? | ||
23 | D~?&@HF??]N?$f?& {? {h??Lmj?F?4?Ϧ b ?sץh?TZ?J`\?_GG?#Lr ?i8 ? r?(?<#0@? j#C/?Q!O)?EN?έK? ? | ||
24 | \I!? [?ں]?"?bv?Sԍ?Kg?a/?Na|V?R? i?$l hW?#xZ? | ||
25 | i9?So*S?=?X\Ը? ;I? በ?#_s??;?()a\? ni?@by?"s?a?,B?fi݈?h;??\߿?@K ?s1?5r? =R? ^gV? R*??Ȭ?<x?qe?*?k?(A?&\?$,?t9;q?v'}?63g?$ 3J? 8̡5?\-t?Ԥ^?`$np?פ?Ls?~Z?CKf? ;K?"GJ6? c3c??>U?bA?!qv?*D?=Ҭ? h$?ds?#ڸg+N?"6T`+K? C]r?$_^?v9?u?:E5;??A<uH?6r?W?>lv?X?x-?'?!? |<x?r?UCsYS? | ||
26 | kz? cO?Z+y? T | ||
27 | ? $S?j|?%?f ?C?mx?(J?%ljMݰ???" |