Changeset 1923
- Timestamp:
- 2010-06-09T10:46:19+02:00 (14 years ago)
- Location:
- trunk/NEMO
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMO/LIM_SRC_2/limmsh_2.F90
r1694 r1923 66 66 ENDIF 67 67 68 IF( jphgr_msh == 2 .OR. jphgr_msh == 3 .OR. jphgr_msh == 5 ) & 69 & CALL ctl_stop(' Coriolis parameter in LIM not set for f- or beta-plane' ) 70 68 71 !---------------------------------------------------------- 69 72 ! Initialization of local and some global (common) variables -
trunk/NEMO/LIM_SRC_3/limmsh.F90
r1694 r1923 53 53 WRITE(numout,*) '~~~~~~~' 54 54 ENDIF 55 56 IF( jphgr_msh == 2 .OR. jphgr_msh == 3 .OR. jphgr_msh == 5 ) & 57 & CALL ctl_stop(' Coriolis parameter in LIM not set for f- or beta-plane' ) 55 58 56 59 ! !== coriolis factor & Equator position ==!
Note: See TracChangeset
for help on using the changeset viewer.