/[MITgcm]/MITgcm/pkg/fizhi/fizhi_moist.F
ViewVC logotype

Diff of /MITgcm/pkg/fizhi/fizhi_moist.F

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.10 by molod, Fri Jul 16 20:08:08 2004 UTC revision 1.11 by molod, Fri Jul 16 20:11:04 2004 UTC
# Line 1310  c -------------------------------------- Line 1310  c --------------------------------------
1310        function random_numbx()        function random_numbx()
1311        implicit none        implicit none
1312        real random_numbx        real random_numbx
1313          random_numbx = 0
1314  #ifdef CRAY  #ifdef CRAY
1315        real ranf        real ranf
1316        random_numbx = ranf()        random_numbx = ranf()
Legend:
Removed from v.1.10  
changed lines
  Added in v.1.11
  ViewVC Help
Powered by ViewVC 1.1.22