Changeset 544 for trunk/NEMO/OPA_SRC/opa.F90
- Timestamp:
- 2006-10-20T16:23:21+02:00 (18 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMO/OPA_SRC/opa.F90
r532 r544 349 349 !! * Local declarations 350 350 351 NAMELIST/namflg/ ln_dynhpg_imp 351 NAMELIST/namflg/ ln_dynhpg_imp, nn_dynhpg_rst 352 352 !!---------------------------------------------------------------------- 353 353 … … 449 449 WRITE(numout,*) ' centered (F) or semi-implicit (T) ln_dynhpg_imp = ', ln_dynhpg_imp 450 450 WRITE(numout,*) ' hydrostatic pressure gradient' 451 ENDIF 451 WRITE(numout,*) ' add dynhpg implicit variable nn_dynhpg_rst = ', nn_dynhpg_rst 452 WRITE(numout,*) ' in restart ot not nn_dynhpg_rst' 453 ENDIF 454 IF( .NOT. ln_dynhpg_imp ) nn_dynhpg_rst = 0 ! force no adding dynhpg implicit variables in restart 452 455 453 456 END SUBROUTINE opa_flg
Note: See TracChangeset
for help on using the changeset viewer.