/[MITgcm]/MITgcm/eesupp/src/print.F
ViewVC logotype

Diff of /MITgcm/eesupp/src/print.F

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.22 by adcroft, Mon Feb 23 20:04:27 2004 UTC revision 1.23 by edhill, Sat Mar 27 03:51:51 2004 UTC
# Line 29  C     !INTERFACE: Line 29  C     !INTERFACE:
29    
30  C     !DESCRIPTION:  C     !DESCRIPTION:
31  C     *============================================================*  C     *============================================================*
32  C     | SUBROUTINE PRINT_ERROR                                        C     | SUBROUTINE PRINT\_ERROR                                      
33  C     | o Write out error message using "standard" format.            C     | o Write out error message using "standard" format.          
34  C     *============================================================*  C     *============================================================*
35  C     | Notes                                                        C     | Notes                                                      
36  C     | =====                                                        C     | =====                                                      
37  C     | o Some system   I/O is not "thread-safe". For this reason    C     | o Some system   I/O is not "thread-safe". For this reason  
38  C     |   without the FMTFTN_IO_THREAD_SAFE directive set a          C     |   without the FMTFTN\_IO\_THREAD\_SAFE directive set a        
39  C     |   critical region is defined around the write here. In some  C     |   critical region is defined around the write here. In some
40  C     |   cases  BEGIN_CRIT() is approximated by only doing writes    C     |   cases  BEGIN\_CRIT() is approximated by only doing writes  
41  C     |   for thread number 1 - writes for other threads are          C     |   for thread number 1 - writes for other threads are        
42  C     |   ignored!                                                    C     |   ignored!                                                  
43  C     | o In a non-parallel form these routines are still used    C     | o In a non-parallel form these routines are still used  
# Line 142  C     !INTERFACE: Line 142  C     !INTERFACE:
142        IMPLICIT NONE        IMPLICIT NONE
143  C     !DESCRIPTION:  C     !DESCRIPTION:
144  C     *==========================================================*  C     *==========================================================*
145  C     | o SUBROUTINE PRINT_LIST_I                                  C     | o SUBROUTINE PRINT\_LIST\_I                                
146  C     *==========================================================*  C     *==========================================================*
147  C     | Routine for producing list of values for a field with      C     | Routine for producing list of values for a field with    
148  C     | duplicate values collected into                            C     | duplicate values collected into                          
149  C     |    n @ value                                                C     |    n \@ value                                              
150  C     | record.                                                    C     | record.                                                  
151  C     *==========================================================*  C     *==========================================================*
152    
# Line 263  C     !INTERFACE: Line 263  C     !INTERFACE:
263        IMPLICIT NONE        IMPLICIT NONE
264  C     !DESCRIPTION:  C     !DESCRIPTION:
265  C     *==========================================================*  C     *==========================================================*
266  C     | o SUBROUTINE PRINT_LIST_L                                  C     | o SUBROUTINE PRINT\_LIST\_L                                
267  C     *==========================================================*  C     *==========================================================*
268  C     | Routine for producing list of values for a field with      C     | Routine for producing list of values for a field with    
269  C     | duplicate values collected into                            C     | duplicate values collected into                          
270  C     |    n @ value                                                C     |    n \@ value                                              
271  C     | record.                                                    C     | record.                                                  
272  C     *==========================================================*  C     *==========================================================*
273    
# Line 383  C     !INTERFACE: Line 383  C     !INTERFACE:
383        IMPLICIT NONE        IMPLICIT NONE
384  C     !DESCRIPTION:  C     !DESCRIPTION:
385  C     *==========================================================*  C     *==========================================================*
386  C     | o SUBROUTINE PRINT_LIST_R8                                  C     | o SUBROUTINE PRINT\_LIST\_R8                                
387  C     *==========================================================*  C     *==========================================================*
388  C     | Routine for producing list of values for a field with      C     | Routine for producing list of values for a field with    
389  C     | duplicate values collected into                            C     | duplicate values collected into                          
390  C     |    n @ value                                                C     |    n \@ value                                              
391  C     | record.                                                    C     | record.                                                  
392  C     *==========================================================*  C     *==========================================================*
393    
# Line 510  C     !INTERFACE: Line 510  C     !INTERFACE:
510        IMPLICIT NONE        IMPLICIT NONE
511  C     !DESCRIPTION:  C     !DESCRIPTION:
512  C     *==========================================================*  C     *==========================================================*
513  C     | SUBROUTINE PRINT_MAPR4                                      C     | SUBROUTINE PRINT\_MAPR4                                    
514  C     | o Does textual mapping printing of a field.                C     | o Does textual mapping printing of a field.              
515  C     *==========================================================*  C     *==========================================================*
516  C     | This routine does the actual formatting of the data        C     | This routine does the actual formatting of the data      
517  C     | and printing to a file. It assumes an array using the      C     | and printing to a file. It assumes an array using the    
518  C     | MITgcm UV indexing scheme and base index variables.        C     | MITgcm UV indexing scheme and base index variables.      
519  C     | User code should call an interface routine like            C     | User code should call an interface routine like          
520  C     | PLOT_FIELD_XYR4( ... ) rather than this code directly.      C     | PLOT\_FIELD\_XYR4( ... ) rather than this code directly.    
521  C     | Text plots can be oriented XY, YZ, XZ. An orientation      C     | Text plots can be oriented XY, YZ, XZ. An orientation    
522  C     | is specficied through the "plotMode" argument. All the      C     | is specficied through the "plotMode" argument. All the    
523  C     | plots made by a single call to this routine will use the    C     | plots made by a single call to this routine will use the  
524  C     | same contour interval. The plot range (iMin,...,byStr)      C     | same contour interval. The plot range (iMin,...,byStr)    
525  C     | can be three-dimensional. A separate plot is made for      C     | can be three-dimensional. A separate plot is made for    
526  C     | each point in the plot range normal to the orientation.    C     | each point in the plot range normal to the orientation.  
527  C     | e.g. if the orientation is XY (plotMode = PRINT_MAP_XY).    C     | e.g. if the orientation is XY (plotMode = PRINT\_MAP\_XY).  
528  C     |      kMin =1, kMax = 5 and kStr = 2 will produce three XY  C     |      kMin =1, kMax = 5 and kStr = 2 will produce three XY
529  C     |      plots - one for K=1, one for K=3 and one for K=5.      C     |      plots - one for K=1, one for K=3 and one for K=5.    
530  C     |      Each plot would have extents iMin:iMax step iStr      C     |      Each plot would have extents iMin:iMax step iStr    
# Line 934  C     !INTERFACE: Line 934  C     !INTERFACE:
934    
935  C     !DESCRIPTION:  C     !DESCRIPTION:
936  C     *==========================================================*  C     *==========================================================*
937  C     | SUBROUTINE PRINT_MAPRL                                      C     | SUBROUTINE PRINT\_MAPRL                                    
938  C     | o Does textual mapping printing of a field.                C     | o Does textual mapping printing of a field.              
939  C     *==========================================================*  C     *==========================================================*
940  C     | This routine does the actual formatting of the data        C     | This routine does the actual formatting of the data      
941  C     | and printing to a file. It assumes an array using the      C     | and printing to a file. It assumes an array using the    
942  C     | MITgcm UV indexing scheme and base index variables.        C     | MITgcm UV indexing scheme and base index variables.      
943  C     | User code should call an interface routine like            C     | User code should call an interface routine like          
944  C     | PLOT_FIELD_XYR8( ... ) rather than this code directly.      C     | PLOT\_FIELD\_XYR8( ... ) rather than this code directly.    
945  C     | Text plots can be oriented XY, YZ, XZ. An orientation      C     | Text plots can be oriented XY, YZ, XZ. An orientation    
946  C     | is specficied through the "plotMode" argument. All the      C     | is specficied through the "plotMode" argument. All the    
947  C     | plots made by a single call to this routine will use the    C     | plots made by a single call to this routine will use the  
948  C     | same contour interval. The plot range (iMin,...,byStr)      C     | same contour interval. The plot range (iMin,...,byStr)    
949  C     | can be three-dimensional. A separate plot is made for      C     | can be three-dimensional. A separate plot is made for    
950  C     | each point in the plot range normal to the orientation.    C     | each point in the plot range normal to the orientation.  
951  C     | e.g. if the orientation is XY (plotMode = PRINT_MAP_XY).    C     | e.g. if the orientation is XY (plotMode = PRINT\_MAP\_XY).  
952  C     |      kMin =1, kMax = 5 and kStr = 2 will produce three XY  C     |      kMin =1, kMax = 5 and kStr = 2 will produce three XY
953  C     |      plots - one for K=1, one for K=3 and one for K=5.      C     |      plots - one for K=1, one for K=3 and one for K=5.    
954  C     |      Each plot would have extents iMin:iMax step iStr      C     |      Each plot would have extents iMin:iMax step iStr    
# Line 1349  C     !INTERFACE: Line 1349  C     !INTERFACE:
1349        IMPLICIT NONE        IMPLICIT NONE
1350  C     !DESCRIPTION:  C     !DESCRIPTION:
1351  C     *============================================================*  C     *============================================================*
1352  C     | SUBROUTINE PRINT_MESSAGE                                      C     | SUBROUTINE PRINT\_MESSAGE                                    
1353  C     | o Write out informational message using "standard" format.    C     | o Write out informational message using "standard" format.  
1354  C     *============================================================*  C     *============================================================*
1355  C     | Notes                                                        C     | Notes                                                      
1356  C     | =====                                                        C     | =====                                                      
1357  C     | o Some system   I/O is not "thread-safe". For this reason    C     | o Some system   I/O is not "thread-safe". For this reason  
1358  C     |   without the FMTFTN_IO_THREAD_SAFE directive set a          C     |   without the FMTFTN\_IO\_THREAD\_SAFE directive set a        
1359  C     |   critical region is defined around the write here. In some  C     |   critical region is defined around the write here. In some
1360  C     |   cases  BEGIN_CRIT() is approximated by only doing writes    C     |   cases  BEGIN\_CRIT() is approximated by only doing writes  
1361  C     |   for thread number 1 - writes for other threads are          C     |   for thread number 1 - writes for other threads are        
1362  C     |   ignored!                                                    C     |   ignored!                                                  
1363  C     | o In a non-parallel form these routines can still be used.    C     | o In a non-parallel form these routines can still be used.  
Legend:
Removed from v.1.22  
changed lines
  Added in v.1.23
  ViewVC Help
Powered by ViewVC 1.1.22