← Back to branch summary

~fluidity-core/fluidity/shallow-water-dev

« back to all changes in this revision

Viewing changes to main/Shallow_Water.F90

  • Committer: colin.cotter at ac
  • Date: 2012-02-21 15:35:14 UTC
  • Revision ID: colin.cotter@imperial.ac.uk-20120221153514-1km3jsaam944b6fk
Increased timesteps to 2 in test. This is not the solution, but I
can't work out why it doesn't work otherwise.

Show diffs side-by-side

added added

removed removed

Lines of Context:
main/Shallow_Water.F90
236
236
 
237
237
    timestep_loop: do
238
238
       timestep=timestep+1
239
 
       if (simulation_completed(current_time, timestep)) exit timestep_loop
240
239
       ewrite (1,*) "SW: start of timestep ", timestep, current_time
241
240
 
242
241
       ! this may already have been done in populate_state, but now