23 |
C |
C |
24 |
C Arguments: |
C Arguments: |
25 |
C |
C |
26 |
C fName string base name for file to read |
C fName (string) :: base name for file to read |
27 |
C filePrec integer number of bits per word in file (32 or 64) |
C filePrec (integer) :: number of bits per word in file (32 or 64) |
28 |
C arrType char(2) declaration of "arr": either "RS" or "RL" |
C arrType (char(2)) :: type of array "arr": either "RS" or "RL" |
29 |
C nNz integer size of third dimension: normally either 1 or Nr |
C nNz (integer) :: size of third dimension: normally either 1 or Nr |
30 |
C arr RS/RL array to read into, arr(:,:,nNz,:,:) |
C arr (RS/RL) :: array to read into, arr(:,:,nNz,:,:) |
31 |
C irecord integer record number to read |
C irecord (integer) :: record number to read |
32 |
C myThid integer thread identifier |
C myThid (integer) :: thread identifier |
33 |
C |
C |
34 |
C MDSREADFIELD first checks to see if the file "fName" exists, then |
C MDSREADFIELD first checks to see if the file "fName" exists, then |
35 |
C if the file "fName.data" exists and finally the tiled files of the |
C if the file "fName.data" exists and finally the tiled files of the |
416 |
C |
C |
417 |
C Arguments: |
C Arguments: |
418 |
C |
C |
419 |
C fName string base name for file to written |
C fName (string) :: base name for file to write |
420 |
C filePrec integer number of bits per word in file (32 or 64) |
C filePrec (integer) :: number of bits per word in file (32 or 64) |
421 |
C arrType char(2) declaration of "arr": either "RS" or "RL" |
C arrType (char(2)) :: type of array "arr": either "RS" or "RL" |
422 |
C nNz integer size of third dimension: normally either 1 or Nr |
C nNz (integer) :: size of third dimension: normally either 1 or Nr |
423 |
C arr RS/RL array to write, arr(:,:,nNz,:,:) |
C arr (RS/RL) :: array to write, arr(:,:,nNz,:,:) |
424 |
C irecord integer record number to read |
C irecord (integer) :: record number to write |
425 |
C myIter integer time step number |
C myIter (integer) :: time step number |
426 |
C myThid integer thread identifier |
C myThid (integer) :: thread identifier |
427 |
C |
C |
428 |
C MDSWRITEFIELD creates either a file of the form "fName.data" and |
C MDSWRITEFIELD creates either a file of the form "fName.data" and |
429 |
C "fName.meta" if the logical flag "globalFile" is set true. Otherwise |
C "fName.meta" if the logical flag "globalFile" is set true. Otherwise |
783 |
C |
C |
784 |
C Arguments: |
C Arguments: |
785 |
C |
C |
786 |
C fName string base name for file to read |
C fName (string) :: base name for file to read |
787 |
C filePrec integer number of bits per word in file (32 or 64) |
C filePrec (integer) :: number of bits per word in file (32 or 64) |
788 |
C arrType char(2) declaration of "arr": either "RS" or "RL" |
C arrType (char(2)) :: type of array "arr": either "RS" or "RL" |
789 |
C nNz integer size of third dimension: normally either 1 or Nr |
C nNz (integer) :: size of third dimension: normally either 1 or Nr |
790 |
C arr RS/RL array to read into, arr(:,:,nNz,:,:) |
C arr (RS/RL) :: array to read into, arr(:,:,nNz,:,:) |
791 |
C irecord integer record number to read |
C irecord (integer) :: record number to read |
792 |
C myThid integer thread identifier |
C myThid (integer) :: thread identifier |
793 |
C |
C |
794 |
C MDSREADFIELD first checks to see if the file "fName" exists, then |
C MDSREADFIELD first checks to see if the file "fName" exists, then |
795 |
C if the file "fName.data" exists and finally the tiled files of the |
C if the file "fName.data" exists and finally the tiled files of the |
1177 |
C |
C |
1178 |
C Arguments: |
C Arguments: |
1179 |
C |
C |
1180 |
C fName string base name for file to written |
C fName (string) :: base name for file to write |
1181 |
C filePrec integer number of bits per word in file (32 or 64) |
C filePrec (integer) :: number of bits per word in file (32 or 64) |
1182 |
C arrType char(2) declaration of "arr": either "RS" or "RL" |
C arrType (char(2)) :: type of array "arr": either "RS" or "RL" |
1183 |
C nNz integer size of third dimension: normally either 1 or Nr |
C nNz (integer) :: size of third dimension: normally either 1 or Nr |
1184 |
C arr RS/RL array to write, arr(:,:,nNz,:,:) |
C arr (RS/RL) :: array to write, arr(:,:,nNz,:,:) |
1185 |
C irecord integer record number to read |
C irecord (integer) :: record number to write |
1186 |
C myIter integer time step number |
C myIter (integer) :: time step number |
1187 |
C myThid integer thread identifier |
C myThid (integer) :: thread identifier |
1188 |
C |
C |
1189 |
C MDSWRITEFIELD creates either a file of the form "fName.data" and |
C MDSWRITEFIELD creates either a file of the form "fName.data" and |
1190 |
C "fName.meta" if the logical flag "globalFile" is set true. Otherwise |
C "fName.meta" if the logical flag "globalFile" is set true. Otherwise |