Fortran 90/95 and Computational Physics

More documents

Recommendations

Info

External SubroutinesSUBROUTINE area_rectangle(l,b,A)USE constantsIMPLICIT NONEREAL(long), DIMENSION(:,:), INTENT(IN) :: l,bREAL(long), DIMENSION(size(l,1), size(l,2)) :: AA = l*bEND SUBROUTINE area_rectangleFortran 90/95 and Computational Physics – p.17/22
External Subroutines - cont.PROGRAM subr_exampleUSE constantsIMPLICIT NONEINTERFACESUBROUTINE area_rectangle(l,b,A)USE constantsIMPLICIT NONEREAL(long), DIMENSION(:,:), INTENT(IN):: l,bREAL(long), DIMENSION(size(l,1), size(l,2)), INTENT(OUT) :: AEND SUBROUTINE area_rectangleEND INTERFACEREAL(long), DIMENSION(2,2) :: l,b,Al = 1D0; b = 2D0CALL area_rectangle(l,b,A);print*, AEND PROGRAM subr_exampleFortran 90/95 and Computational Physics – p.18/22
Page 1 and 2: Fortran 90/95 and ComputationalPhys
Page 3 and 4: What is Fortran 90?Fortran 90/95 an
Page 5 and 6: The OriginA team lead by John Backu
Page 7 and 8: Why Fortran 90?Fortran 90/95 and Co
Page 9 and 10: Numerical LibrariesFortran has been
Page 11 and 12: The ConstructsF90 has many familiar
Page 17 and 18: IMPLICIT NONEStrong typing: all typ
Page 19 and 20: Modules - Another ExampleMODULE cir
Page 21: Array FeaturesPROGRAM arrayUSE cons
Page 25 and 26: External Subroutines - cont.Externa
Page 27 and 28: External Subroutines - cont.Externa
Page 29 and 30: SummaryFortran has from the beginni

Fortran 90/95 and Computational Physics

You also want an ePaper? Increase the reach of your titles

Delete template?

Save as template?