← Back to branch summary

~fluidity-core/fluidity/sea-ice-branch

« back to all changes in this revision

Viewing changes to femtools/Parallel_fields.F90

  • Committer: Simon Mouradian
  • Date: 2012-10-19 10:35:59 UTC
  • mfrom: (3520.32.371 fluidity)
  • Revision ID: simon.mouradian06@imperial.ac.uk-20121019103559-y36qa47phc69q8sc
merge from trunk

Show diffs side-by-side

added added

removed removed

Lines of Context:
femtools/Parallel_fields.F90
284
284
    !!< Return .true. if ELEMENT_NUMBER has a neighbour in MESH that
285
285
    !!< is owned by this process otherwise .false.
286
286
 
287
 
    !! Effectively, this computes whether ELEMENT_NUMBER is in the L1
288
 
    !! halo.
 
287
    !! Note, you cannot use this function to compute if
 
288
    !! ELEMENT_NUMBER is owned.  Imagine if this is the only owned
 
289
    !! element on a process, then none of the neighbours will be owned.
 
290
    !! You can use this function to compute whether ELEMENT_NUMBER is
 
291
    !! in the L1 element halo.
289
292
    type(mesh_type), intent(in) :: mesh
290
293
    integer, intent(in) :: element_number
291
294
    logical :: owned
311
314
    !!< Return .true. if ELEMENT_NUMBER has a neighbour in FIELD that
312
315
    !!< is owned by this process otherwise .false.
313
316
 
314
 
    !! Effectively, this computes whether ELEMENT_NUMBER is in the L1
315
 
    !! halo.
 
317
    !! Note, you cannot use this function to compute if
 
318
    !! ELEMENT_NUMBER is owned.  Imagine if this is the only owned
 
319
    !! element on a process, then none of the neighbours will be owned.
 
320
    !! You can use this function to compute whether ELEMENT_NUMBER is
 
321
    !! in the L1 element halo.
316
322
    type(scalar_field), intent(in) :: field
317
323
    integer, intent(in) :: element_number
318
324
    logical :: owned
324
330
    !!< Return .true. if ELEMENT_NUMBER has a neighbour in FIELD that
325
331
    !!< is owned by this process otherwise .false.
326
332
 
327
 
    !! Effectively, this computes whether ELEMENT_NUMBER is in the L1
328
 
    !! halo.
 
333
    !! Note, you cannot use this function to compute if
 
334
    !! ELEMENT_NUMBER is owned.  Imagine if this is the only owned
 
335
    !! element on a process, then none of the neighbours will be owned.
 
336
    !! You can use this function to compute whether ELEMENT_NUMBER is
 
337
    !! in the L1 element halo.
329
338
    type(vector_field), intent(in) :: field
330
339
    integer, intent(in) :: element_number
331
340
    logical :: owned
337
346
    !!< Return .true. if ELEMENT_NUMBER has a neighbour in FIELD that
338
347
    !!< is owned by this process otherwise .false.
339
348
 
340
 
    !! Effectively, this computes whether ELEMENT_NUMBER is in the L1
341
 
    !! halo.
 
349
    !! Note, you cannot use this function to compute if
 
350
    !! ELEMENT_NUMBER is owned.  Imagine if this is the only owned
 
351
    !! element on a process, then none of the neighbours will be owned.
 
352
    !! You can use this function to compute whether ELEMENT_NUMBER is
 
353
    !! in the L1 element halo.
342
354
    type(tensor_field), intent(in) :: field
343
355
    integer, intent(in) :: element_number
344
356
    logical :: owned