代码搜索结果

SUBROUTINE albedo ( kpt,ivt,albsol,albvgs,albvgl,& chil,ref,tran,fveg,green,lai,sai,cosz,wt,fsno,ssw,tg,& scv,sag,alb,albg,albv,ssun,ssha,tranc,thermk,ext

SUBROUTINE clmzen (kpt, calday, dlon, dlat, cosz) !======================================================================= ! Source file: clmzen.f90 ! Original version: Yongjiu Dai, Septem

SUBROUTINE surrad(kpt ,sigf ,albg ,albv ,alb ,ssun, ssha ,& sols ,soll ,solsd ,solld ,parsun, parsha, sabvsun, sabvsha, sabg ,sabvg, & solisb, solisd ) !

// //solar battery charge controller //header file,data struct //2003/3/23 // #ifndef __CHARGER_H__ #define __CHARGER_H__ //----------------------------- //today working ,save to table of

// //solar battery charge controller //header file,data struct //2003/3/23 // #ifndef __CHARGER_H__ #define __CHARGER_H__ //------------------------------ //Default system volatage no //{48,1

// //solar battery charge controller //header file,data struct //2003/3/23 // #ifndef __CHARGER_H__ #define __CHARGER_H__ #ifndef NULL #define NULL (void *)0L #endif //--------------------

/*

/*

/*