title: Abaqus DISP Subroutine
body: <p>Currently I'm writing a subroutine <code>DISP</code> in <code>fortran</code>, I'm new to this. In this code I want to read a file for which I use </p>
  
  <pre><code>OPEN(UNIT = 1, FILE = "abcd.txt", FORM = "FORMATTED", STATUS = "OLD", ACTION = "READ")
  </code></pre>
  
  <p>These files contains values in a nxm Matrix. I want to assign the values in this matrix like for example <code>column 5 = displacement</code>, and <code>column 1 = nodes</code>.</p>
  
  <p>Can I declare an array like <code>REAL,DIMENSION(n,m)::A</code> and then with <code>DO LOOP</code> assign values to <code>NODES</code> and <code>U(1)</code> which are already the parameters declared in the subroutine?</p>
  
  <pre><code>SUBROUTINE DISP(U,KSTEP,KINC,TIME,NODE,NOEL,JDOF,COORDS)
  </code></pre>