source: CIVL/mods/dev.civl.abc/examples/fortran/f77_standard/dimension.f

main
Last change on this file was aad342c, checked in by Stephen Siegel <siegel@…>, 3 years ago

Performing huge refactor to incorporate ABC, GMC, and SARL into CIVL repo and use Java modules.

git-svn-id: ​svn://vsl.cis.udel.edu/civl/trunk@5664 fb995dde-84ed-4084-dfe6-e5aef3e2452c
  • Property mode set to 100644
File size: 331 bytes
Line 
1c F77 standard Sec. 8.1: A DIMENSION statement is used to specify the
2c symbolic names and dimension specifications of arrays.
3 program p
4 dimension i(4,-1:3), r(2)
5 i = 3.5
6 r = 3.5
7c$ civl assert( all(shape(i) .eq. (/4,5/)) )
8c$ civl assert( i(3,0) .eq. 3 )
9c$ civl assert( r(1) .eq. 3.5 )
10 end program
Note: See TracBrowser for help on using the repository browser.