 |
forums.silverfrost.com Welcome to the Silverfrost forums
|
FAQ
Search
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in| Search found 13 matches |
| Author | Message |
|---|---|
 Topic: finally ends here |
|
| shah Replies: 0 Views: 3958 |
 Forum: Support Posted: Sat Oct 29, 2011 2:46 pm Subject: finally ends here |
| C REDUCE RIGHT HAND SIDE LOAD VECTOR
150 DO 180 N=1,NN KL=NDS(N)+1 KU=NDS(N+1)-1 IF(KU-KL) 180,160,160 160 K=N C=0.0 DO 170 KK=KL,KU K=K-1 170 C=C+SK(KK)*P(K) P(N) ... |
|
| Topic: and continues |
|
| shah Replies: 1 Views: 4842 |
Forum: Support Posted: Sat Oct 29, 2011 2:45 pm Subject: and continues |
| C READ & PRINT MATERIAL PROPERTIES
DO 1 J=1,NMP 1 READ(5,55)I,E(I),PR(I),WD(I) WRITE(6,66)(I,E(I),PR(I),WD(I),I=1,NMP) C 33 FORMAT(7I5,3F10.3,2I5) 44 FORMAT(//59X,'NODA ... |
|
| Topic: the programme continues |
|
| shah Replies: 0 Views: 3969 |
Forum: Support Posted: Sat Oct 29, 2011 2:44 pm Subject: the programme continues |
| S3=(S4-S3)+S7
S4=S8 S5=S1+S2+S3+S4 WRITE(6,130) WRITE(6,135)S1,S2,S3,S4,S5 200 CONTINUE C C READ NEXT ANALYSIS CASE C GO TO 100 1 FORMAT(A15) 11 FORMA ... |
|
| Topic: Note:-This programme was built in F77 and was too old.... |
|
| shah Replies: 0 Views: 4149 |
Forum: Support Posted: Sat Oct 29, 2011 2:41 pm Subject: Note:-This programme was built in F77 and was too old.... |
| C MAIN ROUTINE OF THE PROGRAM PASSFEM
C IMPLICIT REAL*8(A-H,O-Z) REAL*4 S1,S2,S3,S4,S5,S6,S7,S8,SS1,SS2,SS3,SS4 INTEGER CHT COMMON/DIM/N1,N2,N3,N4,N5,N6,N7,N8,N9,N10,N11,N1 ... |
|
| Topic: full programme |
|
| shah Replies: 0 Views: 3667 |
Forum: Support Posted: Sat Oct 29, 2011 2:39 pm Subject: full programme |
| finally the programme is running in F95 but i am still unable to give the inputs in order.
1st of all let me tell that the pgogamme which i am going to upload is an example of a book named FINITE EL ... |
|
| Topic: help me to understand this |
|
| shah Replies: 11 Views: 14443 |
Forum: Support Posted: Mon Oct 24, 2011 7:54 am Subject: Re: |
| To remove the mixed mode error, use /error_numbers compilation option and then you can use /ignore nnn to ignore this warning. See the help for more info. You can place these compilation options in a ... | |
| Topic: help me to understand this |
|
| shah Replies: 11 Views: 14443 |
Forum: Support Posted: Fri Oct 21, 2011 8:58 am Subject: Re: |
| & heres the call of the above sub routine:
CALL PASSIN (A(N2),A(N3),A(N4),A(N5),A(N6),A(N7),A(N1), *NSN,NMP,NEQ) |
|
| Topic: help me to understand this |
|
| shah Replies: 11 Views: 14443 |
Forum: Support Posted: Fri Oct 21, 2011 8:32 am Subject: Re: |
| ok.so heres the full subroutine progamme:
SUBROUTINE PASSIN(X,Y,Z,E,PR,WD,NDF,NSN,NMP,NEQ) IMPLICIT REAL*8(A-H,O-Z) COMMON/PRECI/ITWO COMMON/TAPES/ISTRES,NDARAY,IPR ... |
|
| Topic: help me to understand this |
|
| shah Replies: 11 Views: 14443 |
Forum: Support Posted: Thu Oct 20, 2011 1:38 pm Subject: Re: |
| can u plz tell me elaborately the meaning of argument 7.
i am still unable to understant tne meaning of argument 7 if possible plz explain with an example. may be because of this m unable to sort o ... |
|
| Topic: how to eliminate the final compiling error? |
|
| shah Replies: 2 Views: 8077 |
Forum: Support Posted: Thu Oct 20, 2011 1:28 pm Subject: Re: |
| In your first line (and following) you appear to have used the letter O where you need the number 0. i.e. it should be 1.D0 and not 1.DO etc.
thank you very much...it worked... but after doing wha ... |
|
| Topic: help me to understand this |
|
| shah Replies: 11 Views: 14443 |
Forum: Support Posted: Thu Oct 20, 2011 1:04 pm Subject: help me to understand this |
| there are no errors in programme but with few warnings
& after clicking compiling button it shows the following msg *** SUBROUTINE 'PASSIN' called with argument no 7 as a REAL(KIND=2) when a ... |
|
| Topic: how to eliminate the final compiling error? |
|
| shah Replies: 2 Views: 8077 |
Forum: Support Posted: Thu Oct 20, 2011 10:30 am Subject: how to eliminate the final compiling error? |
| DATA R/-1.DO,1.DO,1.DO,-1.DO/
DATA S/-1.DO,-1.DO,1.DO,1.DO/ DATA U/-1.DO,1.DO,1.DO,-1.DO/ DATA V/-1.DO,-1.DO,1.DO,1.DO/ DATA WG/1.DO,1.DO,1.DO,1.DO/ it shows : error 1069 - Terminating decimal ... |
|
| Topic: how to eliminate this error while compiling |
|
| shah Replies: 0 Views: 3627 |
Forum: Support Posted: Thu Oct 20, 2011 10:19 am Subject: how to eliminate this error while compiling |
| *** SUBROUTINE 'PLATE4' called with argument no 9 as a REAL(KIND=2) when a INTEGER(KIND=3) was expected (from SUBROUTINE 'PLATE')
then it shows "Compilation failed." |
|
All times are GMT + 1 Hour |
Powered by phpBB © 2001, 2005 phpBB Group