Welcome, Guest
Username: Password: Remember me
Forgot your password? Forgot your username? Create an account
Forum
System Modules
TELEMAC-2D
invalid memory reference
Flat Threaded
  • Page:
  • 1
  • 2

TOPIC: invalid memory reference

invalid memory reference 10 years 13 hours ago #14930

  • jmhervouet
  • jmhervouet's Avatar
You are still changing TSCEXP, not TEXP...
The administrator has disabled public write access.

invalid memory reference 10 years 13 hours ago #14931

  • zqzuoan
  • zqzuoan's Avatar
oh,sorry,I have attached the wrong program.
EXPLICIT SOURCE TERMS
!
DO ITRAC=1,NTRAC
CALL OS('X=0 ',X=TSCEXP%ADR(ITRAC)%P)
CALL OS('X=0 ',X=TEXP%ADR(ITRAC)%P)
MASSOU(ITRAC) = 0.D0
ENDDO
do I=1,HPROP%DIM1 !2014-11-25
TEXP%ADR(ITRAC)%P%R(I)=TEXP%ADR(ITRAC)%P%R(I)+1.D0
enddo
YASMI(ITRAC)=.FALSE.

But the program showed the same error
The administrator has disabled public write access.

invalid memory reference 10 years 12 hours ago #14933

  • jmhervouet
  • jmhervouet's Avatar
Hello,

Your loop for filling TEXP is not in a loop on NTRAC, so ITRAC is not defined, try instead, more simply:

DO ITRAC=1,NTRAC
CALL OS('X=0 ',X=TSCEXP%ADR(ITRAC)%P)
CALL OS('X=C ',X=TEXP%ADR(ITRAC)%P,C=1.D0)
MASSOU(ITRAC) = 0.D0
ENDDO

Regards,

JMH
The administrator has disabled public write access.

invalid memory reference 10 years 12 hours ago #14936

  • zqzuoan
  • zqzuoan's Avatar
Oh,I see. Thanks a lot. :cheer:
The administrator has disabled public write access.
Flat Threaded
  • Page:
  • 1
  • 2
Moderators: pham
Forum
System Modules
TELEMAC-2D
invalid memory reference

The open TELEMAC-MASCARET template for Joomla!2.5, the HTML 4 version.