/[MITgcm]/MITgcm/pkg/obcs/obcs_check.F
ViewVC logotype

Diff of /MITgcm/pkg/obcs/obcs_check.F

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

revision 1.4 by heimbach, Wed Sep 22 21:31:35 2004 UTC revision 1.5 by jmc, Thu Sep 23 01:28:31 2004 UTC
# Line 76  C     msgBuf      - Informational/error Line 76  C     msgBuf      - Informational/error
76       &   'OBCS_CHECK: ERROR: useOBCSprescribe = .TRUE. for'       &   'OBCS_CHECK: ERROR: useOBCSprescribe = .TRUE. for'
77           CALL PRINT_ERROR( msgBuf , 1)           CALL PRINT_ERROR( msgBuf , 1)
78           WRITE(msgBuf,'(A)')           WRITE(msgBuf,'(A)')
79       &   'OBCS_CHECK: undef ALLOW_OBCS_PRESCRIBE       &   'OBCS_CHECK: undef ALLOW_OBCS_PRESCRIBE'
80           STOP 'ABNORMAL END: S/R OBCS_CHECK'           STOP 'ABNORMAL END: S/R OBCS_CHECK'
81          ENDIF          ENDIF
82  #endif  #endif
Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5
  ViewVC Help
Powered by ViewVC 1.1.22