64 |
&' /* Reference salinity profile ( ppt ) */') |
&' /* Reference salinity profile ( ppt ) */') |
65 |
CALL WRITE_1D_R8( viscAh, 1, INDEX_NONE,'viscAh =', |
CALL WRITE_1D_R8( viscAh, 1, INDEX_NONE,'viscAh =', |
66 |
&' /* Lateral eddy viscosity ( m^2/s ) */') |
&' /* Lateral eddy viscosity ( m^2/s ) */') |
67 |
|
CALL WRITE_1D_R8( viscA4, 1, INDEX_NONE,'viscAh =', |
68 |
|
&' /* Lateral biharmonic viscosity ( m^4/s ) */') |
69 |
CALL WRITE_1D_R8( viscAz, 1, INDEX_NONE,'viscAz =', |
CALL WRITE_1D_R8( viscAz, 1, INDEX_NONE,'viscAz =', |
70 |
&' /* Vertical eddy viscosity ( m^2/s ) */') |
&' /* Vertical eddy viscosity ( m^2/s ) */') |
71 |
CALL WRITE_1D_R8( diffKhT, 1, INDEX_NONE,'diffKhT =', |
CALL WRITE_1D_R8( diffKhT, 1, INDEX_NONE,'diffKhT =', |