Changeset 7041 for branches/2016/dev_r7012_ROBUST5_CNRS/NEMOGCM/NEMO/TOP_SRC/PISCES/trcsms_pisces.F90
- Timestamp:
- 2016-10-19T12:55:07+02:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2016/dev_r7012_ROBUST5_CNRS/NEMOGCM/NEMO/TOP_SRC/PISCES/trcsms_pisces.F90
r4147 r7041 7 7 !! 2.0 ! 2007-12 (C. Ethe, G. Madec) F90 8 8 !!---------------------------------------------------------------------- 9 #if defined key_pisces || defined key_pisces_reduced9 #if defined key_pisces 10 10 !!---------------------------------------------------------------------- 11 11 !! 'key_pisces' PISCES bio-model … … 14 14 !!---------------------------------------------------------------------- 15 15 USE par_pisces 16 USE sms_pisces 16 17 USE p4zsms 17 18 USE p2zsms … … 48 49 !!--------------------------------------------------------------------- 49 50 ! 50 IF( l k_p4z ) THEN ; CALL p4z_sms( kt ) ! PISCES51 IF( ln_p4z ) THEN ; CALL p4z_sms( kt ) ! PISCES 51 52 ELSE ; CALL p2z_sms( kt ) ! LOBSTER 52 53 ENDIF
Note: See TracChangeset
for help on using the changeset viewer.