Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations strongm on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
-
f77 equivalence -> f90
I've got this (very old fashioned) piece of code COMMON /CHDATA/ HNO3 , HONO , HNO4 , CO , HO2H , OOH , & PAN , PPN , HCHO , CCHO , RCHO , MEK , & RNO3 , MGLY , AFG2 , SO2 , ETHE , OLE1 , & OLE2 , OLE3 , OLE4 , ALK1 ... -
variable string length function
Here is another maybe-trivial--problem. I cannot figure out how to write a character function that returns a variable-length string just like the intrinsic trim does. In the example below, the len applied to trim returns the length of the trimmed string. character(len=100) :: qaz='qwerty'... -
joining arrays
Here is a problem that I would manage easily in fortran 77 but it seems to be more tricky in 90 (but probably i'm wrong): suppose to have NV arrays of the same shape and dimensions, say (nx,ny,nz). I would like to have a unique array with 4 dims, one indicating the variable to address. In 77...
