| Path: | util/fillnegative.f90 | 
| Last Update: | Fri Nov 10 13:48:41 JST 2006 | 
| Authors: | SUGIYAMA Ko-ichiro | 
| Version: | $Id: fillnegative.f90,v 1.7 2006/11/10 04:48:41 odakker Exp $ | 
| Tag Name: | $Name: arare4-20071012 $ | 
| Copyright: | Copyright (C) GFD Dennou Club, 2006. All rights reserved. | 
| License: | See COPYRIGHT | 
負の雲水量などを穴埋めするためのルーチン
* 負となった場合には, 周囲の 8 格子点の値を削って穴埋めする.
* 中島版 deepconv の QFILL.f を改変
This file provides following module.