[ < ] | [ > ] |  | [ << ] | [ Up ] | [ >> ] |  |  |  |  | [Top] | [Contents] | [Index] | [ ? ]

# 51. f90

[ < ] | [ > ] |  | [ << ] | [ Up ] | [ >> ] |  |  |  |  | [Top] | [Contents] | [Index] | [ ? ]

## 51.1 Functions and Variables for f90

Function: f90 (expr)

  The `f90` command is an update to the original maxima `fortran` command. The primary difference is the way long lines are broken.

  In the next example, notice how the `fortran` command breaks lines within symbols. The `f90` command never breaks within a symbol.

      (%i1) load("f90")$

      (%i2) expr:expand((xxx+yyy+7)^4);
               4            3         3        2    2
      (%o2) yyy  + 4 xxx yyy  + 28 yyy  + 6 xxx  yyy
                   2          2        3             2
       + 84 xxx yyy  + 294 yyy  + 4 xxx  yyy + 84 xxx  yyy
                                     4         3          2
       + 588 xxx yyy + 1372 yyy + xxx  + 28 xxx  + 294 xxx
       + 1372 xxx + 2401
      (%i3) fortran(expr);
            yyy**4+4*xxx*yyy**3+28*yyy**3+6*xxx**2*yyy**2+84*xxx*yyy**2+294*yy
           1   y**2+4*xxx**3*yyy+84*xxx**2*yyy+588*xxx*yyy+1372*yyy+xxx**4+28*
           2   xxx**3+294*xxx**2+1372*xxx+2401
      (%o3)                       done
      (%i4) f90(expr);
      yyy**4+4*xxx*yyy**3+28*yyy**3+6*xxx**2*yyy**2+84*xxx*yyy**2+294* &
           yyy**2+4*xxx**3*yyy+84*xxx**2*yyy+588*xxx*yyy+1372*yyy+xxx** &
           4+28*xxx**3+294*xxx**2+1372*xxx+2401
      (%o4)                       done

  The `f90` implementation was done as a quick hack. It is not a necessarily a good example upon which to base other language translations.

  To use this function write first `load("f90")`.

  Categories: Translation and compilation · Share packages · Package f90

[ << ] | [ >> ] |  |  |  |  |  | [Top] | [Contents] | [Index] | [ ? ]

This document was generated by Robert Dodier on August, 24 2008 using texi2html 1.76.