The "multiplication (*)" in the group is simply performing them after one another.(adsbygoogle = window.adsbygoogle || []).push({});

Take 6 coloured balls. Permute the first and third one. Now permute the third and fifth one (note: by third one I mean the one in the third position, not the third ball which is not in the first position).

You have just composed the permutations (13) and (35). In effect, you have moved the first one to the fifth, the fifth one to the third and the third one to the first, so in cycle notation:

(35) * (13) = (153).

(where the composition o is to be read as: "after").

Then as in any group, a power is simply composing the permutation with itself, e.g.

(13)**2 = (13) * (13) = 1

(153)**2 = (153)(153) = (135)

and working out the order is simply composing until you get the identity, e.g.

(153)**3 = (135)(153) = 1

To print out either do multiplication and take power, they all equal to identity number.

What I can do now is.

first ball

integer x(6)

integer i;

do i = 1,6,1

x(i) =i

end do

finish permutation, if x(i) is 1,2,3,4,5,6 then identity=1

integer flag

flag = 1 ！first ball

do i = 1,6,1

if ( x(i) .NE. i ) then

flag = 0

end if

end do

if flag .EQ. 1 identity=1

But I don't know how to create Do Loops, IF block, and Subroutine to To print out either do multiplication and take power, they all equal to identity number.

Can any one help me please.

**Physics Forums - The Fusion of Science and Community**

Join Physics Forums Today!

The friendliest, high quality science and math community on the planet! Everyone who loves science is here!

The friendliest, high quality science and math community on the planet! Everyone who loves science is here!

# Fortran Help, Please. Waiting online.

Loading...

Similar Threads - Fortran Help Please | Date |
---|---|

I need help in Fortran please -- Bairstow's method & Newton-Raphson | Nov 26, 2016 |

Please, Help with Data Reading in Fortran | May 30, 2015 |

Fortran 90 Error Please help | Apr 6, 2015 |

Please help FORTRAN | Feb 13, 2012 |

How to run Fortran program on the website? Please help | Dec 22, 2011 |

**Physics Forums - The Fusion of Science and Community**