Allocazioni di memoria.
583 timerangemaskl = timerangemask
585 timerangemaskl = .true.
587 if(
present(varmask))
then 592 if(
present(networkmask))
then 593 networkmaskl = networkmask
595 networkmaskl = .true.
599 qcspa%v7d%voldatiattrb(:,:,:,:,:,:,indbattrout)=ibmiss
604 call vol7d_normalize_data(qcspa%qccli)
616 time=cyclicdatetime_to_conventional(cyclicdatetime_new(chardate=
"/////////"))
620 if (qcspa%operation ==
"run")
then 621 call init(network,
"qcspa-ndi")