Author Topic: Bugs in pmacr2.f?  (Read 5641 times)

Ziyu

  • Jr. Member
  • **
  • Posts: 27
Bugs in pmacr2.f?
« on: May 03, 2013, 11:29:02 AM »
Hi,

If you look at the line 871-872 under commands [newf] and [newf, zero]:

            do n = i,nneq-1,ndf
              hr(np(28)+i+2*nneq) = 0.0d0  ! f0(n,1) = fixed forces
              hr(np(28)+i+3*nneq) = 0.0d0  ! f0(n,2) = fixed displacements
            end do ! n

It seems like the loop index i  in hr(np(28)+i+2*nneq) and hr(np(28)+i+3*nneq) = 0.0d0 should be replaced with n.

Best,

Ziyu



« Last Edit: May 07, 2013, 08:56:03 AM by Ziyu »

Prof. R.L. Taylor

  • Administrator
  • FEAP Guru
  • *****
  • Posts: 2649
Re: Bugs in pmacr2.f?
« Reply #1 on: May 04, 2013, 05:21:55 PM »
You are correct, thank you