a newbe question

Hi All,
I have a newbe question: how should I embed for loops one into another?
I am rewriting some mupad code into maxima and I came to this:

for i from 1 to 4 do
      for j from 1 to 4 do
           hx[i,j] := diff( H, state[1,i], state[1,j] );
           h2[i,j] := subs( hx[i,j], q1=q10, q2=q20, p1=p10, p2=p20 );
      end_for;
end_for;

Can somebody give me an idea how to implement it into maxima?
Thanks a lot.
Marek