Cannot assign to a named constant at (1) Probably trying to assign something to an array, e.g. MYARR(I)=5.E0. The array was not declared in the DIMENSION or COMMON blocks. Just add MYARR (100) or whatever size to one of the above. The function result on the lhs of the assignment at (1) must have the pointer attribute. Seems to be the same as above, maybe for 2D arrays(?) Type mismatch in argument 'xx' at (1); passed INTEGER(4) to REAL(8) The variable, XX is an argument in some function. When you are calling the function, you are passing some variable, named say NDIME. If there's this line in your code: IMPLICIT REAL*8(A-H,O-Z), it means all variables whose names start with letter between H and O (not included) are integers. So, either: Check whether that's the correct variable you want to pass If so, give a different name, starting with letters A-H, O-Z More actual than formal arguments in procedure call at (1) You're function has 2 arguments, but you're c...
Comments
Post a Comment