Update of /u/gcmpack/MITgcm/model/src In directory forge:/tmp/cvs-serv20925 Modified Files: port_rand.F Log Message: cleaning (remove GOTO since there was already "DO WHILE")