Changeset 13451 for branches/UKMO/AMM15_v3_6_STABLE_package_collate_utils366_fabmv1/NEMOGCM/NEMO/TOP_SRC/FABM/trcini_fabm.F90
- Timestamp:
- 2020-09-07T18:50:53+02:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/AMM15_v3_6_STABLE_package_collate_utils366_fabmv1/NEMOGCM/NEMO/TOP_SRC/FABM/trcini_fabm.F90
r13241 r13451 484 484 IMPLICIT NONE 485 485 486 CHARACTER(LEN= 256), INTENT(IN) :: state_name487 488 INTEGER 486 CHARACTER(LEN=*), INTENT(IN) :: state_name 487 488 INTEGER :: jn 489 489 490 490 !!---------------------------------------------------------------------- … … 516 516 IMPLICIT NONE 517 517 518 CHARACTER(LEN= 256), INTENT(IN) :: diag_name519 520 INTEGER 518 CHARACTER(LEN=*), INTENT(IN) :: diag_name 519 520 INTEGER :: jn 521 521 522 522 !!----------------------------------------------------------------------
Note: See TracChangeset
for help on using the changeset viewer.