Ignore:
Timestamp:
Mar 29, 2019 10:35:52 AM (5 years ago)
Author:
knoop
Message:

Moved ocean_prognostic_equations calls into module_interface

File:
1 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/SOURCE/module_interface.f90

    r3837 r3840  
    240240               ocean_init,                                                     &
    241241               ocean_header,                                                   &
     242               ocean_prognostic_equations,                                     &
    242243               ocean_swap_timelevel,                                           &
    243244               ocean_3d_data_averaging,                                        &
     
    907908
    908909    IF ( gust_module_enabled )  CALL gust_prognostic_equations()
     910    IF ( ocean_mode          )  CALL ocean_prognostic_equations()
    909911
    910912
     
    927929
    928930    IF ( gust_module_enabled )  CALL gust_prognostic_equations( i, j, i_omp_start, tn )
     931    IF ( ocean_mode          )  CALL ocean_prognostic_equations( i, j, i_omp_start, tn )
    929932
    930933
Note: See TracChangeset for help on using the changeset viewer.