source: CIVL/examples/fortran/nek5000/core/ORTHOT

main
Last change on this file was ea777aa, checked in by Alex Wilton <awilton@…>, 3 years ago

Moved examples, include, build_default.properties, common.xml, and README out from dev.civl.com into the root of the repo.

git-svn-id: svn://vsl.cis.udel.edu/civl/trunk@5704 fb995dde-84ed-4084-dfe6-e5aef3e2452c

  • Property mode set to 100755
File size: 385 bytes
Line 
1 integer ktott, laxtt
2 parameter (ktott = lx1*ly1*lz1*lelt)
3 parameter (laxtt = mxprev)
4c
5c parameter (ktott = 1)
6c parameter (laxtt = 1)
7c
8 integer napproxt(2,ldimt_proj)
9 common /trthoi/ napproxt
10
11 real approxt(ktott,0:laxtt,ldimt_proj)
12 common /trthov/ approxt
13
14 character*4 name4t
15 common /trthoc/ name4t
Note: See TracBrowser for help on using the repository browser.