Explicit Intent

A general procedure call can generate two remappings per argument:

• on procedure entry,
• on procedure exit.

If remapping is essential then give the INTENT of the arguments:

  INTEGER, DIMENSION(512,512), INTENT(IN)  :: iarg1
  INTEGER, DIMENSION(512,512), INTENT(OUT) :: iarg2

Now each dummy would only be remapped once. NA Software execution time is now 14.7s compared to 25.00s without the INTENT.

Motto:

For more information, click here